- 积分
- 34
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2011-12-1
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
我求的挑出的八年的夏季水汽通量,资料是2.5的ncep一日一次的资料,,所用u,v,shum,pres已经求了平均,是八层一个时刻的值,所用程序如下,画出的图不对,值很小很小,输送形势也不对,求助。。。。。
'reinit'
'open e:\han\u.ctl'
'open e:\han\v.ctl'
'open e:\han\shum.ctl'
'open e:\han\pres.ctl'
'set gxout fwrite'
'set fwrite e:\han\quvmag.grd'
'set lat -90 90'
'set lon 0 360'
iz=1
while(iz<=8)
'set z 'iz''
'define qu=u*sh.3/9.8/1000'
'd qu'
'define qv=v.2*sh.3/9.8/1000'
'd qv'
iz=iz+1
endwhile
'd vint(pres.4,qu,300)'
'd vint(pres.4,qv,300)'
'disable fwrite'
'reinit' |
|