From fc3377845125487652c41a03b464a783724f8cb1 Mon Sep 17 00:00:00 2001 From: Ray Speth Date: Tue, 10 May 2016 22:16:46 -0400 Subject: [PATCH] Use correct value for gas constant Even if it's just for part of an initial guess --- src/tpx/Sub.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/tpx/Sub.cpp b/src/tpx/Sub.cpp index bfc646f95..b6c9b0663 100644 --- a/src/tpx/Sub.cpp +++ b/src/tpx/Sub.cpp @@ -299,7 +299,7 @@ void Substance::update_sat() double gf = hp() - T*sp(); if (i==0) { - Rho = pp*MolWt()/(8314.0*T); // trial value = ideal gas + Rho = pp*MolWt()/(GasConstant*T); // trial value = ideal gas } else { Rho = Rhv; }