- 积分
- 28058
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2013-9-27
- 最后登录
- 1970-1-1
|
GrADS
系统平台: |
|
问题截图: |
- |
问题概况: |
grads编程卡住了 |
我看过提问的智慧: |
看过 |
自己思考时长(天): |
2 |
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
在写毕业论文,写到while这卡住了,求告知问题出在哪,GS文件是这样的,这是求水汽通量和散度的,如果哪位学长学姐有空的话,希望能够多多指导 'reinit'
'sdfopen e:\uwnd.mon.mean.nc'
'sdfopen e:\vwnd.mon.mean.nc'
'sdfopen e:\shum.mon.mean.nc'
'sdfopen e:\pres.mon.mean.nc'
'set gxout fwrite'
'set fwrite f:\ncep\qiuquv\quv.grd'
******Compute the vapor flux and divergence******
t=1
while(t<=16436)
'set t ' t
'set x 1 144'
'set y 1 73'
'set z 1'
'define qu=vint(pres.4/100,q.3*u.1,300)'
'define qv=vint(pres.4/100,q.3*v.2,300)'
*unit:kg/(m.s)
'define div=hdivg(qu,qv)'
*unit:kg/(m.m.s)
'd qu'
'd qv'
'd div'
t=t+1
endwhile
'disable fwrite'
|
|