- 积分
- 69
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2017-9-20
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2017-12-6 10:52:54
|
显示全部楼层
'reinit'
'set grid off'
'set grads off'
'sdfopen h:\shum.mon.mean.nc'
'sdfopen h:\pres.mon.mean.nc'
'set lon 96 105'
'set lat 36 43'
'set z 1 8'
'set t 1 828'
'set z 1'
'define sqhl=vint(pres.2(z=1),shum.1/1000,300)'
'set t 1 12'
'define w=ave(sqhl,t+0,t+828,12)'
i=1
while(i<=12)
'set t 'i''
'set gxout contour'
'd w'
'draw title 2010154 w (unit:mm)'
'printim h:\'i'mon.tif white'
'print'
'c'
i=i+1
endwhile
'disable print'
;
|
|