From 17cc8483ef87eb1bcb849923889d6430cdaf1ad3 Mon Sep 17 00:00:00 2001
From: Henry Weller <http://cfd.direct>
Date: Sat, 5 Dec 2015 16:12:57 +0000
Subject: [PATCH] saturationModels/Antoine: Corrected dimensions in Tsat
Resolves bug-report http://www.openfoam.org/mantisbt/view.php?id=1940
---
.../saturationModels/Antoine/Antoine.C | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/applications/solvers/multiphase/reactingEulerFoam/interfacialCompositionModels/saturationModels/Antoine/Antoine.C b/applications/solvers/multiphase/reactingEulerFoam/interfacialCompositionModels/saturationModels/Antoine/Antoine.C
index 90f1c989c52..b5b0629df18 100644
--- a/applications/solvers/multiphase/reactingEulerFoam/interfacialCompositionModels/saturationModels/Antoine/Antoine.C
+++ b/applications/solvers/multiphase/reactingEulerFoam/interfacialCompositionModels/saturationModels/Antoine/Antoine.C
@@ -95,7 +95,9 @@ Foam::saturationModels::Antoine::Tsat
const volScalarField& p
) const
{
- return B_/(log(p) - A_) - C_;
+ return
+ B_/(log(p*dimensionedScalar("one", dimless/dimPressure, 1)) - A_)
+ - C_;
}
--
GitLab