Tool 07
ET models / 蒸散模式
作者:方煒,臺灣大學生物機電工程學系名譽教授 | 網頁實作協作:ChatGPT 5.4 與 Codex
依據上傳的 MATLAB 程式 etmodel.m 整理而成,保留原始程式中的空氣狀態推導,並比較 8 種蒸散模式的結果。
Tool 07
作者:方煒,臺灣大學生物機電工程學系名譽教授 | 網頁實作協作:ChatGPT 5.4 與 Codex
依據上傳的 MATLAB 程式 etmodel.m 整理而成,保留原始程式中的空氣狀態推導,並比較 8 種蒸散模式的結果。
Worksheet mode
蝚砌?撘萄極雿”?渡???MATLAB 隞??16 ???賂?? 9 ?撓?亥? 7 ?撠潘??其??舀?敺 8 ???芋撘?/p>
Core equations
rs = 140.9 + 703 × exp(-0.013 × Rn);rs:氣孔阻力λ = 2502535.259 - 2385.76 × Tdb;λ:汽化潛熱ρ = 100000 / 287 / (Tdb + 273.16);ρ:空氣密度pws = 6.11 × exp(17.4 × Tdb / (239 + Tdb));pws:飽和蒸汽壓,單位為 mbares = pws × 100;es:Tdb 下的飽和蒸汽壓e = RH / 100 × es;e:實際蒸汽壓δ = 41.45 × exp(0.06088 × Tdb);δ:飽和蒸汽壓曲線斜率γ = cp / λ × Patm / 0.6219;γ:濕球常數γc = γ × (1 + rs / rw) + δ;γc:修正濕球常數ratio = δ / γ;ratio:斜率比dT = (es - e) / γ;dT:(es - e) / γ 的溫度當量此處 cp = 1006 J/kg/°C,Patm = 101325 Pa。頁面亦用數值法求解濕球溫度 Twb,並以 WBD = Tdb - Twb 表示濕球溫差。
Worksheet mode
蝚砌?撘萄極雿”?? MATLAB 蝔?銝剔? 8 ???芋撘??銝?湔撘?頛詨 ET rate ??latent heat flux??/p>
Core equations
Penman: E = [帤(Rn-G) + 帠繚0.001157繚(1+0.53U)(es-e)] / [(帤+帠)弇]P-M: E = [帤(Rn-G) + ?cp(es-e)/rw] / [帠(1+rs/rw)+帤] / 弇P-M by Tl: E = ?cp(estl-e) / [帠(rs+rw)弇]Fynn: E = [帤繚CAI(Rn-G) + 2LAI?cp(es-e)/rw] / [帠(1+rs/rw)+帤] / 弇Stanghellini: ?誑 radiative resistance 靽格迤 Rn嚗?隞? P-M ??瘙?ERule of thumb: E = (0.35Is + 30) / 弇Fang (Rn,G,WBD): ?? NTU ?????? LHF ??EFang (Tl,WBD): 隞?Eff = (Tdb-Tl)/WBD 隞?? LHF 撘?/li>