Removed unneeded lib dependency from mdInitialise
[foam-extend-3.2.git] / applications / solvers / compressible / rhoPimpleFoam / pEqn.H
blob5c21545106c8e8809432159b4cfc52bda839c564
1 rho = thermo.rho();
3 volScalarField rUA = 1.0/UEqn().A();
4 U = rUA*UEqn().H();
6 if (nCorr <= 1)
8     UEqn.clear();
11 if (transonic)
13     surfaceScalarField phid
14     (
15         "phid",
16         fvc::interpolate(psi)
17        *(
18             (fvc::interpolate(U) & mesh.Sf())
19           + fvc::ddtPhiCorr(rUA, rho, U, phi)
20         )
21     );
23     for (int nonOrth=0; nonOrth<=nNonOrthCorr; nonOrth++)
24     {
25         fvScalarMatrix pEqn
26         (
27             fvm::ddt(psi, p)
28           + fvm::div(phid, p)
29           - fvm::laplacian(rho*rUA, p)
30         );
32         if
33         (
34             oCorr == nOuterCorr-1
35             && corr == nCorr-1
36             && nonOrth == nNonOrthCorr
37         )
38         {
39             pEqn.solve(mesh.solutionDict().solver("pFinal"));
40         }
41         else
42         {
43             pEqn.solve();
44         }
46         if (nonOrth == nNonOrthCorr)
47         {
48             phi == pEqn.flux();
49         }
50     }
52 else
54     phi =
55         fvc::interpolate(rho)*
56         (
57             (fvc::interpolate(U) & mesh.Sf())
58         //+ fvc::ddtPhiCorr(rUA, rho, U, phi)
59         );
61     for (int nonOrth=0; nonOrth<=nNonOrthCorr; nonOrth++)
62     {
63         // Pressure corrector
64         fvScalarMatrix pEqn
65         (
66             fvm::ddt(psi, p)
67           + fvc::div(phi)
68           - fvm::laplacian(rho*rUA, p)
69         );
71         if
72         (
73             oCorr == nOuterCorr-1
74          && corr == nCorr-1
75          && nonOrth == nNonOrthCorr
76         )
77         {
78             pEqn.solve(mesh.solutionDict().solver("pFinal"));
79         }
80         else
81         {
82             pEqn.solve();
83         }
85         if (nonOrth == nNonOrthCorr)
86         {
87             phi += pEqn.flux();
88         }
89     }
92 #include "rhoEqn.H"
93 #include "compressibleContinuityErrs.H"
95 //if (oCorr != nOuterCorr-1)
97     // Explicitly relax pressure for momentum corrector
98     p.relax();
100     rho = thermo.rho();
101     rho.relax();
102     Info<< "rho max/min : " << max(rho).value()
103         << " " << min(rho).value() << endl;
106 U -= rUA*fvc::grad(p);
107 U.correctBoundaryConditions();
109 DpDt = fvc::DDt(surfaceScalarField("phiU", phi/fvc::interpolate(rho)), p);
111 bound(p, pMin);
113 // For closed-volume cases adjust the pressure and density levels
114 // to obey overall mass continuity
116 if (closedVolume)
118     p += (initialMass - fvc::domainIntegrate(psi*p))
119         /fvc::domainIntegrate(psi);