- 积分
- 8250
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2012-5-1
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
本帖最后由 占戈示申 于 2014-5-7 18:19 编辑
逐年的水汽通量输送图我画出来了,现在想画这些年的平均图,在线等。
'sdfopen d:\nc\air.mon.mean.nc''sdfopen d:\nc\rhum.mon.mean.nc'
'sdfopen d:\nc\uwnd.mon.mean.nc'
'sdfopen d:\nc\vwnd.mon.mean.nc'
'set mpdset cnworld'
'set lon 65 100'
'set lat 30 50'
'set lev 500'
i=10while(i<=600)
'enable print C:\Users\Administrator\Desktop\1\10.gmf'
'set t 'i''
'set grads off'
'set grid off'
'define p=lev'
'define e=exp(17.67*(air-273.15)/(air-29.65))*(rhum.2/100)*6.112'
'define q=622*e/(p-0.378*e)'
'define q1=uwnd.3*q/9.8'
'define q2=vwnd.4*q/9.8'
'set gxout shaded'
'set cmin 2'
'd mag(q1,q2)'
*'set gxout barb'
'd uwnd.3;vwnd.4'
*'run cbarn.gs'
'print'
'c'
i=i+12
endwhile
'disable print'
;
|
-
-
123.gs
656 Bytes, 下载次数: 6, 下载积分: 金钱 -5
|