year=${1}
month=${2}

# ------------------------------------------------------------
cat > Plot_Dr_Prob.gs << EOF
   "reinit"
   "set display color white"; "c"
   Yr_Ope=${year}
   Mn_Ope=${month}
EOF
cat Dr_Prob_Template.gs >> Plot_Dr_Prob.gs

grads -blc Plot_Dr_Prob.gs


##################################