applications/solvers/compressible/rhoPorousSimpleFoam/hEqn.H

   1 {
   2     fvScalarMatrix hEqn
   3     (
   4         fvm::div(phi, h)
   5       - fvm::Sp(fvc::div(phi), h)
   6       - fvm::laplacian(turbulence->alphaEff(), h)
   7      ==
   8         fvc::div(phi/fvc::interpolate(rho)*fvc::interpolate(p, "div(U,p)"))
   9       - p*fvc::div(phi/fvc::interpolate(rho))
  10     );
  11
  12     hEqn.relax();
  13
  14     eqnResidual = hEqn.solve().initialResidual();
  15     maxResidual = max(eqnResidual, maxResidual);
  16
  17     thermo.correct();
  18 }