github/CoolProp
1
1
Fork 0
mirror of https://github.com/CoolProp/CoolProp.git synced 2026-01-09 14:08:08 -05:00
Code Issues Packages Projects Releases Wiki Activity

Fix bug with humid air properties; Closes #389

Browse Source 
Signed-off-by: Ian Bell <ian.h.bell@gmail.com>
This commit is contained in:
Ian Bell
2015-01-07 14:02:34 -07:00
parent 082f365416
commit f7cb65305a
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/HumidAirProp.cpp
View File

@@ -445,10 +445,10 @@ double f_factor(double T, double p)
if (T>273.16)
{
// It is liquid water
p_ws=CoolProp::PropsSI("P","T",T,"Q",0,"Water");
beta_H = HenryConstant(T); //[1/Pa]
Water->update(CoolProp::PT_INPUTS, p, T);
Water->update(CoolProp::QT_INPUTS, 0, T);
p_ws = Water->p();
vbar_ws = 1.0/Water->keyed_output(CoolProp::iDmolar); //[m^3/mol]
beta_H = HenryConstant(T); //[1/Pa]
}
else
{
@@ -853,7 +853,7 @@ double DewpointTemperature(double T, double p, double psi_w)
// 611.65... is the triple point pressure of water in Pa
if (p_w > 611.6547241637944){
Water->update(CoolProp::PQ_INPUTS, p, 1.0);
T0 = Water->keyed_output(CoolProp::iT);
T0 = Water->T()-1;
}
else{
T0 = 268;