pEqn.H

Go to the documentation of this file.

{
    const volScalarField& psi = thermo.psi();
 
    volVectorField HbyA("HbyA", U);
 
    if (pressureImplicitPorosity)
    {
        HbyA = trTU() & UEqn().H();
    }
    else
    {
        HbyA = trAU()*UEqn().H();
    }
 
    UEqn.clear();
 
    bool closedVolume = false;
 
    surfaceScalarField phiHbyA
    (
        "phiHbyA",
        fvc::interpolate(rho*HbyA) & mesh.Sf()
    );
 
    MRF.makeRelative(fvc::interpolate(rho), phiHbyA);
 
    closedVolume = adjustPhi(phiHbyA, U, p);
 
    while (simple.correctNonOrthogonal())
    {
        tmp<fvScalarMatrix> tpEqn;
 
        if (pressureImplicitPorosity)
        {
            tpEqn =
            (
                fvm::laplacian(rho*trTU(), p)
              + fvOptions(psi, p, rho.name())
             ==
                fvc::div(phiHbyA)
            );
        }
        else
        {
            tpEqn =
            (
                fvm::laplacian(rho*trAU(), p)
              + fvOptions(psi, p, rho.name())
             ==
                fvc::div(phiHbyA)
            );
        }
 
        tpEqn().setReference(pRefCell, pRefValue);
 
        tpEqn().solve();
 
        if (simple.finalNonOrthogonalIter())
        {
            phi = phiHbyA - tpEqn().flux();
        }
    }
 
    #include "incompressible/continuityErrs.H"
 
    // Explicitly relax pressure for momentum corrector
    p.relax();
 
    if (pressureImplicitPorosity)
    {
        U = HbyA - (trTU() & fvc::grad(p));
    }
    else
    {
        U = HbyA - trAU()*fvc::grad(p);
    }
 
    U.correctBoundaryConditions();
    fvOptions.correct(U);
 
    // For closed-volume cases adjust the pressure and density levels
    // to obey overall mass continuity
    if (closedVolume)
    {
        p += (initialMass - fvc::domainIntegrate(psi*p))
            /fvc::domainIntegrate(psi);
    }
 
    rho = thermo.rho();
    rho = max(rho, rhoMin);
    rho = min(rho, rhoMax);
    rho.relax();
    Info<< "rho max/min : "
        << max(rho).value() << " "
        << min(rho).value() << endl;
}