- 积分
- 385
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2014-2-25
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
想画斜剖面,找了帖子来看。不是很懂原理,但是照着别人的gs画出了图,如图一所示。感觉应该不对,我画的填色是相对湿度,不应该只有低层才有。画经向剖面如图2,斜剖面和经向剖面差别太大。请问是什么地方有问题?'reinit'
'open h:\yanjiu\dealdata\omega200205.ctl'
'open h:\yanjiu\dealdata\rhum200205.ctl'
'open H:\yanjiu\200202\front\2002sitase.ctl'
'enable print h:\yanjiu\writing\wrxie.gmf'
i=10
while(i<=13)
'set xlopts 1 4 0.18'
'set ylopts 1 4 0.18'
'set font 1'
'set grid off'
'set grads off'
'set csmooth on'
'set zlog on'
'set x 1'
'set y 1'
'set t 'i''
'set lev 1000 100'
lon1 = 95.0
lon2 = 100
lat1 = 16.0
lat2 = 26
lon = lon1
'collect 1 free'
'collect 2 free'
'collect 3 free'
while (lon <= lon2)
lat = lat1 + (lat2-lat1)*(lon-lon1) / (lon2-lon1)
'collect 1 gr2stn(omega,'lon','lat')'
'collect 2 gr2stn(rhum.2,'lon','lat')'
'collect 3 gr2stn(sitase.3,'lon','lat')'
lon = lon + 1
endwhile
'set xlabs 16N,95E|19N,98E|22N,101E|25N,104E|28N,107E'
'set lon 80 120'
'set clab on'
'set gxout shaded'
'color 70 90 10 -kind white->limegreen->forestgreen'
*'set ccols 0 0 7 0'
'd coll2gr(2,-u)'
'cbarn'
'set gxout contour'
'set cstyle 3'
'set ccolor 1'
'set cthick 8'
'set cmax 0'
'set cint 0.1'
'd coll2gr(1,-u)'
'set gxout contour'
*'set clopts -1 -1 0.15'
'set cint 3'
'set ccolor 2'
'd coll2gr(3,-u)'
'print'
'c'
i=i+1
endwhile
'disable print'
'reinit'
|
-
-
|