*2004年7月20日の地上気圧と地表風を描くための実行ファイル

reinit
open ../ctl/200407.ctl
set grads off
q file
set lon 100 170
set lat 10 60
set time 0z20jul2004
set map 15 1 7

set cint 4
set clopts 1 1 0.15
set cthick 7

d p/100

set arrscl 0.5 15
set arrowhead 0.1
d skip(us,3,2);vs

draw title 20JUL2004 pressure[hPa] & wind[m/s] at surface

enable print slp20jul.gm
print
disable print


!gxps -c -i slp20jul.gm -o slp20jul.ps
!gxeps -2 -c -i slp20jul.gm -o slp20jul.eps
!convert -rotate 90 -geometry 600x400 slp20jul.eps slp20jul.gif