- 积分
- 1324
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2012-4-27
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
参考了好几个帖子的计算方法,总算算出来了,代码如下:
pre_levels = 850
tmp_ave = 10.
rhum_ave = 10^((7.5*6)/(237.3+6)) / 10^((7.5*10)/(237.3+10)) *100
es = where( tmp_ave.lt.0, 6.112*exp(17.67* tmp_ave /( tmp_ave +243.5)),\
6.11*10^(7.5* tmp_ave /( tmp_ave +237.3)) )
q = rhum_ave * (0.62197*es/( pre_levels - 0.378*es))/100.
e = pre_levels * q/(0.62197+q)+10^(-10)
tlcl = 55.0+2840.0/(3.5*log(tmp_ave +273.15)-log(e)-4.805)
theta = ( tmp_ave +273.15)*(1000. / pre_levels )^(0.2854*(1.0-0.28*q))
eqt = theta*exp(((3376./tlcl)-2.54)*q*(1.0+0.81*q)) ;假相当位温
主要考虑了 es 在0℃的分界,结果与《气象常用参数和物理量查算表》中的结果一致:
|
-
示例
评分
-
查看全部评分
|