| Line | |
|---|
| 1 | ;+ |
|---|
| 2 | ; @history |
|---|
| 3 | ; Sebastien Masson |
|---|
| 4 | ; |
|---|
| 5 | ; @version $Id$ |
|---|
| 6 | ;- |
|---|
| 7 | @cm_4mesh |
|---|
| 8 | @cm_4cal |
|---|
| 9 | @cm_4data |
|---|
| 10 | ;---------------------------------------------------------- |
|---|
| 11 | ; boundaries of the read grid regarding to the original grid |
|---|
| 12 | ;---------------------------------------------------------- |
|---|
| 13 | ixminmesh =1 |
|---|
| 14 | ixmaxmesh =720 |
|---|
| 15 | ; |
|---|
| 16 | iyminmesh =0 |
|---|
| 17 | iymaxmesh =509 |
|---|
| 18 | ; |
|---|
| 19 | izminmesh =-1 |
|---|
| 20 | izmaxmesh =-1 |
|---|
| 21 | ; |
|---|
| 22 | jpt=1 |
|---|
| 23 | time = 0 |
|---|
| 24 | ;------------------------------------------------------ |
|---|
| 25 | ; read the grid |
|---|
| 26 | ;------------------------------------------------------ |
|---|
| 27 | key_stride = [1, 1, 1] |
|---|
| 28 | ncdf_meshread, 'micromeshmaskORCA05.nc' $ |
|---|
| 29 | , glamboundary = [20, 380], /lookalldir |
|---|
| 30 | ;------------------------------------------------------------- |
|---|
| 31 | domdef |
|---|
| 32 | ; |
|---|
| 33 | triangles_list = triangule(/keep_cont) |
|---|
| 34 | ;---------------------------------------------------------- |
|---|
| 35 | ; boundaries of the data regarding to the original grid |
|---|
| 36 | ;---------------------------------------------------------- |
|---|
| 37 | jpidta = jpiglo |
|---|
| 38 | jpjdta = jpjglo |
|---|
| 39 | jpkdta = jpkglo |
|---|
| 40 | ixmindta = 0 |
|---|
| 41 | ixmaxdta = jpidta-1 |
|---|
| 42 | iymindta = 0 |
|---|
| 43 | iymaxdta = jpjdta-1 |
|---|
| 44 | izmindta = 0 |
|---|
| 45 | izmaxdta = jpkdta-1 |
|---|
| 46 | ;---------------------------------------------------------- |
|---|
| 47 | @updateold |
|---|
Note: See
TracBrowser
for help on using the repository browser.
