- 积分
- 5027
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2013-2-1
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
本帖最后由 莎朗嘿哟YY 于 2013-4-24 16:19 编辑
生成的ctl:
dset E:/fnl/fnl_20120617_00_00_c
index E:/fnl/fnl_20120617_00_00_c.idx
undef 9.999E+20
title E:/fnl/fnl_20120617_00_00_c
* produced by grib2ctl v0.9.12.5p33k
dtype grib 3
options yrev
ydef 181 linear -90.000000 1
xdef 360 linear 0.000000 1.000000
tdef 1 linear 00Z17jun2012 1mo
zdef 26 levels
1000 975 950 925 900 850 800 750 700 650 600 550 500 450 400 350 300 250 200 150 100 70 50 30 20 10
vars 121
配套的gs
'reinit'
'open e:/fnl/1.ctl'
'enable print e:\fnl\61700k.gmf'
'set lon 50 160'
'set lat 10 70'
'set lev 850'
'define T850=tmpprs-273.16'
'define RH=rhprs'
'define Td850=T850-((14.55+0.114*T850)*(1-0.01*rh) + pow((2.5+0.007*T850)*(1-0.01*rh),3) + (15.9+0.117*T850)*pow((1-0.01*rh),14))'
'set lev 700'
'define T700=tmpprs-273.16'
'define RH=rhprs'
'define Td700=T700-((14.55+0.114*T700)*(1-0.01*rh) + pow((2.5+0.007*T700)*(1-0.01*rh),3) + (15.9+0.117*T700)*pow((1-0.01*rh),14))'
'set lev 500'
'define T500=tmpprs-273.16'
'define K=T850-T500+Td850-(T700-Td700)'
'set cint 2.5'
'set cthick 6'
'd k'
'draw title K on 17,JUN 00'
'print'
'disable print'
;
出来的图如下:
请大神帮我看一下!谢谢!!!
|
|