Changeset 142 for trunk/SRC/ToBeReviewed/PLOTS/DESSINE/pltsc.pro

Timestamp:

07/21/06 14:47:49 (18 years ago)

Author:

navarro

Message:

english and nicer header (2a)

File:

• trunk/SRC/ToBeReviewed/PLOTS/DESSINE/pltsc.pro (modified) (3 diffs)

trunk/SRC/ToBeReviewed/PLOTS/DESSINE/pltsc.pro

@@ +1 @@
+;+
+;
+; @todo seb
+;
+;-
 PRO  pltsc,tab1,tab2, min1, max1, min2, max2, varname2, BOXZOOM = boxzoom, $
            COL1D=col1d,STY1D=sty1d,OV1D=ov1d, _extra = ex
@@ -18 +23 @@
 ;--------------------------------------------------------------
 
-; Rq: on ne reinitialise pas qd on rapelle pltsc
+; Comment: We do not reinitializate when we call back pltsc
    if NOT keyword_set(ov1d) then reinitplt
    ;; reduce data xyzt domain
@@ -74 +79 @@
 
       if n_elements(ex) NE 0 then BEGIN 
-; pour avoir un cadre de la couleur 0 et trace une ligne a y=0
+; To have a 0 colored frame and trace a line at y=0
          if (where(tag_names(ex) EQ 'COLOR'))[0] NE -1 then ex.COLOR = 0
          if (where(tag_names(ex) EQ 'LINESTYLE'))[0] NE -1 then ex.LINESTYLE= 0
        ENDIF
        plot, !x.range, [0, 0], /noerase, /nodata, xstyle = 1, ystyle = 1, _extra = ex
-; trace une ligne a x=0
+; trace a line at x=0
       plot, [0, 0], !y.range, /noerase, /nodata, title = '', subtitle = '', _extra = ex
    ENDIF ELSE oplot,xx,yy,color=col1d,linestyle=sty1d,thick=2, _extra = ex
 ;------------------------------------------------------------
 ;------------------------------------------------------------
-; 3eme partie: impression eventuelle
+; 3rd part: Possible print
 ;------------------------------------------------------------
 ;------------------------------------------------------------