Changeset 69 for trunk/ToBeReviewed/PLOTS/DESSINE
- Timestamp:
- 05/11/06 12:35:53 (18 years ago)
- Location:
- trunk/ToBeReviewed/PLOTS/DESSINE
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/ToBeReviewed/PLOTS/DESSINE/.idlwave_catalog
r68 r69 2 2 ;; IDLWAVE catalog for library saxo 3 3 ;; Automatically Generated -- do not edit. 4 ;; Created by idlwave_catalog on T ue Jan 24 17:06:1920064 ;; Created by idlwave_catalog on Thu May 4 08:42:55 2006 5 5 ;; 6 6 (setq idlwave-library-catalog-libname "saxo") -
trunk/ToBeReviewed/PLOTS/DESSINE/pltt.pro
r67 r69 417 417 if keyword_set(OV1D) then begin 418 418 yy = z2d 419 if n_elements(datmin) NE 0 then tempsmin = juldate(datmin, _extra = ex) $419 if n_elements(datmin) NE 0 then tempsmin = date2jul(datmin) $ 420 420 ELSE tempsmin = temps[0] 421 421 ; on shift l''axe du temps pour des questions de precision sur les … … 472 472 case N_PARAMS() OF 473 473 5 : begin 474 tempsmin = juldate(datmin, _extra = ex)474 tempsmin = date2jul(datmin) 475 475 tempsmax = temps[(jpt*repeat_c)-1] 476 476 end 477 477 6 : begin 478 tempsmin = juldate(datmin, _extra = ex)479 tempsmax = juldate(datmax, _extra = ex)478 tempsmin = date2jul(datmin) 479 tempsmax = date2jul(datmax) 480 480 end 481 481 else : begin -
trunk/ToBeReviewed/PLOTS/DESSINE/sbar_plot.pro
r67 r69 17 17 ; 18 18 ; meme que ceux de bar_plot avec en plus: 19 ; COLOR : un entier donnant la couleur de toutes les barres de19 ; COLORS: un entier donnant la couleur de toutes les barres de 20 20 ; couleurs. (contrairement a colors qui est en vecteur donnant le 21 21 ; couleur de chaque barre de couleur. … … 50 50 ;------------------------------------------------------------ 51 51 52 PRO sbar_plot, Values, COLOR = color, NOREINITPLT = noreinitplt, _extra = ex52 PRO sbar_plot, Values, COLORS = colors, NOREINITPLT = noreinitplt, _extra = ex 53 53 @common 54 54 ; 1) je reinitialise l''environnememt graphique (les variables !x, !y et !p): … … 57 57 IF chkstru(ex, 'overplot')EQ 0 THEN placedessin, 'autre', _extra = ex 58 58 ; 3) je fais mon joli dessin 59 if n_elements(COLOR )then BEGIN60 if n_elements(COLOR ) EQ n_elements(Values) then colors = color$61 ELSE col ors = replicate(color[0], n_elements(Values))62 ENDIF ELSE col ors= congrid(indgen(!d.n_colors < 256), n_elements(Values))59 if n_elements(COLORS) NE 0 then BEGIN 60 if n_elements(COLORS) EQ n_elements(Values) then col = colors $ 61 ELSE col = replicate(colors[0], n_elements(Values)) 62 ENDIF ELSE col = congrid(indgen(!d.n_colors < 256), n_elements(Values)) 63 63 ; 64 bar_plot, Values, background = !p.background, colors = col ors$64 bar_plot, Values, background = !p.background, colors = col $ 65 65 , xstyle = 1, ystyle = 1, _extra = ex 66 66 ; 4) je termine le dessin -
trunk/ToBeReviewed/PLOTS/DESSINE/tvplus.pro
r35 r69 216 216 plot, [0], [0], /nodata, /noerase, position = poscadre, color = 0 $ 217 217 , xstyle = 1, ystyle = 1, xticklen = 1, yticklen = 1 $ 218 , xrange = 1.*[0, nx]/cellsize-.5+offset[0], yrange = 1.*[0, ny]/cellsize-.5+offset[1] 218 , xrange = 1.*[0, nx]/cellsize-.5+offset[0] $ 219 , yrange = 1.*[0, ny]/cellsize-.5+offset[1], _extra = ex 219 220 xenvsauve = !x & yenvsauve = !y & penvsauve = !p 220 221 ;
Note: See TracChangeset
for help on using the changeset viewer.