- 积分
- 269
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2016-4-6
- 最后登录
- 1970-1-1
|
GrADS
系统平台: |
grads |
问题截图: |
- |
问题概况: |
在论坛里找了一个求水汽通量的gs,帖子比较老,我用gs确实画出图来了,可是不知道自己d出来的变量代表什么,这个gs与其他求水汽通量的gs好像也不太一样,希望大神帮我看看这个程序是否正确,d出来的两个变量代表什么。我要求的是2015年6月23日至7月16日的整层水汽通量 |
我看过提问的智慧: |
看过 |
自己思考时长(天): |
2 |
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
'reinit'
'sdfopen E:\uwind\uwnd.2015.nc'*纬向风
'sdfopen E:\vwind\vwnd.2015.nc'*经向风
'sdfopen E:\shum\shum.2015.nc'*相对湿度
'enable print e:\sy1\ma.gmf'
i=693
while(i<=788)
'set lon 50 170'
'set lat 0 80'
'set z 8'
'define dqx=cdiff(shum.3,x)'
'define dqy=cdiff(shum.3,y)'
'define dx=cdiff(lon,x)*3.1416/180'
'define dy=cdiff(lat,y)*3.1416/180'
'define sq=-(1.0/9.8))*((uwnd*dqx)/(cos(lat*3.1416/180)*dx)+vwnd.2*dqy/dy)/6.37E6'
'define uwind=uwnd*shum.3'
'define vwind=vwnd.2*shum.3'
'c'
i=i+1
endwhile
'define pj=ave(sq,t=693,t=788,1)'
'set lon 60 160'
'set lat 10 60'
'set z 9'
'set grid off'
'set grads off'
'set mpdset cnriver'
'set gxout shaded'
'd pj*1000000000'
'cbarn'
'define u=ave(uwind,t=693,t=788,1)'
'define v=ave(vwind,t=693,t=788,1)'
'set gxout vectour'
'd u;v'
'draw title Moisture Advection'
'print'
'disable print'
;
*****************************************************************************************************
嫌我自己改的啰嗦的,这里呈上原程序
'reinit'
'sdfopen E:\data\reanalysisdata\u.nc'
'sdfopen E:\data\reanalysisdata\v.nc'
'sdfopen E:\data\reanalysisdata\sh.nc'
'set gxout shaded'
'set lon 105 145'
'set lat 10 40'
'set t 23'
'set z 9'
'define dqx=cdiff(q.3,x)'
'define dqy=cdiff(q.3,y)'
'define dx=cdiff(lon,x)*3.1416/180'
'define dy=cdiff(lat,y)*3.1416/180'
'd -(1.0/9.8))*((u.1*dqx)/(cos(lat*3.1416/180)*dx)+v.2*dqy/dy)/6.37E6'
'cbarn 0.5 1'
'set gxout vector'
*'set gxout stream'
*'define u=u.1*q.3'
*'define v=v.2*q.3'
d skip(u.1*q.3,4);skip(v.2*q.3,4)'
*'d u;v'
'draw title Moisture Advection'
'printim E:\picture\MoistureAdvection23,9.png white'
;
|
-
|