Changeset 453 for trunk/SRC/Grid/ncdf_meshread.pro
- Timestamp:
- 03/26/11 14:43:58 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/Grid/ncdf_meshread.pro
r451 r453 285 285 hdept = -1 286 286 hdepw = -1 287 IF (where(allvarname EQ 'hdept'))[0] NE -1 THEN BEGIN287 IF (where(allvarname EQ 'hdept'))[0] NE -1 AND jpk EQ jpkglo THEN BEGIN 288 288 key_partialstep = 1 289 289 namevar = [namevar, 'hdept', 'hdepw'] 290 290 ENDIF 291 291 ; is gdept a real 3D array? 292 IF (where(allvarname EQ 'gdept' ))[0] NE -1 THEN BEGIN292 IF (where(allvarname EQ 'gdept' ))[0] NE -1 AND jpk EQ jpkglo THEN BEGIN 293 293 varinq = ncdf_varinq(cdfid, 'gdept') 294 294 if varinq.ndims GE 3 THEN BEGIN … … 305 305 IF (where(allvarname EQ 'e3t_ps'))[0] NE -1 THEN namevar = [namevar, 'e3t_ps', 'e3w_ps' ] 306 306 ; is e3t a real 3D array? 307 IF (where(allvarname EQ 'e3t' ))[0] NE -1 THEN BEGIN307 IF (where(allvarname EQ 'e3t' ))[0] NE -1 AND jpk EQ jpkglo THEN BEGIN 308 308 varinq = ncdf_varinq(cdfid, 'e3t') 309 309 if varinq.ndims GE 3 THEN BEGIN
Note: See TracChangeset
for help on using the changeset viewer.