Changeset 297 for trunk/SRC/Grid
- Timestamp:
- 09/25/07 17:09:12 (17 years ago)
- Location:
- trunk/SRC/Grid
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/Grid/computegrid.pro
r287 r297 509 509 ; check y periodicity... Only according to ORCA grid 510 510 ;==================================================== 511 ; check the peri dicity if iyminmesh and iymaxmesh have the default definitions...511 ; check the periodicity if iyminmesh and iymaxmesh have the default definitions... 512 512 IF NOT keyword_set(plain) AND key_onearth EQ 1 $ 513 513 AND iyminmesh EQ 0l AND iymaxmesh eq jpjglo-1 AND jpj GE 3 AND jpi GE 2 THEN BEGIN … … 546 546 ;==================================================== 547 547 IF n_elements(periodic) NE 0 THEN forcenoperio = 1 - keyword_set(periodic) 548 ; check the peri dicity if ixminmesh and ixmaxmesh have the default definitions...548 ; check the periodicity if ixminmesh and ixmaxmesh have the default definitions... 549 549 IF NOT keyword_set(plain) AND NOT keyword_set(forcenoperio) AND key_onearth EQ 1 $ 550 550 AND ixminmesh EQ 0l AND ixmaxmesh eq jpiglo-1 AND jpi GE 3 THEN BEGIN -
trunk/SRC/Grid/micromeshmask.pro
r240 r297 101 101 ENDELSE 102 102 ENDELSE 103 ; ;get the variables list related to the partial steps103 ; get the variables list related to the partial steps 104 104 varlist_ps = ncdf_listvars(cdfid) 105 105 varlist_ps = strtrim(strlowcase(varlist_ps), 2)
Note: See TracChangeset
for help on using the changeset viewer.