source: trunk/SRC/Tests/TestsOld/tst_initorca2_index_stride_old.pro

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