This repository has been archived on 2023-11-20. You can view files and clone it, but cannot push or open issues or pull requests.
foam-extend4.1-coherent-io/applications/solvers/multiphase/interDyMFoam/correctPhi.H
2016-04-09 18:17:55 +02:00

53 lines
1 KiB
C

{
# include "continuityErrs.H"
volScalarField pcorr
(
IOobject
(
"pcorr",
runTime.timeName(),
mesh,
IOobject::NO_READ,
IOobject::NO_WRITE
),
mesh,
dimensionedScalar("pcorr", pd.dimensions(), 0.0),
pcorrTypes
);
dimensionedScalar rAUf
(
"(1|A(U))",
dimTime/rho.dimensions(),
runTime.deltaT().value()
);
phi = (fvc::interpolate(U) & mesh.Sf());
adjustPhi(phi, U, pcorr);
mesh.setFluxRequired(pcorr.name());
for(int nonOrth=0; nonOrth<=nNonOrthCorr; nonOrth++)
{
fvScalarMatrix pcorrEqn
(
fvm::laplacian(rAUf, pcorr) == fvc::div(phi)
);
pcorrEqn.setReference(pdRefCell, pdRefValue);
pcorrEqn.solve();
if (nonOrth == nNonOrthCorr)
{
phi -= pcorrEqn.flux();
}
}
# include "continuityErrs.H"
# include "CourantNo.H"
// Recalculate rhoPhi from rho
rhoPhi = fvc::interpolate(rho)*phi;
}