source: trunk/SRC/Tests/tst_initorca2_index.pro

Last change on this file was 327, checked in by pinsard, 16 years ago

modification of headers : mainly blanks around = sign for keywords in declaration of function and pro

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