- 积分
- 346
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2011-8-29
- 最后登录
- 1970-1-1
|
发表于 2013-3-24 22:46:15
|
显示全部楼层
鲸鱼便子 发表于 2013-3-24 17:24
啊哈?我这个就跟楼主的gs一样呀~~~就是水汽的u分量和v分量代替u,v分量就可以了哈~~
你好 我用楼主的gs画了一下 可是出现这种错误 不知道怎么回事 你能帮忙给看一下么
'reinit'
'open E:\paper\rain\fnl\20090627\fnl.ctl'
'set parea 1 10 1 7.5'
'set xlopts 1 4 0.12'
'set ylopts 1 4 0.12'
i=1
while(i<=18)
'enable print E:\paper\rain\fnl\20090627\chi-700.gmf'
'set lev 700'
***************Computing Velocity Potential from Wind
'define chi=fish_chi(UGRDprs,VGRDprs)'
'chi=chi-aave(chi,global)'
'set gxout contour'
'set lon 90 115'
'set lat 20 40'
'set mpdset cnworld'
'set map 1 1 5'
'draw map'
'set cthick 5'
'd chi/1e7'
****Calculating the Divergent Wind****
'define one=1+0*lat'
'uchi = -muadv(one,chi)'
'vchi = - mvadv(one,chi)'
'set gxout vector'
'set ccolor 1'
'set lon 90 115'
'set lat 20 40'
'set cmin 2'
'set cmax 20'
'set arrscl 0.5 20'
'd uchi;vchi'
'q dims'
xx=sublin(result,5)
time=subwrd(xx,6)
'draw title t='xx''
'print'
'c'
i=i+1
endwhile
'disable print'
这是我的gs 你看看
|
|