- 积分
- 141
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2012-3-1
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
我尝试使用NCEP/NCAR再分析资料画walker环流,使用到的资料有uwnd.mon.mean.nc和omega.mon.mean.nc,walker环流的计算思路是:1、求各格点上uwnd和omega的多年平均值(1981-2010年),2、求各月份uwnd和omega的距平值,3、求步骤2结果的5S-5N的平均值,4画出50E-60W的经度-高度风场距平剖面图(grads中输入命令为:d uwnd;-omega.2*1000)。grads处理程序如下:
*************************************************************************************
'reinit'
'sdfopen E:/NCEP/a/E/paper/TC/WS/uwnd.mon.mean.nc'
*-- 写入文件 --*
'set gxout fwrite'
'set fwrite E:/NCEP/a/E/paper/TC/WS/uwnd.mon.lon_alt.anom.dat'
'set x 1 144'
'set y 1 73'
z0=1
while(z0<=12)
'set z 'z0
*-----求1981-2010年气候月平均-----*
'define jan=ave(uwnd,t=397,t=756,12)'
'define feb=ave(uwnd,t=398,t=756,12)'
'define mar=ave(uwnd,t=399,t=756,12)'
'define apr=ave(uwnd,t=400,t=756,12)'
'define may=ave(uwnd,t=401,t=756,12)'
'define jun=ave(uwnd,t=402,t=756,12)'
'define jul=ave(uwnd,t=403,t=756,12)'
'define aug=ave(uwnd,t=404,t=756,12)'
'define sep=ave(uwnd,t=405,t=756,12)'
'define oct=ave(uwnd,t=406,t=756,12)'
'define nov=ave(uwnd,t=407,t=756,12)'
'define dec=ave(uwnd,t=408,t=756,12)'
*-----求从1948年至最新月份的逐月距平值-----*
t0=1
while(t0<=795)
'set t 't0
if(math_mod(t0,12)=1)
'define u=ave(uwnd-jan,lat=-5,lat=5)'
endif
if(math_mod(t0,12)=2)
'define u=ave(uwnd-feb,lat=-5,lat=5)'
endif
if(math_mod(t0,12)=3)
'define u=ave(uwnd-mar,lat=-5,lat=5)'
endif
if(math_mod(t0,12)=4)
'define u=ave(uwnd-apr,lat=-5,lat=5)'
endif
if(math_mod(t0,12)=5)
'define u=ave(uwnd-may,lat=-5,lat=5)'
endif
if(math_mod(t0,12)=6)
'define u=ave(uwnd-jun,lat=-5,lat=5)'
endif
if(math_mod(t0,12)=7)
'define u=ave(uwnd-jul,lat=-5,lat=5)'
endif
if(math_mod(t0,12)=8)
'define u=ave(uwnd-aug,lat=-5,lat=5)'
endif
if(math_mod(t0,12)=9)
'define u=ave(uwnd-sep,lat=-5,lat=5)'
endif
if(math_mod(t0,12)=10)
'define u=ave(uwnd-oct,lat=-5,lat=5)'
endif
if(math_mod(t0,12)=11)
'define u=ave(uwnd-nov,lat=-5,lat=5)'
endif
if(math_mod(t0,12)=0)
'define u=ave(uwnd-dec,lat=-5,lat=5)'
endif
'd u'
t0=t0+1
endwhile
z0=z0+1
endwhile
'disable fwrite'
'reinit'
我的问题是:我画2014年3月的walker环流对比气候中心的相同月份的walker环流,结果相差很远,请问大虾,我上面的walker环流算法是否正确,如果不正确,该如何计算walker环流呢?
下图:左图为我自己画的50E-60W的经度-高度风场距平剖面图,右图为气候中心网站上的图
|
|