reinit
open /cpc/home/wd52vk/samer/satellite/gridsat.ctl
********** Days 1-5 ***********
set vpage 0 8.5 0 11.0
set parea 0.5 1.8 8.7 10.2
set grads off
set map 0 1 5
set mpdset hires
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.15 0.15
draw string 4.25 10.9 IR
draw string 4.25 10.6 April 2000
set strsiz 0.1 0.1
draw string 1.15 10.35 1
set lat -20 5
set lon -50 -25
set time 12Z1apr2000
set xlab off
set ylint 5
set xlopts 1 5 0.08
set ylopts 1 5 0.08
set grid off
run /cpc/home/wd52vk/grads/util/bw2.gs
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
d irwin
set vpage 0 8.5 0 11.0
set parea 1.8 3.1 8.7 10.2
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 2.45 10.35 2
set time 12Z2apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 3.1 4.4 8.7 10.2
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 3.75 10.35 3
set time 12Z3apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 4.4 5.7 8.7 10.2
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 5.05 10.35 4
set time 12Z4apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 5.7 7.0 8.7 10.2
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 6.35 10.35 5
set time 12Z5apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
******* Days 6-10 **********
set vpage 0 8.5 0 11.0
set parea 0.5 1.8 7.0 8.5
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 1.15 8.65 6
set time 12Z6apr2000
set xlab off
set ylab on
set grid off
set ylint 5
set xlopts 1 5 0.08
set ylopts 1 5 0.08
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
d irwin
set vpage 0 8.5 0 11.0
set parea 1.8 3.1 7.0 8.5
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 2.45 8.65 7
set time 12Z7apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 3.1 4.4 7.0 8.5
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 3.75 8.65 8
set time 12Z8apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 4.4 5.7 7.0 8.5
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 5.05 8.65 9
set time 12Z9apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 5.7 7.0 7.0 8.5
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 6.35 8.65 10
set time 12Z10apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
******* Days 11-15 **********
set vpage 0 8.5 0 11.0
set parea 0.5 1.8 5.3 6.8
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 1.15 6.95 11
set time 12Z11apr2000
set xlab off
set ylab on
set ylint 5
set xlopts 1 5 0.08
set ylopts 1 5 0.08
set grid off
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
d irwin
set vpage 0 8.5 0 11.0
set parea 1.8 3.1 5.3 6.8
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 2.45 6.95 12
set time 12Z12apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 3.1 4.4 5.3 6.8
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 3.75 6.95 13
set time 12Z13apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 4.4 5.7 5.3 6.8
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 5.05 6.95 14
set time 12Z14apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 5.7 7.0 5.3 6.8
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 6.35 6.95 15
set time 12Z15apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
run /cpc/home/wd52vk/grads/util/cbarhov.gs
******* Days 16-20 **********
set vpage 0 8.5 0 11.0
set parea 0.5 1.8 3.6 5.1
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 1.15 5.25 16
set time 12Z16apr2000
set xlab off
set ylab on
set ylint 5
set xlopts 1 5 0.08
set ylopts 1 5 0.08
set grid off
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
d irwin
set vpage 0 8.5 0 11.0
set parea 1.8 3.1 3.6 5.1
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 2.45 5.25 17
set time 12Z17apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 3.1 4.4 3.6 5.1
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 3.75 5.25 18
set time 12Z18apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 4.4 5.7 3.6 5.1
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 5.05 5.25 19
set time 12Z19apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 5.7 7.0 3.6 5.1
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 6.35 5.25 20
set time 12Z20apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
******* Days 21-25 **********
set vpage 0 8.5 0 11.0
set parea 0.5 1.8 1.9 3.4
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 1.15 3.55 21
set time 12Z21apr2000
set xlab off
set ylab on
set ylint 5
set xlopts 1 5 0.08
set ylopts 1 5 0.08
set grid off
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
d irwin
set vpage 0 8.5 0 11.0
set parea 1.8 3.1 1.9 3.4
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 2.45 3.55 22
set time 12Z22apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 3.1 4.4 1.9 3.4
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 3.75 3.55 23
set time 12Z23apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 4.4 5.7 1.9 3.4
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 5.05 3.55 24
set time 12Z24apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
set vpage 0 8.5 0 11.0
set parea 5.7 7.0 1.9 3.4
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 6.35 3.55 25
set time 12Z25apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab off
set ylab off
d irwin
******* Days 26-30 **********
set vpage 0 8.5 0 11.0
set parea 0.5 1.8 0.2 1.7
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 1.15 1.85 26
set time 12Z26apr2000
set xlab on
set ylab on
set ylint 5
set xlint 5
set xlopts 1 5 0.08
set ylopts 1 5 0.08
set grid off
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
d irwin
set vpage 0 8.5 0 11.0
set parea 1.8 3.1 0.2 1.7
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 2.45 1.85 27
set time 12Z27apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab on
set ylab off
set grid off
set xlint 5
set xlopts 1 5 0.08
set ylopts 1 5 0.08
d irwin
set vpage 0 8.5 0 11.0
set parea 3.1 4.4 0.2 1.7
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 3.75 1.85 28
set time 12Z28apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab on
set ylab off
set grid off
set xlint 5
set xlopts 1 5 0.08
set ylopts 1 5 0.08
d irwin
set vpage 0 8.5 0 11.0
set parea 4.4 5.7 0.2 1.7
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 5.05 1.85 29
set time 12Z29apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab on
set ylab off
set grid off
set xlint 5
set xlopts 1 5 0.08
set ylopts 1 5 0.08
d irwin
set vpage 0 8.5 0 11.0
set parea 5.7 7.0 0.2 1.7
set grads off
set map 0 1 5
set looping off 
set csmooth on
set string 1 tc 7
set strsiz 0.1 0.1
draw string 6.35 1.85 30
set time 12Z30apr2000
set gxout shaded
set clevs 180 190 200 210 220 230 240 250 260 270 280 290 300
set ccols 55 53 51 49 47 45 43 41 39 37 35 33 31 30
set xlab on
set ylab off
set grid off
set xlint 5
set xlopts 1 5 0.08
set ylopts 1 5 0.08
d irwin
printim ir-nebr-apr2000.gif white