24 lines
431 B
C
24 lines
431 B
C
{
|
|
fvScalarMatrix hEqn
|
|
(
|
|
fvm::ddt(rho, hs)
|
|
+ mvConvection->fvmDiv(phi, hs)
|
|
- fvm::laplacian(turbulence->alphaEff(), hs)
|
|
==
|
|
DpDt
|
|
+ parcels.Sh()
|
|
+ radiation->Shs(thermo)
|
|
+ chemistrySh
|
|
);
|
|
|
|
hEqn.relax();
|
|
|
|
hEqn.solve();
|
|
|
|
thermo.correct();
|
|
|
|
radiation->correct();
|
|
|
|
Info<< "T gas min/max = " << min(T).value() << ", "
|
|
<< max(T).value() << endl;
|
|
}
|