_____________________________________________________________________


			       CR
			  CROSS-CORRELATE
	Use REAL and COMPLEX files as storage registers to contain
	your results  ie.
	OPTION		MAP		REAL		COMP
	CR		2		P(SxT)		S(k)xT(k)

______________________________________________________________________

 TYPE OPTIE                              22-OCT-1981 04:23:01.34
 >>>.CR                                                                             
 OPTION .CR
 OPEN INPUT FILE WITH COMPLEX TRANSFORMS
 FILI=COFT		! See FT.DOC where this was created.
 There are   3 maps in the file       
 Reading from the file
   76 rows of  512 pixels in C8 format
 MAPIC=1
 ROWI=1:76
 MAPOC=2
 OPEN OUTPUT FILE FOR REAL DATA
 FILOR=REFT
 There are   3 maps in the file       
 Reading from the file
   76 rows of  512 pixels in R4 format
 MAPOR=2
_____________________________________________________________________