cm2cm v3.3
07-OCT-94 MJF
22-JAN-96 MJF
22-MAR-99 MJF

Modification of spectra.tmp file which changes values in
photons/mAs/cm2 to a new distance.

example:
	cm2cm << EOF
	distance(cm)
	EOF

argument:
	distance: cm

associated files:

	read: spectra.tmp (see spect.tmp.doc)

	write: spectra.tmp 
		This is an ascii file having the spectra.tmp format 
		The values of the spectra are modified to account for
		a change in the distance.

method: 
	photons/mAs/cm2 = photons/mAs/cm2 * (distanceA/distanceB)^2

	The value for distanceA is read from line two of the spectra.tmp file.
	The value for distanceB is entered as the command argument.
	The unit code on line 3 of spectra.tmp must have the second value
	equal to 2 indicating that the file is in /cm^2 units.