#/bin/ksh

set -x

cd $DATA

fhr=$1

WGRIB=${WGRIB:-/nwprod/util/exec/wgrib}
utilfix_nam=${utilfix_nam:-/nwprod/util/fix}
gempakfix_nam=${gempakfix_nam:-/nwprod/gempak/fix}

tmmark=tm00

. $GESDIR/nam.t${cyc}z.envir.sh

cp $COMIN/nam.t${cyc}z.copygb_gridnavfw.txt copygb_gridnavfw.txt

if [ $firewx_location = conus ]
then
   proj=lcc
   angles="25;-95;0"
else
   proj=stc
   angles="90;-150;0"
fi

kx=`cat copygb_gridnavfw.txt | awk '{print $3}'`
ky=`cat copygb_gridnavfw.txt | awk '{print $4}'`

GRIBIN=$COMIN/nam.t${cyc}z.firewxnest.hiresf${fhr}.tm00
GEMGRD=$COMAWP/nam_firewxnest_${PDY}${cyc}f0${fhr}

$WGRIB -s $GRIBIN | grep -f $utilfix_nam/nam_firewxnest.parmlist|$WGRIB -i -grib -o temp $GRIBIN
mv temp grib$fhr

#
# Copy model specific GEMPAK tables into working directory
#
cp $gempakfix_nam/namnests_ncepgrib129.tbl ncepgrib129.tbl
cp $gempakfix_nam/namnests_ncepgrib2.tbl ncepgrib2.tbl
cp $gempakfix_nam/namnests_wmogrib2.tbl wmogrib2.tbl
cp $gempakfix_nam/namnests_vcrdgrib1.tbl vcrdgrib1.tbl

. /nwprod/gempak/.gempak

nagrib << EOF
GBFILE  = grib$fhr
INDXFL  =
GDOUTF  = $GEMGRD
PROJ    = ${proj}/${angles}
GRDAREA = 
KXKY    = ${kx};${ky}
GAREA   = dset
MAXGRD  = 5000
CPYFIL  = gds
OUTPUT  = f/nagrib${fhr}.out
GBTBLS  =
GBDIAG  =
ru

exit
EOF

gpend

export DBN_ALERT_TYPE=NAM_GEMPAK_NEST

if [ $SENDDBN = "YES" ] ; then
  if [ ${fhr}%3 -ne 0 ] ; then
    $DBNROOT/bin/dbn_alert MODEL ${DBN_ALERT_TYPE} $job $GEMGRD
  else 
    $DBNROOT/bin/dbn_alert MODEL ${DBN_ALERT_TYPE} $job $GEMGRD
  fi
fi

exit