pEqn.H
Go to the documentation of this file.
1 rho = thermo.rho();
2 rho = max(rho, rhoMin);
3 rho = min(rho, rhoMax);
4 rho.relax();
5 
6 volScalarField rAU(1.0/UEqn().A());
8 
9 volVectorField HbyA("HbyA", U);
10 HbyA = rAU*UEqn().H();
11 
12 if (pimple.nCorrPISO() <= 1)
13 {
14  UEqn.clear();
15 }
16 
17 if (pimple.transonic())
18 {
20  (
21  "phid",
23  *(
24  (fvc::interpolate(HbyA) & mesh.Sf())
26  )
27  );
28 
29  fvc::makeRelative(phid, psi, U);
30  MRF.makeRelative(fvc::interpolate(psi), phid);
31 
32  while (pimple.correctNonOrthogonal())
33  {
34  fvScalarMatrix pEqn
35  (
36  fvm::ddt(psi, p)
37  + fvm::div(phid, p)
39  ==
40  parcels.Srho()
41  + fvOptions(psi, p, rho.name())
42  );
43 
44  pEqn.solve(mesh.solver(p.select(pimple.finalInnerIter())));
45 
46  if (pimple.finalNonOrthogonalIter())
47  {
48  phi == pEqn.flux();
49  }
50  }
51 }
52 else
53 {
55  (
56  "phiHbyA",
57  (fvc::interpolate(rho*HbyA) & mesh.Sf())
59  );
60 
62  MRF.makeRelative(fvc::interpolate(rho), phiHbyA);
63 
64  while (pimple.correctNonOrthogonal())
65  {
66  fvScalarMatrix pEqn
67  (
68  fvm::ddt(psi, p)
69  + fvc::div(phiHbyA)
71  ==
72  parcels.Srho()
73  + fvOptions(psi, p, rho.name())
74  );
75 
76  pEqn.solve(mesh.solver(p.select(pimple.finalInnerIter())));
77 
78  if (pimple.finalNonOrthogonalIter())
79  {
80  phi = phiHbyA + pEqn.flux();
81  }
82  }
83 }
84 
85 #include "rhoEqn.H"
86 #include "compressibleContinuityErrs.H"
87 
88 // Explicitly relax pressure for momentum corrector
89 p.relax();
90 
91 // Recalculate density from the relaxed pressure
92 rho = thermo.rho();
93 rho = max(rho, rhoMin);
94 rho = min(rho, rhoMax);
95 rho.relax();
96 Info<< "rho max/min : " << max(rho).value()
97  << " " << min(rho).value() << endl;
98 
99 U = HbyA - rAU*fvc::grad(p);
100 U.correctBoundaryConditions();
101 fvOptions.correct(U);
102 K = 0.5*magSqr(U);
103 
104 {
106  surfaceVectorField n(mesh.Sf()/mesh.magSf());
107  rhoUf += n*(fvc::absolute(phi, rho, U)/mesh.magSf() - (n & rhoUf));
108 }
109 
110 if (thermo.dpdt())
111 {
112  dpdt = fvc::ddt(p);
113 
114  if (mesh.moving())
115  {
116  dpdt -= fvc::div(fvc::meshPhi(rho, U), p);
117  }
118 }
volScalarField & dpdt
phi
Definition: pEqn.H:20
CGAL::Exact_predicates_exact_constructions_kernel K
dimensioned< scalar > magSqr(const dimensioned< Type > &)
tmp< GeometricField< typename flux< Type >::type, fvsPatchField, surfaceMesh > > ddtCorr(const GeometricField< Type, fvPatchField, volMesh > &U, const GeometricField< Type, fvsPatchField, surfaceMesh > &Uf)
Definition: fvcDdt.C:155
tmp< GeometricField< Type, fvPatchField, volMesh > > laplacian(const GeometricField< Type, fvPatchField, volMesh > &vf, const word &name)
Definition: fvcLaplacian.C:45
messageStream Info
tmp< surfaceScalarField > interpolate(const RhoType &rho)
tmp< surfaceScalarField > meshPhi(const volVectorField &U)
Definition: fvcMeshPhi.C:33
tmp< GeometricField< Type, fvPatchField, volMesh > > ddt(const dimensioned< Type > dt, const fvMesh &mesh)
Definition: fvcDdt.C:45
dynamicFvMesh & mesh
const dictionary & pimple
p
Definition: pEqn.H:59
fv::IOoptionList & fvOptions
fvMatrix< scalar > fvScalarMatrix
Definition: fvMatricesFwd.H:42
rhoUf
Definition: pEqn.H:90
Ostream & endl(Ostream &os)
Add newline and flush stream.
Definition: Ostream.H:251
tmp< surfaceScalarField > absolute(const tmp< surfaceScalarField > &tphi, const volVectorField &U)
Return the given relative flux in absolute form.
Definition: fvcMeshPhi.C:187
IOMRFZoneList & MRF
fvVectorMatrix UEqn(fvm::ddt(rho, U)+fvm::div(phi, U)+turbulence->divDevRhoReff(U)==fvOptions(rho, U))
surfaceScalarField phid("phid", fvc::interpolate(psi)*( (mesh.Sf()&fvc::interpolate(HbyA)) +rhorAUf *fvc::ddtCorr(rho, U, phi)/fvc::interpolate(rho) ))
GeometricField< scalar, fvPatchField, volMesh > volScalarField
Definition: volFieldsFwd.H:52
dimensioned< Type > max(const dimensioned< Type > &, const dimensioned< Type > &)
GeometricField< scalar, fvsPatchField, surfaceMesh > surfaceScalarField
MRF makeRelative(fvc::interpolate(rho), phiHbyA)
surfaceScalarField rhorAUf("rhorAUf", fvc::interpolate(rho *rAU))
const volScalarField & psi
Definition: createFields.H:24
phiHbyA
Definition: pEqn.H:21
GeometricField< vector, fvPatchField, volMesh > volVectorField
Definition: volFieldsFwd.H:55
volScalarField rAU(1.0/UEqn.A())
surfaceVectorField n(mesh.Sf()/mesh.magSf())
PtrList< dimensionedScalar > rhoMin(fluidRegions.size())
tmp< GeometricField< Type, fvPatchField, volMesh > > div(const GeometricField< Type, fvsPatchField, surfaceMesh > &ssf)
Definition: fvcDiv.C:47
tmp< GeometricField< typename outerProduct< vector, Type >::type, fvPatchField, volMesh >> grad(const GeometricField< Type, fvsPatchField, surfaceMesh > &ssf)
Definition: fvcGrad.C:52
rho
Definition: pEqn.H:1
psiReactionThermo & thermo
Definition: createFields.H:32
GeometricField< vector, fvsPatchField, surfaceMesh > surfaceVectorField
dimensioned< Type > min(const dimensioned< Type > &, const dimensioned< Type > &)
PtrList< dimensionedScalar > rhoMax(fluidRegions.size())
U
Definition: pEqn.H:82
HbyA
Definition: pEqn.H:7