ratfor < $1 > $1.for
f80 =$1
era $1.for