diff --git a/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/PhaseSystems/HeatTransferPhaseSystem/HeatTransferPhaseSystem.C b/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/PhaseSystems/HeatTransferPhaseSystem/HeatTransferPhaseSystem.C
index 95636c37497b6bea8e2cd234483dd0f891f8c699..07b41eb77109d58fc0fc99c4a2cac2d4b940e65f 100644
--- a/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/PhaseSystems/HeatTransferPhaseSystem/HeatTransferPhaseSystem.C
+++ b/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/PhaseSystems/HeatTransferPhaseSystem/HeatTransferPhaseSystem.C
@@ -57,6 +57,16 @@ Foam::HeatTransferPhaseSystem<BasePhaseSystem>::~HeatTransferPhaseSystem()
// * * * * * * * * * * * * * * Member Functions * * * * * * * * * * * * * * //
+template<class BasePhaseSystem>
+bool Foam::HeatTransferPhaseSystem<BasePhaseSystem>::transfersMass
+(
+ const phaseModel& phase
+) const
+{
+ return false;
+}
+
+
template<class BasePhaseSystem>
Foam::tmp<Foam::volScalarField>
Foam::HeatTransferPhaseSystem<BasePhaseSystem>::dmdt
diff --git a/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/PhaseSystems/HeatTransferPhaseSystem/HeatTransferPhaseSystem.H b/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/PhaseSystems/HeatTransferPhaseSystem/HeatTransferPhaseSystem.H
index cef3b696bd630026e49ea3188e9e703bd6763f5f..0c908239fdb9a18f451a305c35d8f6f47584aa03 100644
--- a/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/PhaseSystems/HeatTransferPhaseSystem/HeatTransferPhaseSystem.H
+++ b/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/PhaseSystems/HeatTransferPhaseSystem/HeatTransferPhaseSystem.H
@@ -89,6 +89,9 @@ public:
// Member Functions
+ //- Return true if there is mass transfer for phase
+ virtual bool transfersMass(const phaseModel& phase) const;
+
//- Return the interfacial mass flow rate
virtual tmp<volScalarField> dmdt
(
diff --git a/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/reactionThermo/hRefConstThermos.C b/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/reactionThermo/hRefConstThermos.C
index 76c2351109c5992a98683017399734db22e64e3f..f43303a2b7ecb5671e0fc962bc25e8d80a58e60b 100644
--- a/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/reactionThermo/hRefConstThermos.C
+++ b/applications/solvers/multiphase/reactingEulerFoam/phaseSystems/reactionThermo/hRefConstThermos.C
@@ -254,6 +254,16 @@ makeReactionMixtureThermo
);
+makeReactionMixtureThermo
+(
+ rhoThermo,
+ rhoReactionThermo,
+ heRhoThermo,
+ multiComponentMixture,
+ constRefGasHThermoPhysics
+);
+
+
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
} // End namespace Foam
diff --git a/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/multiphaseSystem/multiphaseSystem.C b/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/multiphaseSystem/multiphaseSystem.C
index a79e9393b5aeefbff98ee7e8e555ffb9d5e8cd82..5512fd655999faf20d8745b1bd65df923a560fed 100644
--- a/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/multiphaseSystem/multiphaseSystem.C
+++ b/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/multiphaseSystem/multiphaseSystem.C
@@ -515,12 +515,6 @@ Foam::multiphaseSystem::~multiphaseSystem()
// * * * * * * * * * * * * * * Member Functions * * * * * * * * * * * * * * //
-bool Foam::multiphaseSystem::transfersMass(const phaseModel& phase) const
-{
- return false;
-}
-
-
Foam::tmp<Foam::surfaceScalarField> Foam::multiphaseSystem::surfaceTension
(
const phaseModel& phase1
diff --git a/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/multiphaseSystem/multiphaseSystem.H b/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/multiphaseSystem/multiphaseSystem.H
index a9390f2589e663208307710e40fea97525ebb6d7..e33bf8c4878053847d4cae31fa2f0e79d551eb82 100644
--- a/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/multiphaseSystem/multiphaseSystem.H
+++ b/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/multiphaseSystem/multiphaseSystem.H
@@ -176,7 +176,7 @@ public:
) const = 0;
//- Return true if there is mass transfer for phase
- virtual bool transfersMass(const phaseModel& phase) const;
+ virtual bool transfersMass(const phaseModel& phase) const = 0;
//- Return the total interfacial mass transfer rate for phase
virtual tmp<volScalarField> dmdt(const phaseModel& phase) const = 0;
diff --git a/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/pU/pEqn.H b/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/pU/pEqn.H
index 230b6501065de90b0c637c74956de6d16aba6f44..2703d75ef1f6b2da04bb0d86ca4cb24368730ad1 100644
--- a/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/pU/pEqn.H
+++ b/applications/solvers/multiphase/reactingEulerFoam/reactingMultiphaseEulerFoam/pU/pEqn.H
@@ -357,11 +357,15 @@ while (pimple.correct())
{
if (pEqnComps.set(phasei))
{
- pEqnComps[phasei] -= fluid.dmdt(phase);
+ pEqnComps[phasei] -= fluid.dmdt(phase)/rho;
}
else
{
- pEqnComps.set(phasei, fvm::Su(-fluid.dmdt(phase), rho));
+ pEqnComps.set
+ (
+ phasei,
+ fvm::Su(-fluid.dmdt(phase)/rho, p_rgh)
+ );
}
}
}
diff --git a/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/pU/pEqn.H b/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/pU/pEqn.H
index c8a9e282889f2f1c2e555b0bc7d29711456cb2f2..1af167cc408c840c489deaf8125ab8a77ddee260 100644
--- a/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/pU/pEqn.H
+++ b/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/pU/pEqn.H
@@ -247,7 +247,7 @@ while (pimple.correct())
pEqnComp1 =
(
- phase1.continuityError() - fluid.dmdt()
+ phase1.continuityError()
- fvc::Sp(fvc::ddt(alpha1) + fvc::div(alphaPhi1), rho1)
)/rho1
+ (alpha1/rho1)*correction
@@ -270,7 +270,7 @@ while (pimple.correct())
pEqnComp2 =
(
- phase2.continuityError() + fluid.dmdt()
+ phase2.continuityError()
- fvc::Sp(fvc::ddt(alpha2) + fvc::div(alphaPhi2), rho2)
)/rho2
+ (alpha2/rho2)*correction
@@ -288,7 +288,7 @@ while (pimple.correct())
{
pEqnComp1 =
(
- phase1.continuityError() - fluid.dmdt()
+ phase1.continuityError()
- fvc::Sp(fvc::ddt(alpha1) + fvc::div(alphaPhi1), rho1)
)/rho1
+ (alpha1*psi1/rho1)*correction(fvm::ddt(p_rgh));
@@ -298,13 +298,34 @@ while (pimple.correct())
{
pEqnComp2 =
(
- phase2.continuityError() + fluid.dmdt()
+ phase2.continuityError()
- fvc::Sp(fvc::ddt(alpha2) + fvc::div(alphaPhi2), rho2)
)/rho2
+ (alpha2*psi2/rho2)*correction(fvm::ddt(p_rgh));
}
}
+ if (fluid.transfersMass())
+ {
+ if (pEqnComp1.valid())
+ {
+ pEqnComp1() -= fluid.dmdt()/rho1;
+ }
+ else
+ {
+ pEqnComp1 = fvm::Su(-fluid.dmdt()/rho1, p_rgh);
+ }
+
+ if (pEqnComp2.valid())
+ {
+ pEqnComp2() += fluid.dmdt()/rho2;
+ }
+ else
+ {
+ pEqnComp2 = fvm::Su(fluid.dmdt()/rho2, p_rgh);
+ }
+ }
+
// Cache p prior to solve for density update
volScalarField p_rgh_0(p_rgh);
diff --git a/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/pUf/pEqn.H b/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/pUf/pEqn.H
index c3f7d472fa867497f1cdc3b0bef02b5ac3333096..e2edf14bed061f0bbc3e530839bb961ef4065163 100644
--- a/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/pUf/pEqn.H
+++ b/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/pUf/pEqn.H
@@ -231,7 +231,7 @@ while (pimple.correct())
{
pEqnComp1 =
(
- phase1.continuityError() - fluid.dmdt()
+ phase1.continuityError()
- fvc::Sp(fvc::ddt(alpha1) + fvc::div(alphaPhi1), rho1)
)/rho1
+ (alpha1/rho1)*correction
@@ -247,7 +247,7 @@ while (pimple.correct())
{
pEqnComp2 =
(
- phase2.continuityError() + fluid.dmdt()
+ phase2.continuityError()
- fvc::Sp(fvc::ddt(alpha2) + fvc::div(alphaPhi2), rho2)
)/rho2
+ (alpha2/rho2)*correction
@@ -265,7 +265,7 @@ while (pimple.correct())
{
pEqnComp1 =
(
- phase1.continuityError() - fluid.dmdt()
+ phase1.continuityError()
- fvc::Sp(fvc::ddt(alpha1) + fvc::div(alphaPhi1), rho1)
)/rho1
+ (alpha1*psi1/rho1)*correction(fvm::ddt(p_rgh));
@@ -275,13 +275,34 @@ while (pimple.correct())
{
pEqnComp2 =
(
- phase2.continuityError() + fluid.dmdt()
+ phase2.continuityError()
- fvc::Sp(fvc::ddt(alpha2) + fvc::div(alphaPhi2), rho2)
)/rho2
+ (alpha2*psi2/rho2)*correction(fvm::ddt(p_rgh));
}
}
+ if (fluid.transfersMass())
+ {
+ if (pEqnComp1.valid())
+ {
+ pEqnComp1() -= fluid.dmdt()/rho1;
+ }
+ else
+ {
+ pEqnComp1 = fvm::Su(-fluid.dmdt()/rho1, p_rgh);
+ }
+
+ if (pEqnComp2.valid())
+ {
+ pEqnComp2() += fluid.dmdt()/rho2;
+ }
+ else
+ {
+ pEqnComp2 = fvm::Su(fluid.dmdt()/rho2, p_rgh);
+ }
+ }
+
// Cache p prior to solve for density update
volScalarField p_rgh_0("p_rgh_0", p_rgh);
diff --git a/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/twoPhaseSystem/twoPhaseSystem.C b/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/twoPhaseSystem/twoPhaseSystem.C
index 187ca4c23882b41ce9b8df4eb11b3c05740fc4a2..7b7ddee6f49d622ff4068791a0bc7b3d3ec6b2fa 100644
--- a/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/twoPhaseSystem/twoPhaseSystem.C
+++ b/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/twoPhaseSystem/twoPhaseSystem.C
@@ -168,6 +168,12 @@ Foam::twoPhaseSystem::D() const
}
+bool Foam::twoPhaseSystem::transfersMass() const
+{
+ return transfersMass(phase1());
+}
+
+
Foam::tmp<Foam::volScalarField>
Foam::twoPhaseSystem::dmdt() const
{
diff --git a/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/twoPhaseSystem/twoPhaseSystem.H b/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/twoPhaseSystem/twoPhaseSystem.H
index deca55fa6e530e72d3de74c72f315c59f6339d2a..3c4c98f58921d11e3f01f6ab2754138d36ad8e75 100644
--- a/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/twoPhaseSystem/twoPhaseSystem.H
+++ b/applications/solvers/multiphase/reactingEulerFoam/reactingTwoPhaseEulerFoam/twoPhaseSystem/twoPhaseSystem.H
@@ -78,6 +78,9 @@ class twoPhaseSystem
// Multiplies the phase-fraction gradient
virtual tmp<volScalarField> D(const phasePairKey& key) const = 0;
+ //- Return true if there is mass transfer for phase
+ virtual bool transfersMass(const phaseModel& phase) const = 0;
+
//- Return the interfacial mass flow rate for phase pair
virtual tmp<volScalarField> dmdt(const phasePairKey& key) const = 0;
@@ -192,6 +195,9 @@ public:
// Multiplies the phase-fraction gradient
tmp<volScalarField> D() const;
+ //- Return true if there is mass transfer
+ bool transfersMass() const;
+
//- Return the interfacial mass flow rate
tmp<volScalarField> dmdt() const;