'reinit'
*
'set datawarn off'
ns=1
while(ns<=5)
'open season'ns'.ctl'
'open /cpc/home/wd53vk/masks/f24.ctl'
'set display color white'
'clear'
*---begin edit---
if(ns = 01) ; ii=06 ; endif
if(ns = 02) ; ii=07 ; endif
if(ns = 03) ; ii=08 ; endif
if(ns = 04) ; ii=09 ; endif
if(ns = 05) ; ii=10 ; endif
*
if(ns = 01) ; ss=JJA ; endif
if(ns = 02) ; ss=JAS ; endif
if(ns = 03) ; ss=ASO ; endif
if(ns = 04) ; ss=SON ; endif
if(ns = 05) ; ss=OND ; endif
*
icm='May2015'
model='NMME'
modl='nmme'
*---end edit---
*
'set parea 2 9 1 8'
'set mproj scaled'
'set mpdset /cpc/home/wd53vk/masks/map2 hires'
'exec /cpc/home/wd53vk/masks/colors'
'set grads off'
'set lat -40 5'
'set lon 10 55'
'set map 1 1 1'
'set line 1 1 6'
'set gxout grfill'
'set clevs 36 40 50 60 70'
'set ccols 32 33 34 35 36 37'
'set xlint 5'
'set ylint 5'
'd maskout(100*prob(z=1),landsfc.2(t=1)-1)'
*
'set clevs 36 40 50 60 70'
'set ccols 93 94 95 97 98 99'
'd maskout(100*prob(z=2),landsfc.2(t=1)-1)'
*
'set clevs 36 40 50 60 70'
'set ccols 22 23 24 25 26 27'
'd maskout(100*prob(z=3),landsfc.2(t=1)-1)'
'run /cpc/home/wd53vk/masks/precip_landscape_bar1.gs'
'set string 1 c 6 0'
'set strsiz 0.12'
'draw string 5.5 8.3 'model' Precip Prob. 'icm' IC  'ss' Fcst   Sand color: 'ss' DryClim Mask'
'close 2'
'close 1'
*
'set datawarn on'
'open /cpc/home/wd53vk/masks/seasonal_clim_mask.ctl'
'open /cpc/home/wd53vk/masks/f24.ctl'
'set lat -40 5'
'set lon 10 55'
'set gxout grfill'
'set ccolor 73'
'd maskout(mask(z='ii'),landsfc.2(t=1)-1)'
'set mpdraw off'
'set line 1 1 6'
'draw shp /cpc/home/wd53vk/gis_resources/g2008_0b'
'set mpdraw on'
'printim 'modl'_prec_3catprb_'icm'IC_'ss'_fcst.png'
'set datawarn off'
'close 2'
'close 1'
'clear'
ns=ns+1
endwhile
'quit'