[131] | 1 | ;+ |
---|
[232] | 2 | ; |
---|
[131] | 3 | ; @file_comments |
---|
[58] | 4 | ; definition of the domain on ORCA2 but with i/j index instead of |
---|
| 5 | ; longitude/latitude |
---|
| 6 | ; |
---|
[131] | 7 | ; different possibilities are proposed |
---|
[58] | 8 | ; |
---|
[131] | 9 | ; @history |
---|
| 10 | ; Sebastien Masson |
---|
| 11 | ; |
---|
[237] | 12 | ; @version |
---|
| 13 | ; $Id$ |
---|
| 14 | ; |
---|
[131] | 15 | ;- |
---|
[237] | 16 | ; |
---|
[58] | 17 | ; 1) definition with a file |
---|
| 18 | ; |
---|
| 19 | file = 'Levitus98_1m_01_12_Temperature_Pot_ORCA05.nc' |
---|
| 20 | initncdf, file, xminmesh = 1, xmaxmesh = -1 $ |
---|
| 21 | , yminmesh = 0, ymaxmesh = -1, /xyindex, stride = [2, 1, 1] $ |
---|
[77] | 22 | , /lookalldir |
---|
[58] | 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 |
---|
[58] | 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 |
---|