OLD: pEqn.solve(mesh.solver(p.select(piso.finalInnerIter()))); pEqn.solve(mesh.solver("Yi")); NEW: pEqn.solve(p.select(piso.finalInnerIter())); pEqn.solve("Yi");
51 lines
1007 B
C
51 lines
1007 B
C
tmp<fv::convectionScheme<scalar>> mvConvection
|
|
(
|
|
fv::convectionScheme<scalar>::New
|
|
(
|
|
mesh,
|
|
fields,
|
|
phi,
|
|
mesh.divScheme("div(phi,Yi_h)")
|
|
)
|
|
);
|
|
|
|
|
|
{
|
|
combustion->correct();
|
|
Qdot = combustion->Qdot();
|
|
volScalarField Yt(0.0*Y[0]);
|
|
|
|
forAll(Y, i)
|
|
{
|
|
if (i != inertIndex && composition.active(i))
|
|
{
|
|
volScalarField& Yi = Y[i];
|
|
|
|
fvScalarMatrix YiEqn
|
|
(
|
|
fvm::ddt(rho, Yi)
|
|
+ mvConvection->fvmDiv(phi, Yi)
|
|
- fvm::laplacian(turbulence->muEff(), Yi)
|
|
==
|
|
coalParcels.SYi(i, Yi)
|
|
+ combustion->R(Yi)
|
|
+ fvOptions(rho, Yi)
|
|
);
|
|
|
|
YiEqn.relax();
|
|
|
|
fvOptions.constrain(YiEqn);
|
|
|
|
YiEqn.solve("Yi");
|
|
|
|
fvOptions.correct(Yi);
|
|
|
|
Yi.clamp_min(0);
|
|
Yt += Yi;
|
|
}
|
|
}
|
|
|
|
Y[inertIndex] = scalar(1) - Yt;
|
|
Y[inertIndex].clamp_min(0);
|
|
}
|