Changeset 137

Timestamp:

06/04/09 16:05:13 (15 years ago)

Author:

ericg

Message:

small additions for debug

Location:

trunk/procs

Files:

• ybinx.pro (modified) (3 diffs)
• yfx.pro (modified) (2 diffs)

trunk/procs/ybinx.pro

@@ -9 +9 @@
                IF debug_w THEN print, "    "
                
-               ; organise density bins: either read array or build form single number and min/max in fld_glo_mmx.def
- 
+               ; organise bins: either read array or build form single number and min/max in fld_glo_mmx.def
+               ; fld2 is the field being bined
+
                IF (size(bin_interval))(0) EQ 1 THEN BEGIN 
                    ; build... 
@@ -94 +95 @@
                   binpop(ib) = n_elements(indices) 
                   idxb[ib, 0:binpop(ib)-1] = where(fld2 GT bin_interval(ib-1) AND fld2 LE bin_interval(ib))
+                  IF debug_w THEN print, '    Size of bin(i) ', ib, binpop(ib) 
 
                   ib = ib + 1
@@ -111 +113 @@
 
                IF debug_w THEN print, '    Max bin size ', max_idx
+               IF debug_w THEN print, '    Number of bins ', nbins
                fldy = fltarr(nbins+1, max_idx)
                fldy[*, *] = !values.f_nan 

trunk/procs/yfx.pro

@@ -9 +9 @@
                boxy = ''
                add_txt = ''
+               coeffm_txt = ''
             ; arrange/average data if needed
               ; space and time plots fld
@@ -143 +144 @@
                varunit = '    '+cmd.var+boxx+' =f('+cmd.var2+boxy+')   '+add_txt
                pltcmdstd = 'pltsc,fld,fld2,minc,maxc,minc2,maxc2,varlegend2, boite=boxyfx'+overc+com_strplt
-
                IF hotyp EQ 't' THEN BEGIN ; time scatter plot
                   IF mean_sc_only EQ 0 OR mean_sc_only EQ 1 OR mean_sc_only EQ 4 THEN BEGIN