set -x
mkdir /tmp/wd20er
mkdir /tmp/wd20er/layers
cd /tmp/wd20er/layers
FIXeta=/mesoptmp/wd20er/eta/fix.eta
FILENV=.assignbc
NCPUS=1
export NCPUS FILENV

cp /mesoptmp/wd20er/eta/layers/parmco2 parmco2

cf77 /mesoptmp/wd20er/eta/layers/cray2ibm.f
mv a.out cray2ibm.x

assign -a $FIXeta/radco2_r8038_50mb -Fcos -Nibm -Cascii fort.11
assign -a radco2.50mb -Fcos -Nibm -Cascii   fort.66
./cray2ibm.x > out.50mb

assign -a $FIXeta/radco2_r8038_25mb -Fcos -Nibm -Cascii fort.11
assign -a radco2.25mb -Fcos -Nibm -Cascii   fort.66
./cray2ibm.x > out.25mb