From 04064d110be5bb9113dd309e7479a936c2e86c8a Mon Sep 17 00:00:00 2001
From: andy <a.heather@opencfd.co.uk>
Date: Tue, 19 May 2009 15:03:00 +0100
Subject: [PATCH] fixed: wrong calculation of H1

---
 .../intermediate/parcels/Templates/ThermoParcel/ThermoParcel.C  | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/lagrangian/intermediate/parcels/Templates/ThermoParcel/ThermoParcel.C b/src/lagrangian/intermediate/parcels/Templates/ThermoParcel/ThermoParcel.C
index 6a476110dd6..5885512511a 100644
--- a/src/lagrangian/intermediate/parcels/Templates/ThermoParcel/ThermoParcel.C
+++ b/src/lagrangian/intermediate/parcels/Templates/ThermoParcel/ThermoParcel.C
@@ -110,7 +110,7 @@ void Foam::ThermoParcel<ParcelType>::calc
     scalar T1 = calcHeatTransfer(td, dt, cellI, d0, U0, rho0, T0, cp0, Sh);
 
     // Calculate new enthalpy state
-    scalar H1 = cp0 - T1;
+    scalar H1 = cp0*T1;
 
 
     // Motion
-- 
GitLab