#!/usr/bin/ksh
#
ulimit -c 0
#set -kx
#
RED_FILE_PATH=/proj/iflocal/src/metgr/coast/   ; export RED_FILE_PATH
COAST_FILE_PATH=/proj/hirfou/ulf/MetgraF_2/coast/ ; export COAST_FILE_PATH
#
MG2=~iflocal/MetgraF_2
#
GEO=411S
YEAR1=`date +"%Y"`
MO1=`date +"%m"`
DA1=`date +"%d"`
HO1=00
INTV=06

for LN1 in 12
do
#
for map_number in  5 
do
#
if   [ $map_number = '1' ]
then
  SEL1=Wind_300
  SEL2=GeoPot_300
elif [ $map_number = '2' ]
then
  SEL1=Temp_500
  SEL2=GeoPot_500
elif [ $map_number = '3' ]
then
  SEL1=EqTheta_850
  SEL2=GeoPot_850
elif [ $map_number = '5' ]
then
  SEL1=10mWind
  SEL2=Pmsl
elif [ $map_number = '6' ]
then
  SEL1=2mTemp
  SEL2=Pmsl
elif [ $map_number = '7' ]
then
  SEL1=Tot.Cloud
  SEL2=Pmsl
elif [ $map_number = '8' ]
then
  INTV=03
  SEL1=isallobars
  SEL2=Pmsl
  TOPTEXT='Marktryck, isallobarer och markobsar'
elif [ $map_number = '9' ]
then
  INTV=06
  SEL1=6hRain
  SEL2=Pmsl
elif [ $map_number = '10' ]
then
  INTV=06
  SEL1=6hRainDig
  SEL2=Pmsl
elif [ $map_number = '11' ]
then
  INTV=06
  SEL1=2mTempDig
  SEL2=Pmsl
fi
#
(( LN2 =  ${LN1} - ${INTV} ))
if [ $LN2 -le 9 ]
then
 LN2=0$LN2
fi
#
GRIBFIL1=LARGE_${YEAR1}${MO1}${DA1}${HO1}00+0${LN1}H00M
GRIBFIL2=LARGE_${YEAR1}${MO1}${DA1}${HO1}00+0${LN2}H00M
#
cat > logfile << *EOLOGFILE
 &namlog
      log_print  =.t.,
      log_unit   =6,
      log_file   ='metg.log',
 &end
*EOLOGFILE
#
cat > datefile << *EOINFILE
 &namfil
      lingua     ='Svenska',
      lfield     =.true.,
      gribdir_1  ='/proj/opdata/smhi/hirlamh44l31/postpr'
      gribfile_1 ='$GRIBFIL1',
      iyr1       = ${YEAR1},
      imo1       = ${MO1},
      ida1       = ${DA1},
      iho1       = ${HO1},
      iln1       = ${LN1},
      gribfile_2 ='$GRIBFIL2',
      iln2       = ${LN2},
      filtext    ='SMHI HIRLAM 44. Daily Operations.',
      top_text(1)='SMHI HIRLAM_44  Nordenkartan',
      top_text(2)='$TOPTEXT',
      bot_text(1)='Tid för HIRLAM: ${YEAR1}${MO1}${DA1} ${HO1}UTC+${LN1}h',
      bot_text(2)='$BOTTEXT',
      top_hgt    =0.3,
      bot_hgt    =0.2744,
      top_font   =10,
      bot_font   =10,
 &end
*EOINFILE
#
#
cat logfile                               > namelists
cat ${MG2}/Maps/namelists/namgeo/${GEO}  >> namelists 
cat datefile                             >> namelists
cat ${MG2}/Maps/namelists/namsel/${SEL1} >> namelists 
cat ${MG2}/Maps/namelists/namsel/${SEL2} >> namelists 
cat ${MG2}/Maps/namelists/namval/SvOrter >> namelists 
#
PIXFILE=${SEL1}_${SEL2}+${LN1}h
#
#cat namelists
metgraf_b namelists $PIXFILE.ps L a4
#
done
done
exit