'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 January Brightness Temp. Anoms. Composite'
'set strsiz 0.15 0.15'
'draw string 4.25 10.2 60 Patterns (SEBR Wet)'
'set lat -54 14'
'set lon -89 -21'
'set time 12z12jan1980'
'define ir1=irwina'
'set time 12z13jan1980'
'define ir2=irwina'
'set time 12z22jan1980'
'define ir3=irwina'
'set time 12z26jan1980'
'define ir4=irwina'
'set time 12z23jan1981'
'define ir5=irwina'
'set time 12z3jan1982'
'define ir6=irwina'
'set time 12z4jan1982'
'define ir7=irwina'
'set time 12z12jan1982'
'define ir8=irwina'
'set time 12z24jan1982'
'define ir9=irwina'
'set time 12z25jan1982'
'define ir10=irwina'
'set time 12z26jan1982'
'define ir11=irwina'
'set time 12z6jan1983'
'define ir12=irwina'
'set time 12z7jan1983'
'define ir13=irwina'
'set time 12z21jan1983'
'define ir14=irwina'
'set time 12z8jan1985'
'define ir15=irwina'
'set time 12z9jan1985'
'define ir16=irwina'
'set time 12z17jan1985'
'define ir17=irwina'
'set time 12z18jan1985'
'define ir18=irwina'
'set time 12z19jan1985'
'define ir19=irwina'
'set time 12z20jan1985'
'define ir20=irwina'
'set time 12z28jan1985'
'define ir21=irwina'
'set time 12z29jan1985'
'define ir22=irwina'
'set time 12z30jan1985'
'define ir23=irwina'
'set time 12z6jan1986'
'define ir24=irwina'
'set time 12z7jan1986'
'define ir25=irwina'
'set time 12z18jan1987'
'define ir26=irwina'
'set time 12z1jan1988'
'define ir27=irwina'
'set time 12z9jan1988'
'define ir28=irwina'
'set time 12z10jan1988'
'define ir29=irwina'
'set time 12z5jan1991'
'define ir30=irwina'
'set time 12z14jan1991'
'define ir31=irwina'
'set time 12z17jan1992'
'define ir32=irwina'
'set time 12z18jan1992'
'define ir33=irwina'
'set time 12z22jan1992'
'define ir34=irwina'
'set time 12z24jan1992'
'define ir35=irwina'
'set time 12z21jan1993'
'define ir36=irwina'
'set time 12z4jan1994'
'define ir37=irwina'
'set time 12z1jan1996'
'define ir38=irwina'
'set time 12z2jan1996'
'define ir39=irwina'
'set time 12z2jan1997'
'define ir40=irwina'
'set time 12z3jan1997'
'define ir41=irwina'
'set time 12z4jan1997'
'define ir42=irwina'
'set time 12z9jan1998'
'define ir43=irwina'
'set time 12z3jan1999'
'define ir44=irwina'
'set time 12z27jan2000'
'define ir45=irwina'
'set time 12z19jan2002'
'define ir46=irwina'
'set time 12z7jan2003'
'define ir47=irwina'
'set time 12z17jan2003'
'define ir48=irwina'
'set time 12z29jan2003'
'define ir49=irwina'
'set time 12z30jan2003'
'define ir50=irwina'
'set time 12z2jan2004'
'define ir51=irwina'
'set time 12z13jan2004'
'define ir52=irwina'
'set time 12z15jan2004'
'define ir53=irwina'
'set time 12z16jan2004'
'define ir54=irwina'
'set time 12z23jan2004'
'define ir55=irwina'
'set time 12z7jan2008'
'define ir56=irwina'
'set time 12z21jan2008'
'define ir57=irwina'
'set time 12z30jan2008'
'define ir58=irwina'
'set time 12z31jan2008'
'define ir59=irwina'
'set time 12z5jan2009'
'define ir60=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+ir32+ir33+ir34+ir35+ir36+ir37+ir38+ir39+ir40+ir41+ir42+ir43+ir44+ir45+ir46+ir47+ir48+ir49+ir50+ir51+ir52+ir53+ir54+ir55+ir56+ir57+ir58+ir59+ir60)/60.'
'set fwrite irwin-comp-60cases-sebr-wet-new'
'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-jan-r60cases-sebr-wet-6jan1986.gif white'