'reinit'
'open /cpc/home/wd52vk/samer/satellite/irwin-SA-daily-anoms-boxes-y1980-2009.ctl'
'set vpage 0 8.5 0 11.0'
'set parea 1.0 7.5 3.5 10.0'
'set grads off'
'set mpdset hires'
'set map 1 1 3'
'set annot 1 5'
'set looping off' 
'set csmooth on'
'set string 1 tc 7'
'set strsiz 0.15 0.15'
'draw string 4.25 10.5 December Brightness Temp. Anoms. Composite'
'set strsiz 0.15 0.15'
'draw string 4.25 10.2 31 Patterns (NEBR Wet)'
'set lat -54 14'
'set lon -89 -21'
'set time 12z30dec1981'
'define ir1=irwina'
'set time 12z1dec1985'
'define ir2=irwina'
'set time 12z2dec1985'
'define ir3=irwina'
'set time 12z5dec1985'
'define ir4=irwina'
'set time 12z6dec1985'
'define ir5=irwina'
'set time 12z8dec1985'
'define ir6=irwina'
'set time 12z24dec1987'
'define ir7=irwina'
'set time 12z4dec1988'
'define ir8=irwina'
'set time 12z5dec1988'
'define ir9=irwina'
'set time 12z6dec1988'
'define ir10=irwina'
'set time 12z23dec1989'
'define ir11=irwina'
'set time 12z24dec1989'
'define ir12=irwina'
'set time 12z31dec1990'
'define ir13=irwina'
'set time 12z2dec1991'
'define ir14=irwina'
'set time 12z3dec1991'
'define ir15=irwina'
'set time 12z4dec1991'
'define ir16=irwina'
'set time 12z13dec1992'
'define ir17=irwina'
'set time 12z16dec1992'
'define ir18=irwina'
'set time 12z6dec1995'
'define ir19=irwina'
'set time 12z7dec1995'
'define ir20=irwina'
'set time 12z16dec1999'
'define ir21=irwina'
'set time 12z17dec1999'
'define ir22=irwina'
'set time 12z18dec1999'
'define ir23=irwina'
'set time 12z19dec1999'
'define ir24=irwina'
'set time 12z20dec1999'
'define ir25=irwina'
'set time 12z7dec2000'
'define ir26=irwina'
'set time 12z2dec2001'
'define ir27=irwina'
'set time 12z18dec2002'
'define ir28=irwina'
'set time 12z27dec2002'
'define ir29=irwina'
'set time 12z28dec2002'
'define ir30=irwina'
'set time 12z1dec2008'
'define ir31=irwina'
'define ircomp=(ir1+ir2+ir3+ir4+ir5+ir6+ir7+ir8+ir9+ir10+ir11+ir12+ir13+ir14+ir15+ir16+ir17+ir18+ir19+ir20+ir21+ir22+ir23+ir24+ir25+ir26+ir27+ir28+ir29+ir30+ir31)/31.'
'set fwrite irwin-comp-dec-31cases-nebr-wet'
'set gxout fwrite'
'd ircomp'
'disable fwrite'
'run /cpc/home/wd52vk/grads/util/rgbset.gs'
'set clevs -30 -27 -24 -21 -18 -15 -12 -9 -6 -3 0 3 6 9 12 15 18'
'set ccols  55 59 49 48 47 46 45 44 43 42 41 21 22 23 24 25 27 29' 
'set gxout shaded'
'set ylint 10'
'set xlint 20'
'set ylab on'
'd ircomp'
'run /cpc/home/wd52vk/grads/util/cbarhovn.gs'
'printim irwin-comp-dec-31cases-nebr-wet-18dec1999.gif white'