set -x
FIX=/mesoptmp/wd20er/eta/fix.eta
cd /tmp/wd20er
cp /mesoptmp/wd20er/eta/layers/edtoascii.f temp.f
cf77 temp.f

assign -a $FIX/tr49t67 -Fcos -Nibm -Cebcdic fort.11
assign -a $FIX/tr49t85 -Fcos -Nibm -Cebcdic fort.12
assign -a $FIX/tr67t85 -Fcos -Nibm -Cebcdic fort.13
assign -a $FIX/tr49t67.ieee -Fnull -Nieee  fort.51
assign -a $FIX/tr49t85.ieee -Fnull -Nieee  fort.52
assign -a $FIX/tr67t85.ieee -Fnull -Nieee  fort.53
assign -a $FIX/tr49t67.f77 -Ff77 -Nibm -Cascii fort.54
assign -a $FIX/tr49t85.f77 -Ff77 -Nibm -Cascii fort.55
assign -a $FIX/tr67t85.f77 -Ff77 -Nibm -Cascii fort.56
assign -a $FIX/tr49t67.ascii fort.57
assign -a $FIX/tr49t85.ascii fort.58
assign -a $FIX/tr67t85.ascii fort.59
./a.out