/usr/tools/rat4 $1.r >$1.f
f77 $1.f  -o $1 /usr/tools/lib.a
rm $1.f $1.o
