source: trunk/SRC/Tests/tst_initorca2_index.pro @ 237

Last change on this file since 237 was 237, checked in by pinsard, 17 years ago

replace some print by some report in some .pro (continuation) + improvements/corrections of some *.pro headers

  • Property svn:keywords set to Id
File size: 1.2 KB
Line 
1;+
2;
3; @file_comments
4; definition of the domain on ORCA2 but with i/j index instead of
5; longitude/latitude
6;
7; different possibilities are proposed
8;
9; @history
10; Sebastien Masson
11;
12; @version
13; $Id$
14;
15;-
16;
17; 1) definition with a file
18;
19file = 'Levitus98_1m_01_12_Temperature_Pot_ORCA2.nc'
20initncdf, file, xminmesh = 1, xmaxmesh = -1 $
21          , yminmesh = 0, ymaxmesh = -1, /xyindex $
22          , /lookalldir
23;
24; 2) definition with the meshmask
25;
26; file = 'micromeshmaskORCA2.nc'
27; initncdf, file, xaxisname = 'glamt', yaxisname = 'gphit' $
28;           , /xyindex, zaxisname = 'gdept' $
29;           , yminmesh = 0, ymaxmesh = -1, xminmesh = 1, xmaxmesh = -1 $
30;           , /lookalldir
31;
32; 3) by calling directly computegrid
33;
34; if we don't know jpiglo and jpjglo, we call ncdf_meshread with /getdimensions
35; ncdf_meshread, 'micromeshmaskORCA2.nc', /getdimensions $
36;               , iodirectory = [iodir, homedir, !path], /recursive
37;---------------------------------------------------------
38; define the grid parameters
39;---------------------------------------------------------
40; computegrid, 0, 0, 1, 1, jpiglo, jpjglo, xminmesh = 1, xmaxmesh = -1 $
41;              , yminmesh = 0, ymaxmesh = -1, onearth = 0 $
42;              , /lookalldir
Note: See TracBrowser for help on using the repository browser.