echo $1 ; fc -fi $1.f /mnt/local/avs/libplot.a \
/usr/avs/lib/libflow_f.a /usr/avs/lib/libgeom.a /usr/avs/lib/libutil.a
a.out ; mv fort.7 $1.geom