#! /bin/csh -f
#
#   Compiles a file directly from the directory editor
#
 
#
#   extracts the $1 filename part  ( "test.f" gives "test" )
#
set a = $1:r
 
echo f77  -C -Nx500 -Ns1500 -e -u -U -g -c -o $a.o $a.f
     f77  -C -Nx500 -Ns1500 -e -u -U -g -c -o $a.o $a.f
 
echo  " >>>>> fod: done <<<<<"
