Changeset 444 for trunk/SRC

Timestamp:

01/17/11 21:21:41 (13 years ago)

Author:

smasson

Message:

add minutes as time counter unit

File:

• trunk/SRC/ReadWrite/ncdf_gettime.pro (modified) (4 diffs)

trunk/SRC/ReadWrite/ncdf_gettime.pro

@@ -49 +49 @@
 ;
 ; time_counter:units = "seconds since 0001-01-01 00:00:00" ;
+; time_counter:units = "minutes since 0001-01-01 00:00:00" ;
 ; time_counter:units = "hours since 0001-01-01 00:00:00" ;
 ; time_counter:units = "days since 1979-01-01 00:00:00" ;
@@ -165 +166 @@
   IF value NE 'true julian day' THEN BEGIN 
 ; time_counter:units = "seconds since 0001-01-01 00:00:00" ;
+; time_counter:units = "minutes since 0001-01-01 00:00:00" ;
 ; time_counter:units = "hours since 0001-01-01 00:00:00" ;
 ; time_counter:units = "days since 1979-01-01 00:00:00" ;
@@ -175 +177 @@
     IF strpos(units, 's', strlen(units)-1) NE -1 THEN units = strmid(units, 0, strlen(units)-1)
     IF strpos(units, 'julian_') NE -1 THEN units = strmid(units, 7)
-    IF units NE 'second' AND units NE 'hour' AND units NE 'day' $
+    IF units NE 'second' AND units NE 'minute' AND units NE 'hour' AND units NE 'day' $
        AND units NE 'month' AND units NE 'year' THEN BEGIN
       CASE caller OF
-        'read_ncdf':err = 'time units does not start with seconds/hours/days/months/years !C Use the TIMESTEP keyword'
-        'scanfile':err = 'time units does not start with seconds/hours/days/months/years !C we create a fake calendar ...'
+        'read_ncdf':err = 'time units does not start with seconds/minutes/hours/days/months/years !C Use the TIMESTEP keyword'
+        'scanfile':err = 'time units does not start with seconds/minutes/hours/days/months/years !C we create a fake calendar ...'
       ENDCASE
       IF keyword_set(tobeclosed) THEN ncdf_close, cdfid
@@ -202 +204 @@
     'true julian day':
     'second':time = julday(start[1], start[2], start[0], 0, 0, 0)+time/86400.d
+    'minute':time = julday(start[1], start[2], start[0], 0, 0, 0)+time/1440.d
     'hour':time = julday(start[1], start[2], start[0], 0, 0, 0)+time/24.d
     'day':time = julday(start[1], start[2], start[0], 0, 0, 0)+time