- 积分
- 30
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2013-9-23
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
这是自己根据手册和论坛里编写的脚本写的,但是无法运行。请教高手该如何修改!!!
资料采用NECP再分析月分析数据做出1986-2003年中国夏季(6-8月)平均整层水汽通量的图。
是时间编写出了问题吗?
'reinit'
'set grid off'
'set grads off'
'set poli on'
'set parea 1 10 1 8'
'sdfopen D:\GrADS\shum.mon.mean.nc'
'sdfopen D:\GrADS\uwnd.mon.mean.nc'
'sdfopen D:\GrADS\vwnd.mon.mean.nc'
'sdfopen D:\GrADS\pres.mon.mean.nc'
'set lat 4 53'
'set lon 73 135'
'set ccols 9 14 4 11 5 13 3 10 7 12 8 2 6'
'set mpdset cnworld hires'
'set map 1 1 1'
'draw map'
'set ylopts 1 4 0.12'
'set xlopts 1 4 0.12'
'set cthick 4'
'set z 1 8'
'define qu=uwnd*shum/9.8'
'define qv=vwnd*shum/9.8'
'set z 1'
'set t 456 660'
'define uqs=vint(pres(z=1),qu,300)/1000'
'define vqs=vint(pres(z=1),qv,300)/1000'
'define sq=mag(uqs,vqs)'
'set t 6 8'
'define sq1=ave(sq,t=456,t=660,12)'
'modify sq1 seasonal'
'define sq2=sum(sq1,t=462,t=464)'
'd sq2'
'run cbarn'
'draw title 1986-2003 year summer average vapor flux china'
'printim D:\GrADS.gmf x1000 y800 white'
|
|