- 积分
- 442
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2022-12-3
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
本帖最后由 WOT 于 2023-1-12 16:58 编辑
这个脚本是绘制1982-2020年5~8月的整层(1000-300hpa)水汽通量脚本,这个脚本可以绘制出图像,图像如图一所示,但是无法与文献中的图像对应上,请各位帮我看一下,哪里出错了数据时间范围是1948年1月到2022年11月
'reinit'
'sdfopen E:\GrADS\testwww\uwnd.mon.mean.nc'
'sdfopen E:\GrADS\testwww\vwnd.mon.mean.nc'
'sdfopen E:\GrADS\testwww\shum.mon.mean.nc'
'sdfopen E:\GrADS\testwww\pres.mon.mean.nc'
'set parea 1.5 10.0 1.5 8.0'
'set map 1 1 3'
'set mpdset cnworld cnriver'
'set xlopts 1 3 0.2'
'set ylopts 1 3 0.2'
'set xlint 10'
'set ylint 10'
'set t 413 869'
'set z 1 8 '
'define qu5=uwnd*shum.3/1000'
'define qv5=vwnd.2*shum.3/1000'
'set t 413'
'set z 1 8 '
'define qud5=ave(qu5,t+0,t=869,12)'
'define qvd5=ave(qv5,t+0,t=869,12)'
'define qdiv5=hdivg(qud5,qvd5)'
'set t 414 870'
'set z 1 8 '
'define qu6=uwnd*shum.3/1000'
'define qv6=vwnd.2*shum.3/1000'
'set t 414'
'set z 1 8 '
'define qud6=ave(qu6,t+0,t=870,12)'
'define qvd6=ave(qv6,t+0,t=870,12)'
'define qdiv6=hdivg(qud6,qvd6)'
'set t 415 871'
'set z 1 8 '
'define qu7=uwnd*shum.3/1000'
'define qv7=vwnd.2*shum.3/1000'
'set t 415'
'set z 1 8 '
'define qud7=ave(qu7,t+0,t=871,12)'
'define qvd7=ave(qv7,t+0,t=871,12)'
'define qdiv7=hdivg(qud7,qvd7)'
'set t 416 872'
'set z 1 8 '
'define qu8=uwnd*shum.3/1000'
'define qv8=vwnd.2*shum.3/1000'
'set t 416'
'set z 1 8 '
'define qud8=ave(qu8,t+0,t=872,12)'
'define qvd8=ave(qv8,t+0,t=872,12)'
'define qdiv8=hdivg(qud8,qvd8)'
'set z 1 8 '
'define qud=(qud5+qud6+qud7+qud8)/4'
'define qvd=(qvd5+qvd6+qvd7+qvd8)/4'
'define qdiv=(qdiv5+qdiv6+qdiv7+qdiv8)/4'
'set z 1'
'define qus=vint(pres.4(lev=0),qud,300)'
'define qvs=vint(pres.4(lev=0),qvd,300)'
'define shuiqi=mag(qus,qvs)'
*'define sandu=hdivg(qus,qvs)'
'set lon 40 120'
'set lat 20 60'
'set gxout shaded'
'd shuiqi'
'set gxout barb'
'set ccolor 1'
'set gxout vector'
'd qus;qvs'
'cbarn 1.2 0'
'draw title 1000-300hpa vapor flux and divergence'
'printim E:\GrADS\test\44.png white x2000 y1800'
'disable print'
|
-
grads出图
-
|