source: trunk/SRC/Tests/tst_initorca2_index_stride.pro @ 157

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

improvements of ReadWrite/?*.pro header

  • Property svn:keywords set to Id
File size: 1.3 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 $Id$
13;-
14;
15; 1) definition with a file
16;
17file = 'Levitus98_1m_01_12_Temperature_Pot_ORCA2.nc'
18initncdf, file, xminmesh = 1, xmaxmesh = -1 $
19          , yminmesh = 0, ymaxmesh = -1, /xyindex, stride = [2, 2, 1] $
20          , /lookalldir
21;
22; 2) definition with the meshmask
23;
24; file = 'micromeshmaskORCA2.nc'
25; initncdf, file, xaxisname = 'glamt', yaxisname = 'gphit' $
26;           , /xyindex, zaxisname = 'gdept', stride = [2, 2, 1] $
27;           , yminmesh = 0, ymaxmesh = -1, xminmesh = 1, xmaxmesh = -1 $
28;           , /lookalldir
29;
30; 3) by calling directly computegrid
31;
32; if we don't know jpiglo and jpjglo, we call ncdf_meshread with /getdimensions
33; ncdf_meshread, 'micromeshmaskORCA2.nc', /getdimensions $
34;               , iodirectory = [iodir, homedir, !path], /recursive
35;---------------------------------------------------------
36; define the grid parameters
37;---------------------------------------------------------
38; computegrid, 0, 0, 1, 1, jpiglo, jpjglo, xminmesh = 1, xmaxmesh = -1 $
39;           , yminmesh = 0, ymaxmesh = -1, onearth = 0, stride = [2, 2, 1] $
40;           , /lookalldir
Note: See TracBrowser for help on using the repository browser.