Changeset 124 for trunk

Timestamp:

04/13/09 22:02:30 (15 years ago)

Author:

ericg

Message:

added common_time=1 in plt_def.pro to allow overlay of t curves with different dates

Location:

trunk/procs

Files:

• com_eg.pro (modified) (1 diff)
• init_post_it.pro (modified) (1 diff)
• legend_overlay.pro (modified) (2 diffs)
• plt_map.pro (modified) (1 diff)

trunk/procs/com_eg.pro

@@ -8 +8 @@
 ; attributs hoevmoeller
 ;
-COMMON hovmoel, trend_typ, calendar_type, nb_cycles, def_stride, time_stride, field_int,  time_array,  key_offset, ioverchk, hotypchk, fld_prev_t, c_correl, lag_correl, c_normal, lag_correlation,  boot_win, run_stddev, tukey
+COMMON hovmoel, trend_typ, calendar_type, nb_cycles, def_stride, time_stride, field_int,  time_array,  key_offset, ioverchk, hotypchk, fld_prev_t, c_correl, lag_correl, c_normal, lag_correlation,  boot_win, run_stddev, tukey, time_prev, common_time
 ;
 ; attributs formats + div

trunk/procs/init_post_it.pro

@@ -28 +28 @@
    var3_ybinx = ""
    corr_thresh = 0.2
+   common_time = 0

trunk/procs/legend_overlay.pro

@@ -54 +54 @@
       px_1r = float(84-strlen(leg_txt))/100
       px_2r = px_1r+0.1 & px_1l = 0.03 & px_2l = 0.13
-      n_leg_max = 10 & txt_ft_size = 1.2 & y_scale_txt = 0.995
+      n_leg_max = 15 & txt_ft_size = 1.2 & y_scale_txt = 0.995
       delta_txt_add = 0.1
    END
@@ -60 +60 @@
       px_1r = float(75-strlen(leg_txt))/100
       px_2r = px_1r+0.1 & px_1l = 0.03 & px_2l = 0.13
-      n_leg_max = 10 & txt_ft_size = 1.2 & y_scale_txt = 0.993
+      n_leg_max = 15 & txt_ft_size = 1.1 & y_scale_txt = 0.995
       delta_txt_add = 0.1
    END

trunk/procs/plt_map.pro

@@ -1002 +1002 @@
                vardate = 'toto'
                grille, mask, glam, gphi, gdep, nx, ny,nz
+               ; if common_time = 1, then impose common time array (from first one)
+               
+               IF common_time EQ 1 THEN BEGIN
+                  IF iover EQ 1 THEN time_prev = time ELSE time = time_prev
+               ENDIF 
+               
                IF st_rms EQ 1 THEN BEGIN ; time series of rms deviation on a sigma surface
                   @densit_pltmap_plot