45 lines
942 B
C
45 lines
942 B
C
{
|
|
label nAlphaCorr
|
|
(
|
|
readLabel(piso.lookup("nAlphaCorr"))
|
|
);
|
|
|
|
label nAlphaSubCycles
|
|
(
|
|
readLabel(piso.lookup("nAlphaSubCycles"))
|
|
);
|
|
|
|
surfaceScalarField phic = mag(phi/mesh.magSf());
|
|
phic = min(interface.cAlpha()*phic, max(phic));
|
|
|
|
fvc::makeAbsolute(phi, U);
|
|
volScalarField divU = fvc::div(phi);
|
|
fvc::makeRelative(phi, U);
|
|
|
|
if (nAlphaSubCycles > 1)
|
|
{
|
|
dimensionedScalar totalDeltaT = runTime.deltaT();
|
|
surfaceScalarField rhoPhiSum = 0.0*rhoPhi;
|
|
|
|
for
|
|
(
|
|
subCycle<volScalarField> alphaSubCycle(alpha1, nAlphaSubCycles);
|
|
!(++alphaSubCycle).end();
|
|
)
|
|
{
|
|
# include "alphaEqns.H"
|
|
rhoPhiSum += (runTime.deltaT()/totalDeltaT)*rhoPhi;
|
|
}
|
|
|
|
rhoPhi = rhoPhiSum;
|
|
}
|
|
else
|
|
{
|
|
# include "alphaEqns.H"
|
|
}
|
|
|
|
if (oCorr == 0)
|
|
{
|
|
interface.correct();
|
|
}
|
|
}
|