Ignore:
Timestamp:
04/07/11 10:03:36 (13 years ago)
Author:
smasson
Message:

bugfix to keep double precision of vertical scale factors in all cases

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/SRC/Grid/ncdf_meshread.pro

    r453 r454  
    553553    ENDCASE 
    554554    nothing = execute(command) 
    555     command = namevar[i]+'=float('+namevar[i]+')' 
    556     nothing = execute(command) 
     555    IF strmid(fnamevar[i], 0, 2) NE  'e3' THEN BEGIN 
     556      command = namevar[i]+'=float('+namevar[i]+')'     
     557      nothing = execute(command) 
     558    ENDIF 
    557559    command = 'if size('+namevar[i]+', /n_dimension) gt 0 then '+namevar[i]+' = reform('+namevar[i]+', /over)' 
    558560    nothing = execute(command) 
Note: See TracChangeset for help on using the changeset viewer.