#!/usr/local/bin/tcsh -f
#  To invoke cpp and f77 (compile only)

   foreach f ($argv)
	if (-f $f) then
		set src=$f:t
		/lib/cpp -I$EPICSINC -I$COSMOSINC $f > /tmp/$src; f77  -c /tmp/$src
		rm /tmp/$src
	endif	
  end
exit (0)




