2 word alphaScheme(
"div(phi,alpha)");
8 tmp<fv::ddtScheme<scalar>> tddtAlpha
10 fv::ddtScheme<scalar>::New
13 mesh.ddtScheme(
"ddt(alpha)")
16 const fv::ddtScheme<scalar>&
ddtAlpha = tddtAlpha();
20 isType<fv::EulerDdtScheme<scalar>>(
ddtAlpha)
21 || isType<fv::localEulerDdtScheme<scalar>>(
ddtAlpha)
26 else if (isType<fv::CrankNicolsonDdtScheme<scalar>>(
ddtAlpha))
31 <<
"Sub-cycling is not supported "
32 "with the CrankNicolson ddt scheme"
39 ||
mesh.time().timeIndex() >
mesh.time().startTimeIndex() + 1
43 refCast<const fv::CrankNicolsonDdtScheme<scalar>>(
ddtAlpha)
50 <<
"Only Euler and CrankNicolson ddt schemes are supported"
72 scAlpha*mag(
mesh.delta() & fvc::interpolate(symm(fvc::grad(
U))));
75 surfaceScalarField::Boundary&
phicBf =
phic.boundaryFieldRef();
81 fvsPatchScalarField& phicp =
phicBf[patchi];
89 tmp<surfaceScalarField>
phiCN(alphaPhic);
99 #include "alphaSuSp.H"
101 fvScalarMatrix alpha1Eqn
105 ? fv::localEulerDdtScheme<scalar>(
mesh).fvmDdt(alphac,
alpha1)
106 : fv::EulerDdtScheme<scalar>(
mesh).fvmDdt(
alpha1)
108 + fv::gaussConvectionScheme<scalar>
114 - fvm::Sp(fvc::ddt(alphac) + fvc::div(
phiCN),
alpha1)
121 Info<<
"Phase-1 volume fraction = "
123 <<
" Min(" <<
alpha1.name() <<
") = " << min(
alpha1).value()
127 tmp<surfaceScalarField> talphaPhi1UD(alpha1Eqn.flux());
132 Info<<
"Applying the previous iteration compression flux" << endl;
139 zeroField(), zeroField(),
158 #include "alphaSuSp.H"
162 tmp<surfaceScalarField> talphaPhi1Un
180 tmp<surfaceScalarField> talphaPhi1Corr(talphaPhi1Un() -
alphaPhi10);
188 talphaPhi1Corr.ref(),
240 word(
mesh.ddtScheme(
"ddt(rho,U)"))
241 == fv::EulerDdtScheme<vector>::typeName
261 Info<<
"Phase-1 volume fraction = "
tmp< surfaceScalarField > phiCN(alphaPhic)
surfaceScalarField::Boundary & phicBf
surfaceScalarField phic(mixture.cAlpha() *mag(alphaPhic/mesh.magSf()))
const fv::ddtScheme< scalar > & ddtAlpha
const volScalarField & alpha1
surfaceScalarField rho2f(fvc::interpolate(rho2))
surfaceScalarField rho1f(fvc::interpolate(rho1))
tmp< surfaceScalarField > talphaPhi1Corr0
surfaceScalarField phir(fvc::flux(UdmModel.Udm()))
word alpharScheme("div(phirb,alpha)")
#define FatalErrorInFunction
Report an error message using Foam::FatalError.
volScalarField alpha10("alpha10", alpha1)
messageStream Info
Information stream (stdout output on master, null elsewhere)
Ostream & endl(Ostream &os)
Add newline and flush stream.
label min(const labelHashSet &set, label minValue=labelMax)
Find the min value in labelHashSet, optionally limited by second argument.
Info<< "Creating temperaturePhaseChangeTwoPhaseMixture\n"<< endl;autoPtr< temperaturePhaseChangeTwoPhaseMixture > mixture
#define forAll(list, i)
Loop across all elements in list.