#!/bin/ksh 
#

. /lfs/h2/emc/lam/noscrub/Ming.Hu/nwprod/versions/rap.ver
cp ../jrap_fcst_XX.bsub .

cycles="00 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23"
for cyc in $cycles; do
 cp  jrap_fcst_XX.bsub jrap_fcst_${cyc}.bsub
 vi jrap_fcst_${cyc}.bsub << EOF 
   :1,\$ s/XX/${cyc}
   :wq
EOF
# mv jrap_fcst_${cyc}.bsub /gpfs/hps3/emc/meso/save/Ming.Hu/nwprod/rap.${model_ver}/sms_hps3/.
done

cp ../jrap_fcst_pcyc_XX.bsub .
cycles="03 04 05 06 07 08 15 16 17 18 19 20"
for cyc in $cycles; do
 cycp1=`expr $cyc + 1`
 typeset -Z2 cycp1
 cp  jrap_fcst_pcyc_XX.bsub jrap_fcst_pcyc_${cyc}.bsub
 vi jrap_fcst_pcyc_${cyc}.bsub << EOF 
   :1,\$ s/XX/${cyc}
   :wq
EOF
vi jrap_fcst_pcyc_${cyc}.bsub << EOF
   :1,\$ s/YY/${cycp1}
   :wq
EOF
# mv jrap_fcst_pcyc_${cyc}.bsub /gpfs/hps3/emc/meso/save/Ming.Hu/nwprod/rap.${model_ver}/sms_hps3/.
done

cp ../jrap_fcst_pcyc_XX2.bsub .
cycles="08 20"
for cyc in $cycles; do
 cp  jrap_fcst_pcyc_XX2.bsub jrap_fcst_pcyc_${cyc}.bsub
 vi jrap_fcst_pcyc_${cyc}.bsub << EOF
   :1,\$ s/XX/${cyc}
   :wq
EOF
#mv jrap_fcst_pcyc_${cyc}.bsub /gpfs/hps3/emc/meso/save/Ming.Hu/nwprod/rap.${model_ver}/sms_hps3/.
done
exit