'open /cpc/home/wd52vk/samer/satellite/gridsat.ctl'
iyear=1982
iday=2
while iday<=2
'set vpage 0.0 8.5 0.0 11.0'
'set parea 1.0 4.0 7.0 10.0'
'set grads off'
'set annot 1 5'
'set map 1 1 7'
'set string 1 tc 7'
'set strsiz 0.15 0.15'
'draw string 4.25 10.6 00Z 'iday' December 'iyear
'draw string 2.5 10.2 IRWIN'
'set csmooth on'
'set cterp off'
'set dfile 1'
'set lon -90 -20'
'set lat -55 0'
'set ylint 5'
'set xlint 10'
'set time 00Z'iday'dec'iyear
'run /cpc/home/wd52vk/grads/util/bw2.gs'
'set clevs 215 220 225 230 235 240 245 250 255 260 265 270 275 280 285 290 295'
'set ccols 49 48 47 46 45 44 43 42 41 39 38 37 36 35 34 33 32 31'
'set gxout shaded'
'd irwin'
'printim irwin-SA-00z'iday'dec'iyear'.gif white'
*'clear'
iday=iday+1
endwhile