U1EqnIrkPimple.H
Go to the documentation of this file.
1 // Get nuEff1
2 volScalarField nuEff1("nuEff1", nu + nut1);
3 
4 // Initialize U1Eqn w/o ddt term
5 fvVectorMatrix U1Eqn(
6  fvm::div(phi1, U1, divUScheme)
7  //+ turbulence->divDevReff(U)
8  - fvm::laplacian(nuEff1, U1)
9  - fvc::div(nuEff1 * dev2(T(fvc::grad(U1))), divGradUScheme));
10 
11 // Update U1Eqn with pseudo-spectral terms
12 forAll(U1, cellI)
13 {
14  scalar meshV = U1.mesh().V()[cellI];
15 
16  // Add D11 / halfDeltaT[i] * V() to diagonal
17  U1Eqn.diag()[cellI] += D11 / deltaT * meshV; // Use one seg for now: halfDeltaTList[segI]
18 
19  // Minus D10 / halfDeltaT[i] * T0 * V() to source term
20  U1Eqn.source()[cellI] -= D10 / deltaT * U[cellI] * meshV;
21 
22  // Minus D12 / halfDeltaT[i] * T2 * V() to source term
23  U1Eqn.source()[cellI] -= D12 / deltaT * U2[cellI] * meshV;
24 }
25 
26 U1Eqn.relax(relaxUEqn);
27 
28 solve(U1Eqn == -fvc::grad(p1), solverDictU);
U
volVectorField & U
Definition: createRefsPimpleDyM.H:7
U2
U2
Definition: p2EqnIrkPimple.H:26
U1Eqn
fvVectorMatrix U1Eqn(fvm::div(phi1, U1, divUScheme) - fvm::laplacian(nuEff1, U1) - fvc::div(nuEff1 *dev2(T(fvc::grad(U1))), divGradUScheme))
solve
solve(U1Eqn==-fvc::grad(p1), solverDictU)
phi1
phi1
Definition: p1EqnIrkPimple.H:19
nuEff1
volScalarField nuEff1("nuEff1", nu+nut1)
T
volScalarField & T
Definition: createRefsHeatTransfer.H:5
p1
p1
Definition: p1EqnIrkPimple.H:24
U1
U1
Definition: p1EqnIrkPimple.H:26
forAll
forAll(U1, cellI)
Definition: U1EqnIrkPimple.H:12