#! /bin/csh

set x=$1
while ($x <= $2)
	echo Plotting $x

	mv $x.rad.ps $x.325r.ps
	mv $x.rad.gif $x.325r.gif

	/usr/local/bin/scans/plotsynop rot=$x +z -S -P -G pfile=$x.p \
		in=/data/source/cor/Bsource.250r scale=0.005
	psplot $x.p > $x.250r.ps
	rm $x.p

	@ x = $x + 1
end