source: trunk/SRC/Tests/TestsOld/tst_initorca05_index_stride_old.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.3 KB
RevLine 
[189]1;+
[237]2;
[189]3; @file_comments
[57]4; definition of the domain on ORCA2 but with i/j index instead of
5; longitude/latitude
6;
[189]7; different possibilities are proposed
[57]8;
[189]9; @history
10; Sebastien Masson
11;
[237]12; @version
13; $Id$
14;
[189]15;-
[237]16;
[57]17; 1) definition with a file
18;
19file = 'Levitus98_1m_01_12_Temperature_Pot_ORCA05.nc'
20initncdf, file, xminmesh = 1, xmaxmesh = -1 $
21          , yminmesh = 0, ymaxmesh = -1, /xyindex, stride = [2, 1, 1] $
[77]22          , /lookalldir
[57]23;
24; 2) definition with the meshmask
25;
26; file = 'micromeshmaskORCA05.nc'
27; initncdf, file, xaxisname = 'glamt', yaxisname = 'gphit' $
28;           , /xyindex, zaxisname = 'gdept', stride = [2, 1, 1] $
29;           , yminmesh = 0, ymaxmesh = -1, xminmesh = 1, xmaxmesh = -1 $
[77]30;           , /lookalldir
[57]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, 'micromeshmaskORCA05.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, stride = [2, 1, 1] $
[77]42;           , /lookalldir
Note: See TracBrowser for help on using the repository browser.