- 积分
- 45199
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2012-8-28
- 最后登录
- 1970-1-1
|
发表于 2015-7-20 21:50:49
|
显示全部楼层
我也更新一个和王老师一样的最终版本吧。脚本如下:
'reinit'
'set grid off'
'set grads off'
'sdfopen G:\ncep\2011\air.2011.nc'
'sdfopen G:\ncep\2011\uwnd.2011.nc'
'sdfopen G:\ncep\2011\vwnd.2011.nc'
'set t 174'
'set lev 1000'
'pi=3.1416'
'dtx = cdiff(air, 'x')'
'dty = cdiff(air, 'y')'
'dx = cdiff(lon, x) * pi/ 180'
'dy = cdiff(lat, y) * pi/ 180'
'tadv = -1*((uwnd.2*dtx)/(cos(lat*pi/180)*dx)+vwnd.3*dty/dy)/6.37e6'
'run G:\GrADS-NCL-colormaker-v1.1\output\8colors.gs'
'set gxout shaded'
'd tadv'
'run cbar_interp.gs 1 1 0'
'draw title Temporature advection(2011-06-23)'
'gxprint g:/adtv.png white'
;
最终出图如下:
|
|