; ------------------------
; casr.bat
; automates "CA SR" comand 
; assumes
;	used CORAN analysis, recreate real image
;	for "virtual" image casrv.bat
; -----------------------

x11=1	;lowest eigenvector used
x12=0	;highest eigenvector used, leave =0 if only using one vector
x20=45	;first image to be reconstituted
x21=0	;last image to be reconsitiuted, =0 if only one image

; ----- input files ------

FR G
<prefix>control	;prefix of "CA S" files

;------ output files -------

FR G
<out>casr_***	;output file prefix

; ----- END BATCH HEADER -------

IF (x12.EQ.0) x12=x11
IF (x21.EQ.0) x21=x20

CA SR		;call operation
<prefix>	;file prefix
x20-x21		;images to be recon.
x11-x12		;factors used
<out>		;output file

END