;-------------------------INPUT PARAMETERS-----------------------------
; PRODUCTS:
; 
;   #  SOURCE ARRAY             REDUCED ARRAY
;
;  01: SW-all                 : h_alpha	                           pos:0-7
;  02: SW-H(D)                : h+peak				   pos:0-7
;  03: SW-alpha(D)            : he++peak			   pos:0-7
;  04: SW-alpha(T)            : he++trc				   pos:0-7
;  05: SW Z>2                 : sw_z>2_h              class:0-1	   pos:0-7
;  06: SW Z>2                 : sw_z>2_l              class:0-12   pos:0-7
;  07: WIDE ANGLE             : wap_ssd_tcr           class:0-14   pos:0-3
;  08: WIDE ANGLE(D)          : wap_ssd_dcr           class:0-6    pos:0-3
;  09: WIDE ANGLE(D)          : wap_no_ssd_dcr        class:0-6    pos:0-7
;  10: SW PHA PRIORITY RATES  : sw_priority           class:0-3    no pos.
;  11: WAP PHA PRIORITY RATES : wap_priority_ssd      class:0-1    no pos.
;  12: WAP PHA PRIORITY RATES : wap_priority_no_ssd   class:0-1    no pos.
;
;----------------------------------------------------------------------
; INPUT EXAMPLES
; 
; 'A1'        - S/C A, product 1
; 'B5/0-1'    - S/C B, product 5,  classifiers 0 & 1
; 'A10/0,2-3' - S/C B, product 10, classifiers 0 & 2 & 3
;----------------------------------------------------------------------
; KEYWORDS
;
; nodisplay: don't bring plot up on screen
; positions: an array of position numbers to include (in pos bin for product)

prod=['A02']

time = '2014-03-15/01:28:54'
timespan, time, 5, /MINUTES ; SECONDS, MINUTES, HOURS, DAYS (DEFAULT)

units = 'Counts'              ; 'Counts', 'c/s', 'adj_counts', 'adj_c/s'
nodisplay = 0

pla_plot_en_spec, prod, $
                  units, $
                  diagn = 1, $
		nodisplay = nodisplay, $
	erase_gaps = 1;
;	positions = [0,3]

