Changeset 337 for trunk

Timestamp:

03/20/08 23:04:33 (16 years ago)

Author:

smasson

Message:

add _extra in the call of ncdf_getatt

Location:

trunk/SRC/ToBeReviewed

Files:

• LECTURE/.idlwave_catalog (modified) (1 diff)
• LECTURE/read_ncdf.pro (modified) (2 diffs)
• STATISTICS/.idlwave_catalog (modified) (1 diff)

trunk/SRC/ToBeReviewed/LECTURE/.idlwave_catalog

@@ -14 +14 @@
    ("ftp_parse_pasv" pro nil (lib "read_ftp.pro" nil "saxo") "%s, text, host, port" (nil))
    ("read_ftp" pro nil (lib "read_ftp.pro" nil "saxo") "%s, site, files, dir, port" (nil ("data") ("file") ("pass") ("ptr") ("user")))
-   ("read_ncdf" fun nil (lib "read_ncdf.pro" nil "saxo") "Result = %s(name, beginning, ending, compatibility)" (nil ("_EXTRA") ("ADDSCL_BEFORE") ("BOXZOOM") ("CALLITSELF") ("CONT_NOFILL") ("DIREC") ("FILENAME") ("GRID") ("INIT") ("NOSTRUCT") ("PARENTIN") ("TIMESTEP") ("TOUT") ("ZETAFILENAME") ("ZETAZERO")))
+   ("read_ncdf" fun nil (lib "read_ncdf.pro" nil "saxo") "Result = %s(name, beginning, ending, compatibility)" (nil ("_EXTRA") ("ADDSCL_BEFORE") ("BOXZOOM") ("CALLITSELF") ("CONT_NOFILL") ("DIREC") ("FILENAME") ("GRID") ("INIT") ("NOSTRUCT") ("PARENTIN") ("TIMESTEP") ("TOUT") ("ZETAFILENAME") ("ZETAZERO") ("ZINVAR")))
    ("xncdf_lec" fun nil (lib "xncdf_lec.pro" nil "saxo") "Result = %s(name)" (nil ("ATT") ("COUNT") ("GROUP") ("IODIR") ("OFFSET") ("SHIFT") ("STRIDE") ("VAR")))
    ("wid_var_event" pro nil (lib "xncdf_lec.pro" nil "saxo") "%s, event" (nil))

trunk/SRC/ToBeReviewed/LECTURE/read_ncdf.pro

@@ -83 +83 @@
 ; @keyword _EXTRA
 ; Used to pass keywords to <pro>isafile</pro>, <pro>initncdf</pro>,
-; <pro>ncdf_gettime</pro> and <pro>domdef</pro>
+; <pro>ncdf_gettime</pro>, <pro>ncdf_getatt</pro> and <pro>domdef</pro>
 ;
 ; @returns
@@ -328 +328 @@
   IF NOT keyword_set(callitself) THEN varname = name
 ; varunit and others...
-  ncdf_getatt, cdfid, name, add_offset = add_offset, scale_factor = scale_factor, missing_value = missing_value, units = units
+  ncdf_getatt, cdfid, name, add_offset = add_offset, scale_factor = scale_factor, missing_value = missing_value, units = units, _extra = ex
   IF NOT keyword_set(callitself) THEN varunit = units
 ; vardate

trunk/SRC/ToBeReviewed/STATISTICS/.idlwave_catalog

@@ -8 +8 @@
  '(("auto_cov2d" fun nil (lib "a_correlate2d.pro" nil "saxo") "Result = %s(x, lag)" (nil ("DOUBLE") ("ZERO2NAN")))
    ("a_correlate2d" fun nil (lib "a_correlate2d.pro" nil "saxo") "Result = %s(x, lag)" (nil ("COVARIANCE") ("DOUBLE")))
-   ("timeauto_cov" fun nil (lib "a_timecorrelate.pro" nil "saxo") "Result = %s(x, m, nt)" (nil ("DOUBLE") ("ZERO2NAN")))
-   ("a_timecorrelate" fun nil (lib "a_timecorrelate.pro" nil "saxo") "Result = %s(x, lag)" (nil ("COVARIANCE") ("DOUBLE")))
+   ("timeauto_cov" fun nil (lib "a_timecorrelate.pro" nil "saxo") "Result = %s(x, m, nt)" (nil ("DOUBLE") ("NAN") ("ZERO2NAN")))
+   ("a_timecorrelate" fun nil (lib "a_timecorrelate.pro" nil "saxo") "Result = %s(x, lag)" (nil ("COVARIANCE") ("DOUBLE") ("NVAL")))
    ("timecross_cov" fun nil (lib "c_timecorrelate.pro" nil "saxo") "Result = %s(xd, yd, m, nt, ndim)" (nil ("DOUBLE") ("ZERO2NAN")))
-   ("c_timecorrelate" fun nil (lib "c_timecorrelate.pro" nil "saxo") "Result = %s(x, y, lag)" (nil ("COVARIANCE") ("DOUBLE")))))
+   ("c_timecorrelate" fun nil (lib "c_timecorrelate.pro" nil "saxo") "Result = %s(x, y, lag)" (nil ("COVARIANCE") ("DOUBLE")))
+   ("Skewness_Num" fun nil (lib "skewness_4d.pro" nil "saxo") "Result = %s(X, nT)" (nil ("Double") ("NAN")))
+   ("skewness_4d" fun nil (lib "skewness_4d.pro" nil "saxo") "Result = %s(X)" (nil ("DOUBLE") ("NVAL")))))