add files

subtools/bw_to_color.pro

@@ -148,7 +148,7 @@ function bw_to_color, bw, mini = mini, maxi= maxi, col_table = col_table, dont_s
       tvlct, coltab_r_old, coltab_g_old, coltab_b_old, /get
     
       If keyword_set(brewer) then $
-      loadct, abs(col_table) - 100, file=!User.idlUsrDir+'/coyote/fsc_brewer.tbl' else $
+      loadct, abs(col_table) - 100, file='/Users/awalther/SOFTWARE/ICWG_IDL/tools/subtools/coyote_library_1.0.7/fsc_brewer.tbl' else $
       loadct, abs(col_table) - 100, /silent
 
       tvlct, dum_r, dum_g, dum_b, /get

subtools/log_histogram.pro

@@ -9,27 +9,18 @@ function log_histogram, data, binsize=binsize, min=min, max=max, LOCATIONS=locat
 
   min_log = alog10(min)
   max_log = alog10(max)
-  ;print, 'min(data) ', min(data)
-  ;print, 'max(data) ', max(data)
+ 
 
   data_log = alog10(data)
-
-  ;print, 'binsize' , binsize
-  ;print, min_log, min
-  ;print, max_log, max
-  ;print, 'min(data_log) ', min(data_log, /NaN)
-  ;print, 'max(data_log) ', max(data_log, /NaN)
-
+  if max(data) lt 3.0 then data_log = data
+ 
   histo = (histogram(data_log, binsize=binsize, min=min_log, max=max_log, LOCATIONS=locations))
 
-  ;help, histo
-  ;help, locations
-
-  ;for i=0, n_elements(locations)-1 do begin 
-  ;  print, locations[i], 10^(locations[i]), histo[i]
-  ;endfor 
+ 
 
   locations=10^locations
+  
+  
 
   return, histo