#!/bin/csh

set QBATDIR = '/users/uasd/bomem/fts/batch'
set QEXEDIR = '/users/uasd/bomem/fts/exp'
set QDATDIR = '/users/uasd/bomem/fts/data'

if ( !( -e $PWD/$1.avg ) ) then
	echo FILE $PWD/$1.avg DOES NOT EXIST
	if ( -e $PWD/$1.fft ) then
		echo FFT FILE DOES EXISTS, WILL ADD SCAN DIRECTIONS IN $PWD/$1.fft

		$QBATDIR/add_fft_dir $PWD/$1 $QEXEDIR

	else
		echo FFT FILE $PWD/$1.fft DOES NOT EXIT
		if (-e $PWD/$1.ifg ) then
			echo WILL TRANSFORM THE FILE $PWD/$1.ifg AT RESOLUTION 4

			$QBATDIR/transform4 $PWD/$1 $QEXEDIR

			echo WILL ADD SCAN DIRECTIONS IN $PWD/$1.fft

			$QBATDIR/add_fft_dir $PWD/$1  $QEXEDIR

		else
			echo FILE $PWD/$1.ifg DOES NOT EXIT, NO FILE TO WORK ON
		endif
	endif
endif




if ( -e $PWD/$1.avg ) then
	echo WILL FIT OH MEINEL 3,1 BAND TO FILE $PWD/$1.avg
	unalias mv
	if ( -e $PWD/$1m31.sta ) then
		mv $PWD/$1m31.sta $PWD/$1m31_old.sta
		echo RENAMED FILE $PWD/$1m31.sta TO BE $PWD/$1m31_old.sta
	endif
	if ( -e $PWD/$1m31.fit) then
		mv $PWD/$1m31.fit $PWD/$1m31_old.fit
		echo RENAMED FILE $PWD/$1m31.fit TO BE $PWD/$1m31_old.fit
	endif
	
	$QBATDIR/favons2001_4_31 $PWD/$1 1 9000 $QEXEDIR $QDATDIR
	

	if ( -e $PWD/$1m31.fis ) then
		mv $PWD/$1m31.fis $PWD/$1m31_old.fis
		echo RENAMED FILE $PWD/$1m31.fis TO BE $PWD/$1m31_old.fis
	endif
	if ( -e $PWD/$1m31.fit) then
		echo WILL STATISTICALLY SELECT SCANS IN FILE $PWD/$1m31.fit

		$QBATDIR/select_fit $PWD/$1m31 12 300 110 $QEXEDIR

	else
		echo CAN NOT FIND FIT FILE $PWD/$1m31.fit TO SELECT SCANS
	endif


	if ( -e $PWD/$1m31.f3s ) then
		mv $PWD/$1m31.f3s $PWD/$1m31_old.f3s
		echo RENAMED FILE $PWD/$1m31.f3s TO BE $PWD/$1m31_old.f3s
	endif
	if ( -e $PWD/$1m31.f33 ) then
		mv $PWD/$1m31.f33 $PWD/$1m31_old.f33
		echo RENAMED FILE $PWD/$1m31.f33 TO BE $PWD/$1m31_old.f33
	endif
	if ( -e $PWD/$1m31.fis) then
		echo WILL 3 POINT SMOOTH SCANS IN FILE $PWD/$1m31.fis

		$QBATDIR/smooth3_fit $PWD/$1m31 20 $QEXEDIR

	else
		echo CAN NOT FIND FIT FILE $PWD/$1m31.fis TO SMOOTH SCANS
	endif


	if ( -e $PWD/$1m31.f5s ) then
		mv $PWD/$1m31.f5s $PWD/$1m31_old.f5s
		echo RENAMED FILE $PWD/$1m31.f5s TO BE $PWD/$1m31_old.f5s
	endif
	if ( -e $PWD/$1m31.f55 ) then
		mv $PWD/$1m31.f55 $PWD/$1m31_old.f55
		echo RENAMED FILE $PWD/$1m31.f55 TO BE $PWD/$1m31_old.f55
	endif
	if ( -e $PWD/$1m31.fis) then
		echo WILL 5 POINT SMOOTH SCANS IN FILE $PWD/$1m31.fis

		$QBATDIR/smooth5_fit $PWD/$1m31 25 $QEXEDIR

	else
		echo CAN NOT FIND FIT FILE $PWD/$1m31.fis TO SMOOTH SCANS
	endif








	echo WILL FIT OH MEINEL 4,2 BAND TO FILE $PWD/$1.avg
	unalias mv
	if ( -e $PWD/$1m42.sta ) then
		mv $PWD/$1m42.sta $PWD/$1m42_old.sta
		echo RENAMED FILE $PWD/$1m42.sta TO BE $PWD/$1m42_old.sta
	endif
	if ( -e $PWD/$1m42.fit ) then
		mv $PWD/$1m42.fit $PWD/$1m42_old.fit
		echo RENAMED FILE $PWD/$1m42.fit TO BE $PWD/$1m42_old.fit
	endif
		
	$QBATDIR/favons2001_4_42 $PWD/$1 1 9000 $QEXEDIR $QDATDIR


	if ( -e $PWD/$1m42.fis ) then
		mv $PWD/$1m42.fis $PWD/$1m42_old.fis
		echo RENAMED FILE $PWD/$1m42.fis TO BE $PWD/$1m42_old.fis
	endif
	if ( -e $PWD/$1m42.fit) then
		echo WILL STATISTICALLY SELECT SCANS IN FILE $PWD/$1m42.fit

		$QBATDIR/select_fit $PWD/$1m42 12 300 110 $QEXEDIR

	else
		echo CAN NOT FIND FIT FILE $PWD/$1m42.fit TO SELECT SCANS
	endif


	if ( -e $PWD/$1m42.f3s ) then
		mv $PWD/$1m42.f3s $PWD/$1m42_old.f3s
		echo RENAMED FILE $PWD/$1m42.f3s TO BE $PWD/$1m42_old.f3s
	endif
	if ( -e $PWD/$1m42.f33 ) then
		mv $PWD/$1m42.f33 $PWD/$1m42_old.f33
		echo RENAMED FILE $PWD/$1m42.f33 TO BE $PWD/$1m42_old.f33
	endif
	if ( -e $PWD/$1m42.fis) then
		echo WILL 3 POINT SMOOTH SCANS IN FILE $PWD/$1m42.fis

		$QBATDIR/smooth3_fit $PWD/$1m42 20 $QEXEDIR

	else
		echo CAN NOT FIND FIT FILE $PWD/$1m42.fis TO SMOOTH SCANS
	endif


	if ( -e $PWD/$1m42.f5s ) then
		mv $PWD/$1m42.f5s $PWD/$1m42_old.f5s
		echo RENAMED FILE $PWD/$1m42.f5s TO BE $PWD/$1m42_old.f5s
	endif
	if ( -e $PWD/$1m42.f55 ) then
		mv $PWD/$1m42.f55 $PWD/$1m42_old.f55
		echo RENAMED FILE $PWD/$1m42.f55 TO BE $PWD/$1m42_old.f55
	endif
	if ( -e $PWD/$1m42.fis) then
		echo WILL 5 POINT SMOOTH SCANS IN FILE $PWD/$1m42.fis

		$QBATDIR/smooth5_fit $PWD/$1m42 25 $QEXEDIR

	else
		echo CAN NOT FIND FIT FILE $PWD/$1m42.fis TO SMOOTH SCANS
	endif








else
	echo NO FILES TO FIT, WILL EXIT
endif
