#!/bin/csh

#
# Metafile Script : ngm_meta_tmp
#
# Log :
# D.W.Plummer/NCEP   2/97   Add log header
#


set mdl=ngm
set type=tdl
set dt=${1}
set cycle=${2}
set hostpid=`hostname`_${$}

setenv SCRP_DIR	$NADATA/scripts
setenv BIN_DIR	$NADATA/bin
setenv GRDS_DIR	$MODEL/"$type"
setenv META_DIR	$NTRANS_META/${type}
setenv NAOPX    $NADATA/scripts/$type/${mdl}/${mdl}_meta_out_${hostpid}
setenv NAOP 	$NADATA/scripts/$type/${mdl}/${mdl}_meta_out

set device="nc | Nmeta.${hostpid}"

set grid=${GRDS_DIR}/${mdl}_$dt$cycle

if ( $cycle == 12 ) then
	set maxtimes="F36;F60"
	set mintimes="F24;F48"
else
	set maxtimes="F24;F48"
	set mintimes="F36;F60"
endif

set month=`echo $dt | cut -c3,4`
echo $month
if ( `echo $month | cut -c1,1` == 0 ) set month=`echo $dt | cut -c4,4`
echo $month
if ( $month == 4  ||  $month == 5 || $month == 9 )  then
	set tfint="40;45;50;55;60;65;70;75;80;85;90;95;100"
	set tfline="26;25;24;23;22;21;20;19;18;17;16;15;14;31"
	set dfint="20;25;30;35;40;45;50;55;60;65;70;75;80"
	set dfline="8;14;15;16;17;18;19;20;21;22;23;24;25;26"
	set tfunc="sm5s(htinf)"
	set title="5/-1/~^ NGM MOS HEAT INDEX (F)|^ NGM HEAT INDEX"
else if ( $month >= 6  &&  $month <= 8 )  then
	set tfint="60;65;70;75;80;85;90;95;100;105;110;115;120"
	set tfline="26;25;24;23;22;21;20;19;18;17;16;15;14;31"
	set dfint="20;25;30;35;40;45;50;55;60;65;70;75;80"
	set dfline="8;14;15;16;17;18;19;20;21;22;23;24;25;26"
	set tfunc="sm5s(htinf)"
	set title="5/-1/~^ NGM MOS HEAT INDEX (F)|^ NGM HEAT INDEX"
else if ( $month <= 3  ||  $month >= 10 )  then
	set tfint="-40;-30;-20;-10;0;10;20;30;35;40;45;50;55;60;65;70;75;80"
	set tfline="4;30;29;28;27;26;25;24;23;22;21;20;19;18;17;16;15;14;31"
	set dfint="-25;-20;-15;-10;-5;0;5;10;15;20;25;30;35;40;45;50;55;60"
	set dfline="4;30;29;28;27;26;25;24;23;22;21;20;19;18;17;16;15;14;31"
	set dfline="8;14;15;16;17;18;19;20;21;22;23;24;25;26;27;28;29;30;4"
	set tfunc="sm5s(wnchf)"
	set title="5/-1/~^ NGM MOS WIND CHILL (F)|^ NGM WIND CHILL"
endif

gdplot_nc << EOF  >>$NAOPX
 MAP      = 31//2
 DEVICE   = $device
 PROJ     = STR/90;-105;0/0;1;0;0
 GAREA    = 23;-120.49;44;-61
 CLEAR    = yes
 PANEL    = 0
 SCALE    = 0
 LATLON   = 0
 HILO     =
 HLSYM    =
 CONTUR   = 2
 SKIP     = 0
 TEXT     = 1.5/21//hw
 CLRBAR   = 1/h/lc/0.5;0.93/0.95;0.02/1
 LINE     = 32//2/2

 GDFILE   = $grid
 GLEVEL   = 2
 GVCORD   = HGHT

 GDATTIM  = $maxtimes

 GFUNC    = MAXF
 TITLE    = 5/-1/~^ NGM MOS DAYTIME MAX TEMPERATURE|^ NGM MAX
 CINT     = 5/-40/110
 CTYPE    = c/f
 FINT     = $tfint
 fline    = $tfline
l
run

 GDATTIM  = $mintimes

 GFUNC    = MINF
 TITLE    = 5/-1/~^ NGM MOS NIGHTTIME MIN TEMPERATURE|^ NGM MIN
 CINT     = 5/-40/110
 FINT     = $tfint
 fline    = $tfline
l
run

 GDATTIM  = F6-F60-3

 CTYPE    = c/f          
 GFUNC    = TMPF
 TITLE    = 5/-1/~^ NGM MOS TEMPERATURE|^ NGM TEMP
 CINT     = 5/-40/110
 FINT     = $tfint
 fline    = $tfline
l
run

 GFUNC    = DWPF
 TITLE    = 5/-1/~^ NGM MOS DEW POINT TEMPERATURE|^ NGM DEW PT
 CINT     = 5/-40/110
 FINT     = $dfint
 fline    = $dfline
l
run


 GFUNC    = RELH
 TITLE    = 5/-1/~^ NGM MOS SURFACE RELATIVE HUMIDITY|^ NGM SFC RH
 LINE     = 32//2/2
 CINT     = 10;20;30;40;50;60;70;80;90
 FINT     = 10;30;50;70;90
 FLINE    = 18;19;20;21;22;23
l
run


 GFUNC    = DPDF
 TITLE    = 5/-1/~^ NGM MOS SURFACE DEWPOINT DEPRESSION|^ NGM DWPT DEP
 CINT     = 5;10;15;20;25;30;40;50;60;70;80
 FINT     = 5;10;15;20;25;30
 FLINE    = 23-19;18;8
l
run


 GFUNC    = $tfunc
 TITLE    = $title
 CINT     = 5/-100/110
 FINT     = $tfint
 fline    = $tfline
l
run


EOF

mv $NAOPX $NAOP

mv Nmeta.${hostpid} $META_DIR/.${type}_${dt}_${cycle}_${mdl}_tmp
mv $META_DIR/.${type}_${dt}_${cycle}_${mdl}_tmp $META_DIR/${type}_${dt}_${cycle}_${mdl}_tmp

$BIN_DIR/NA_notify meta TDL_${mdl}_tmp ${dt} ${cycle} 00 X

$BIN_DIR/meta_transfer $type $dt $cycle ${mdl}_tmp all &

exit