applications/solvers/multiphase/porousInterFoam/UEqn.H

   1     surfaceScalarField muEff
   2     (
   3         "muEff",
   4         twoPhaseProperties.muf()
   5       + fvc::interpolate(rho*turbulence->nut())
   6     );
   7
   8     // Calculate and cache mu for the porous media
   9     volScalarField mu(twoPhaseProperties.mu());
  10
  11     fvVectorMatrix UEqn
  12     (
  13         pZones.ddt(rho, U)
  14       + fvm::div(rhoPhi, U)
  15       - fvm::laplacian(muEff, U)
  16       - (fvc::grad(U) & fvc::grad(muEff))
  17     //- fvc::div(muEff*(fvc::interpolate(dev(fvc::grad(U))) & mesh.Sf()))
  18     );
  19
  20     UEqn.relax();
  21
  22     pZones.addResistance(UEqn);
  23
  24     if (momentumPredictor)
  25     {
  26         solve
  27         (
  28             UEqn
  29          ==
  30             fvc::reconstruct
  31             (
  32                 fvc::interpolate(rho)*(g & mesh.Sf())
  33               + (
  34                     fvc::interpolate(interface.sigmaK())*fvc::snGrad(alpha1)
  35                   - fvc::snGrad(p)
  36                 ) * mesh.magSf()
  37             )
  38         );
  39     }