- 积分
- 3548
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2014-9-29
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
本帖最后由 zxholystar 于 2014-10-21 12:33 编辑
我有6个变量abcdef,想画qnet=d+e-a-b-c-f,但为什么把qnet生成一个grd文件画出的图形比不写grd直接画出的图形要明显向东偏移很多?因为模式比较多,所以我还是想生成一个grd文件。实在不知道为什么会这样第二张图为生成grd文件后画出的,明显漂移,第一张图是不生成grd直接画出
生成qnet.grd的gs
'reinit'
'set gxout fwrite'
'set fwrite E:\MIROC5-net.grd'
'open E:\25\MIROC5\1\hfls25.ctl'
'define A=ave(hfls.1,t=1,t=360)'
'open E:\25\MIROC5\1\hfss25.ctl'
'define B=ave(hfss.2,t=1,t=360)'
'open E:\25\MIROC5\1\rlus25.ctl'
'define C=ave(rlus.3,t=1,t=360)'
'open E:\25\MIROC5\1\rlds25.ctl'
'define D=ave(rlds.4,t=1,t=360)'
'open E:\25\MIROC5\1\rsds25.ctl'
'define E=ave(rsds.5,t=1,t=360)'
'open E:\25\MIROC5\1\rsus25.ctl'
'define F=ave(rsus.6,t=1,t=360)'
'define qnet=d+e-a-b-c-f'
'd qnet'
'disable fwrite'
生成的qnet.grd的ctl
dset E:\MIROC5-net.grd
undef 32766
title MIROC5-net
xdef 144 linear 0 2.5
ydef 73 linear -90 2.5
zdef 1 levels 0 0
tdef 1 linear 00z01JUL1979 1mon
vars 1
qnet 0 -999 net heat flux 1979-2000
endvars
直接画出的gs
'reinit'
'open E:\25\MIROC5\1\hfls25.ctl'
'define A=ave(hfls.1,t=1,t=360)'
'open E:\25\MIROC5\1\hfss25.ctl'
'define B=ave(hfss.2,t=1,t=360)'
'open E:\25\MIROC5\1\rlus25.ctl'
'define C=ave(rlus.3,t=1,t=360)'
'open E:\25\MIROC5\1\rlds25.ctl'
'define D=ave(rlds.4,t=1,t=360)'
'open E:\25\MIROC5\1\rsds25.ctl'
'define E=ave(rsds.5,t=1,t=360)'
'open E:\25\MIROC5\1\rsus25.ctl'
'define F=ave(rsus.6,t=1,t=360)'
'define qnet=d+e-a-b-c-f'
'set gxout shaded'
'set clevs -150 -120 -90 -60 -30 0 30 60 90 120 150 180'
'set ccols 9 14 4 11 5 13 3 10 7 12 8 2'
'd qnet'
|
-
-
|