Changeset 236 for trunk/SRC/ToBeReviewed/INIT/initncdf.pro
- Timestamp:
- 03/21/07 18:18:44 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/INIT/initncdf.pro
r232 r236 90 90 ncfile = isafile(FILENAME = ncfilein, IODIRECTORY = iodir, _extra = ex) 91 91 if size(ncfile, /type) NE 7 then BEGIN 92 print, 'initncdf cancelled'92 ras = report( 'initncdf cancelled') 93 93 return 94 94 endif … … 139 139 zvarid = (where(namevar EQ 'nav_lev' or namevar EQ zaxisname OR namevar EQ 'level' OR namevar EQ 'lev' OR strmid(namevar, 0, 5) EQ 'depth'))[0] 140 140 if zvarid EQ -1 AND inside.ndims GT 3 then begin 141 print, 'initncdf: the zaxis was not found..., check the the use of ZAXISNAME keyword if you whant to find one...'141 ras = report( 'initncdf: the zaxis was not found..., check the the use of ZAXISNAME keyword if you whant to find one...') 142 142 ; stop 143 143 endif … … 230 230 tmask = finite(tmask) 231 231 IF min(tmask) EQ 1 THEN BEGIN 232 print, 'missing or nan values not found...'232 ras = report( 'missing or nan values not found...') 233 233 tmask = -1 234 234 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.