Changeset 508 for trunk/SRC/ToBeReviewed/INIT/initncdf.pro

Timestamp:

06/02/17 21:22:28 (7 years ago)

Author:

smasson

Message:

minor improvments

File:

• trunk/SRC/ToBeReviewed/INIT/initncdf.pro (modified) (2 diffs)

trunk/SRC/ToBeReviewed/INIT/initncdf.pro

@@ -74 +74 @@
 PRO initncdf, ncfilein $
               , ZAXISNAME=zaxisname, START1=start1 $
-              , XYINDEX=xyindex, ZINDEX=zindex $
+              , XYINDEX=xyindex, ZINDEX=zindex, ABSZ = absz $
               , _EXTRA=ex
 ;
@@ -134 +134 @@
   IF keyword_set(zindex) AND keyword_set(zaxis) THEN $
      zaxis = keyword_set(start1) + findgen(n_elements(zaxis))
+  IF keyword_set(absz) AND n_elements(zaxis) NE 0 THEN zaxis = abs(zaxis)
 ;----------------------------------------------------------
 ; mask