;+
;
; file cplastpass.common - common block for CP display software
;
;-
  
common oldfiles, $ 		; remember values from last pass so there is
				; no need to read the file again.  Also, for
				; printing of scans.
				        ;
		last_filename, 	$       ; normal image filename
		last_diffname1, $	; base image filename
		last_diffname2, $	; subtraction image filename
					;
		cpmaxscale,	$	; the !p.color value for color table
		cpmidscale,	$	; mid point of data area in difference
					;    color table
		cpnegfac,	$	; the diff image neg scaling factor
		cpposfac,	$	; the diff image pos scaling factor
		cpdata,         $	; The data array.  NOTE: these values
					;   are not scaled for the color table.
					;
		cphk, 		$	; the house keeping
		cpimsiz, 	$	; original image size
					;
		cpih, 		$	; FOV positional value for image
		cpiv, 		$	; FOV positional value for image

		cptheta, 	$	; the value of theta entered by user,
					;  	in degrees
		cprsun,  	$	; the Rsun value entered by user
					;
		cpnum_vals_n_scans, $   ; vector w/ # of valid data for each
					; 	scan
		cpintensity,	$	; the intensity values
		cpabscissa		; for RULECONDITION 3 it is the Rsun 
					;        values for the intensity array
                                        ; for RULECONDITION 4 it is the angle
					;        values for the intensity array