; hsi_image script created Fri Oct 14 11:10:58 2005                                         
; Includes all control parameters.                                                          
; Makes GUI-esque maps, only with output that can be used on the command line                                                                                          
;

obj = hsi_image()                                                                           
obj-> set, cbe_digital_quality= 0.900000                                                    
obj-> set, cbe_powers_of_two= 1L                                                            
obj-> set, cull_frac= 0.500000                                                              
obj-> set, decimation_correct= 1                                                            
obj-> set, rear_decimation_correct= 0                                                       
obj-> set, det_index_mask= [[0B, 0B, 1B, 1B, 1B, 1B, 1B, 1B, 0B], [0B, 0B, 0B, 0B, 0B, 0B, $
 0B, 0B, 0B], [0B, 0B, 0B, 0B, 0B, 0B, 0B, 0B, 0B]]                                         
obj-> set, flatfield= 1                                                                     
obj-> set, front_segment= 1B                                                                
obj-> set, im_energy_binning= [50.000000D, 100.000000D]                                      
obj-> set, im_time_interval= ['13-Nov-2003 04:58:14.000', '13-Nov-2003 05:00:14.000']       
obj-> set, image_algorithm= 'Clean'                                                         
obj-> set, image_dim= [128,128]                                                            
obj-> set, modpat_skip= 1                                                                   
obj-> set, natural_weighting= 0                                                             
obj-> set, pixel_size= [1.00000, 1.00000]                                                   
obj-> set, rear_segment= 0B                                                                 
obj-> set, smoothing_time= 0.500000                                                         
obj-> set, taper= 0.00000                                                                   
obj-> set, time_bin_def= [1.00000, 1.00000, 2.00000, 4.00000, 8.00000, 8.00000, 16.0000, $  
 32.0000, 64.0000]                                                                          
obj-> set, time_bin_min= 1024L                                                              
obj-> set, uniform_weighting= 1                                                             
obj-> set, use_auto_time_bin= 1L                                                            
obj-> set, use_cull= 1                                                                      
obj-> set, use_flare_xyoffset= 0                                                            
obj-> set, use_flux_var= 1L                                                                 
obj-> set, use_local_average= 0B                                                            
obj-> set, use_rate= 0                                                                      
obj-> set, xyoffset= [-977., 23.]                                                    
obj-> set, use_phz_stacker= 0L                                                              
obj-> set, phz_n_phase_bins= 12L                                                            
obj-> set, phz_n_roll_bins_min= [12L, 12L, 12L, 12L, 12L, 12L, 12L, 12L, 12L]               
obj-> set, phz_n_roll_bins_control= [0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L]                    
obj-> set, phz_radius= 60.0000                                                              
obj-> set, phz_report_roll_bins= 0                                                          
obj-> set, clean_niter= 333                                                                 
obj-> set, clean_negative_max_test= 1                                                       
obj-> set, clean_no_chi2= 1                                                                 
obj-> set, clean_show_maps= 1                                                               
obj-> set, clean_show_chi= 1                                                                
obj-> set, clean_chi_sq_crit= -1.00000                                                      
obj-> set, clean_frac= 0.100000                                                             
obj-> set, clean_more_iter= 0                                                               
obj-> set, clean_mark_box= 0                                                                
obj-> set, clean_progress_bar= 1                                                            
obj-> set, full_info= 0B                                                                    
obj-> set, clean_box= 0                                                                     
obj-> set, clean_cw_nop= 0                                                                  
obj-> set, clean_cw_list= 0                                                                 

image = obj->getdata()
end