;+ ; hsi_image script - created Wed Oct 26 02:25:44 2022 by hsi_params2script.pro ; Includes only parameters changed from default settings. ; ; Note: This script simply sets control parameters in the hsi_image object as they ; were when you wrote the script. To make the object do anything in this script, ; you need to add some action commands. For instance, the command ; image= obj->getdata() ; would generate and return the image. ; ; For a complete list of control parameters look at the tables in ; http://hesperia.gsfc.nasa.gov/ssw/hessi/doc/hsi_params_all.htm ; ; There are several ways to use this script: ; ; A. Run this procedure via this command (compile first if it's not in your IDL path): ; hsi_image_script_nondefault_params_vf_20050913_2305_45tx5e, obj=obj ; Note: you can set additional parameters or override parameters in script via: ; hsi_image_script_nondefault_params_vf_20050913_2305_45tx5e, obj=obj, param1=param1, $ ; param2=param2,... ; or ; B. Compile and execute it as a main program by: ; 1. Comment out the "pro" line and save. ; 2. From the command line, $ ; type .run hsi_image_script_nondefault_params_vf_20050913_2305_45tx5e. ; In the IDLDE, click Compile, then Execute. ; 3. Use .GO to restart at the beginning of the script ; or ; C. Execute it as a batch file via: ; 1. Comment out the "pro" and "end" lines and save. ; 2. Run the commands via @hsi_image_script_nondefault_params_vf_20050913_2305_45tx5e ; ; Once you have run the script (via one of those 3 methods), you will have an ; hsi_image object called obj that is set up as it was when you wrote the script. ; You can proceed using obj from the command line or the hessi GUI. ; To use it in the GUI, type ; hessi,obj ; To use it from the command line, here are a few examples of commands: ; data = obj->getdata() ; retrieve the last image made ; data = obj->getdata(use_single=0) ; retrieve all images in cube ; obj->plot ; plot the last image ; obj->plotman ; plot the last image in plotman ; obj->plotman, /choose ; choose which image(s) in cube to plot in plotman ;- pro hsi_image_script_nondefault_params_vf_20050913_2305_45tx5e, obj=obj, _extra=_extra obj = hsi_image() ;obj-> set, $ ; vis_input_fits= '/data/rhessi_extras/visibility_fits_v2/2005/09/13/hsi_vis_20050913_2305_0007_45tx5e.fits' obj-> set, cbe_normalize= 1 obj-> set, image_algorithm= 'VIS_FWDFIT' ;obj-> set, viscomp_jpeg_plot= 1 ;obj-> set, $ ; viscomp_plot_dir= '/data/rhessi_extras/flare_images_v2/2005/09/13/20050913_2305_0008/VIS_FWDFIT/viscomp' ;obj-> set, snr_chk= 1 obj-> set, mpat_coord= 'CART' obj-> set, image_dim= [101, 101] obj-> set, pixel_size= [1.50000, 1.50000] obj-> set, im_time_interval= [['13-Sep-2005 23:05:31.909', '13-Sep-2005 23:06:42.098'], $ ['13-Sep-2005 23:06:42.098', '13-Sep-2005 23:07:53.098'], ['13-Sep-2005 23:07:53.098', $ '13-Sep-2005 23:09:12.098'], ['13-Sep-2005 23:09:58.951', '13-Sep-2005 23:10:59.093'], $ ['13-Sep-2005 23:10:59.093', '13-Sep-2005 23:12:16.093'], ['13-Sep-2005 23:12:16.093', $ '13-Sep-2005 23:13:16.093'], ['13-Sep-2005 23:14:26.867', '13-Sep-2005 23:15:27.156'], $ ['13-Sep-2005 23:15:41.156', '13-Sep-2005 23:17:41.156'], ['13-Sep-2005 23:17:41.156', $ '13-Sep-2005 23:17:57.156'], ['13-Sep-2005 23:18:03.805', '13-Sep-2005 23:18:39.097'], $ ['13-Sep-2005 23:18:39.097', '13-Sep-2005 23:19:48.097'], ['13-Sep-2005 23:19:48.097', $ '13-Sep-2005 23:20:04.097'], ['13-Sep-2005 23:20:04.097', '13-Sep-2005 23:20:32.097'], $ ['13-Sep-2005 23:20:32.097', '13-Sep-2005 23:21:08.097'], ['13-Sep-2005 23:21:08.097', $ '13-Sep-2005 23:21:59.097'], ['13-Sep-2005 23:21:59.097', '13-Sep-2005 23:23:05.097'], $ ['13-Sep-2005 23:23:05.097', '13-Sep-2005 23:24:10.097'], ['13-Sep-2005 23:24:10.097', $ '13-Sep-2005 23:25:14.097'], ['13-Sep-2005 23:25:14.097', '13-Sep-2005 23:26:19.097'], $ ['13-Sep-2005 23:26:19.097', '13-Sep-2005 23:27:25.097'], ['13-Sep-2005 23:28:30.812', $ '13-Sep-2005 23:29:36.107'], ['13-Sep-2005 23:29:36.107', '13-Sep-2005 23:30:43.107'], $ ['13-Sep-2005 23:30:43.107', '13-Sep-2005 23:31:51.107'], ['13-Sep-2005 23:32:32.931', $ '13-Sep-2005 23:33:38.094'], ['13-Sep-2005 23:33:38.094', '13-Sep-2005 23:34:47.094'], $ ['13-Sep-2005 23:34:47.094', '13-Sep-2005 23:36:01.094'], ['13-Sep-2005 23:36:01.094', $ '13-Sep-2005 23:37:20.094'], ['13-Sep-2005 23:37:20.094', '13-Sep-2005 23:38:41.094'], $ ['13-Sep-2005 23:38:41.094', '13-Sep-2005 23:40:09.094'], ['13-Sep-2005 23:40:09.094', $ '13-Sep-2005 23:41:50.094'], ['13-Sep-2005 23:41:50.094', '13-Sep-2005 23:43:47.094'], $ ['13-Sep-2005 23:43:47.094', '13-Sep-2005 23:44:47.094'], ['13-Sep-2005 23:44:47.094', $ '13-Sep-2005 23:45:47.094'], ['13-Sep-2005 23:45:47.094', '13-Sep-2005 23:46:47.094'], $ ['13-Sep-2005 23:46:47.094', '13-Sep-2005 23:47:47.094'], ['13-Sep-2005 23:48:31.872', $ '13-Sep-2005 23:49:32.091'], ['13-Sep-2005 23:49:32.091', '13-Sep-2005 23:50:49.091'], $ ['13-Sep-2005 23:50:49.091', '13-Sep-2005 23:52:25.091'], ['13-Sep-2005 23:52:58.870', $ '13-Sep-2005 23:53:59.093'], ['13-Sep-2005 23:54:59.093', '13-Sep-2005 23:56:59.093'], $ ['13-Sep-2005 23:57:25.905', '13-Sep-2005 23:58:26.101'], ['13-Sep-2005 23:59:25.101', $ '14-Sep-2005 00:01:25.101'], ['14-Sep-2005 00:01:59.093', '14-Sep-2005 00:03:59.093'], $ ['14-Sep-2005 00:03:59.093', '14-Sep-2005 00:05:43.093'], ['14-Sep-2005 00:06:19.885', $ '14-Sep-2005 00:07:50.800']] obj-> set, use_flux_var= 0L obj-> set, use_phz_stacker= 1L obj-> set, xyoffset= [-27.3779, -301.945] obj-> set, im_energy_binning= [[6.00000, 12.0000], [12.0000, 25.0000], [25.0000, 50.0000], $ [50.0000, 100.000], [100.000, 300.000]] obj-> set, time_bin_def= [1.00000, 2.00000, 4.00000, 8.00000, 16.0000, 16.0000, 32.0000, $ 64.0000, 128.000] obj-> set, time_bin_min= 512L obj-> set, det_index_mask= [0B, 0B, 1B, 1B, 1B, 1B, 1B, 1B, 1B] zzz = {HSI_VIS_SRC_STRUCTURE, $ SRCTYPE: 'circle', $ SRCFLUX: 1.00000, $ SRCX: -27.3779, $ SRCY: -301.945, $ SRCFWHM: 10.0000, $ ECCEN: 0.00000, $ SRCPA: 0.00000, $ LOOP_ANGLE: 0.00000, $ ALBEDO_RATIO: 0.100000, $ SRCHEIGHT: 10.0000, $ ALBEDO_APPLY: 1, $ FITMASK: [1, 1, 1, 1, 1, 1, 1, 1, 1, 1] } obj-> set, vf_srcin= zzz obj-> set, vf_noplotfit= 1 obj-> set, vis_cs_abort_numerical_issues= 1 obj-> set, vis_cs_sparseness= 0.700000 if keyword_set(_extra) then obj->set, _extra=_extra end