
MODELS=" RegCM clWRF "
VARS=" pr t2 "
# ------------------------------------------------------------

LEADS='c("01","03","06")'

for model in ${MODELS} ; do
   for var in ${VARS} ; do
   # -----------------------------  Boxplots using R - Template file: my_bpl.R
if [ ${var} == pr ] ; then
  XMIN="c(0,0,0,0,0,0,0)"
  XMAX="c(1000,1000,1000,1000,1000,1000,1000)"
  XDEL="c(200,200,200,200,200,200,200)"
fi
if [ ${var} == t2 ] ; then
  XMIN="c(10,10,10,10,10,10,20)"
  XMAX="c(35,35,35,35,35,35,32)"
  XDEL="c(5,5,5,5,5,5,4)"
fi

cat > my_bpl_xt.R << EOF
  library(ncdf4)
  library(ggplot2)
  library(reshape2)
  library(ggpubr)

  idir <- c("/home/tanpv/Data/562_VNU/0.25_VN/Dat_Reg")
  odir <- c("/home/tanpv/Progs/562_VNU/PDF")

clead <- ${LEADS} # c("04") list of leastimes
model <- "${model}" # "RegCM"
var <- "${var}"
xmins <- ${XMIN} 
xmaxs <- ${XMAX}
xdels <- ${XDEL}

EOF

cat bpl_template.gs >> my_bpl_xt.R

Rscript my_bpl_xt.R

   done
done

#---------------------------------

