- 积分
- 548
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2012-7-14
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
本帖最后由 juliekxkl 于 2012-12-22 10:14 编辑
我想画100-125E 850hPa平均风场和水汽通量散度,即以时间和纬度为坐标,
画出来的图却是单线图,纠结了很久,实在没办法了,求大神帮忙啊!脚本如下
'reinit'
'open E:\grads\data\fnl_20100506_06_00.ctl'
'set map 15 1 9'
'set parea 1 10.2 1.5 8'
'set xlopts 1 6 0.14'
'set ylopts 1 6 0.14'
'set mpdset cnworld'
'set font 0'
'set display color white'
*-------计算----------
*'set lev 1000 100'
'set lev 850'
'define prs=lev'
'define g=9.8'
'define es=6.112*exp(17.67*(TMPprs-273.16)/(TMPprs-29.65))'
*饱和比湿的计算 单位:克/克
'define qs=0.62197*es/(prs-0.378*es)'
'define q=qs*RHprs/100'
'set lev 1000 300'
'define qdiv=hdivg(q*UGRDprs*1000/g,q*VGRDprs*1000/g)*100000'
'set grads off'
'set grid off'
'set t 1 6'
'set lat 16 29'
*'set lon 100 125'
'set csmooth on'
'define qdiva=ave(qdiv,lon=100,lon=125,t=1,t=6)'
'define u1=ave(ugrdprs,lon=100,lon=125)'
'define v1=ave(vgrdprs,lon=100,lon=125)'
'set lat 16 29'
'set lev 850'
'set gxout shaded'
'd qdiva'
'cbarn'
'd u1'
*'set gxout vector'
*'d u1;v1'
'draw string 0.9 0.15 10e-5 s-1'
'printim E:\grads\data\tu\wind_div.png'
|
|