Changeset 3026 for branches/dev_2802_OBStools/NEMOGCM/TOOLS/OBSTOOLS/dataplot/read_seaice.pro

Timestamp:

2011-10-28T18:10:29+02:00 (13 years ago)

Author:

djlea

Message:

Remove unneeded sec_to_dt from dataplot. Also add obstools build instructions to documentation.

File:

• branches/dev_2802_OBStools/NEMOGCM/TOOLS/OBSTOOLS/dataplot/read_seaice.pro (modified) (2 diffs)

branches/dev_2802_OBStools/NEMOGCM/TOOLS/OBSTOOLS/dataplot/read_seaice.pro

@@ -60 +60 @@
 
   if (keyword_set(nodates) eq 0) then begin
-; if not keyword_set(quiet) then print,'reading time'
-; varid = ncdf_varid(ncid, 'time')
-; varid = ncdf_varid(ncid, 'SeaIce_dtime')
-; if not keyword_set(quiet) then print,varid
-; if (varid ne -1) then begin
-;  ncdf_varget, ncid, varid, time
-;  if not keyword_set(quiet) then print,'sec_to_dt 1'
-;        dts= sec_to_dt(time, Base=RefDate, date_fmt=5)
-; endif
-; if not keyword_set(quiet) then print,time
-;  
-;;  varid = ncdf_varid(ncid, 'SeaIce_dtime')
-;;    if not keyword_set(quiet) then print,varid
-;  if (varid eq -1) then varid = ncdf_varid(ncid, 'JULD')
-;  if (varid ne -1) then begin 
-;     ncdf_varget, ncid, varid, Dats
-;  if not keyword_set(quiet) then print,'sec_to_dt 2'
-;        dts = sec_to_dt(Dats*24.*60.*60., Base=RefDate, date_fmt=5)
-;  endif
 
   varid = ncdf_varid(ncid, 'JULD')
   if varid ne -1 then begin
     ncdf_varget, ncid, varid, Dats
-;    dts = sec_to_dt(Dats*24.*60.*60., Base=RefDate, date_fmt=5)
     dts = Dats+RefDate
   endif else begin
@@ -96 +76 @@
     RefDate = JULDAY(1,1,1981,0,0)  ; should be ref from 0 UTC
     dtime = dtime + secs_from_base
-;    dts = sec_to_dt(dtime, Base=RefDate, date_fmt=5)
     dts = RefDate + dtime/86400.
   endelse