source: trunk/Tests/tst_initorca2_index.pro @ 58

Last change on this file since 58 was 58, checked in by pinsard, 18 years ago

upgrade of Tests according to cerbere.lodyc.jussieu.fr: /usr/home/smasson/SAXO_RD/

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