Made consistent with respect to pd BC and ddtPhiCorr

applications/solvers/heatTransfer/buoyantFoam/pEqn.H

@@ -1,8 +1,5 @@
 bool closedVolume = pd.needReference();
 
-//pd.boundaryField() ==
-//    p.boundaryField() - rho.boundaryField()*gh.boundaryField() - pRef.value();
-
 rho = thermo->rho();
 
 volScalarField rUA = 1.0/UEqn.A();

applications/solvers/heatTransfer/buoyantSimpleFoam/pEqn.H

@@ -1,6 +1,3 @@
-pd.boundaryField() ==
-    p.boundaryField() - rho.boundaryField()*gh.boundaryField() - pRef.value();
-
 volScalarField rUA = 1.0/UEqn().A();
 U = rUA*UEqn().H();
 UEqn.clear();

applications/solvers/heatTransfer/buoyantSimpleRadiationFoam/pEqn.H

@@ -1,6 +1,3 @@
-pd.boundaryField() ==
-    p.boundaryField() - rho.boundaryField()*gh.boundaryField() - pRef.value();
-
 volScalarField rUA = 1.0/UEqn().A();
 U = rUA*UEqn().H();
 UEqn.clear();

applications/solvers/heatTransfer/chtMultiRegionFoam/fluid/pEqn.H

@@ -1,11 +1,6 @@
 {
     bool closedVolume = false;
 
-    //pdf[i].boundaryField() ==
-    //    thermof[i].p().boundaryField()
-    //  - rhof[i].boundaryField()*ghf[i].boundaryField()
-    //  - pRef.value();
-
     rhof[i] = thermof[i].rho();
 
     volScalarField rUA = 1.0/UEqn().A();
@@ -15,7 +10,7 @@
         fvc::interpolate(rhof[i])
        *(
             (fvc::interpolate(Uf[i]) & fluidRegions[i].Sf())
-//          + fvc::ddtPhiCorr(rUA, rhof[i], Uf[i], phif[i])
+          + fvc::ddtPhiCorr(rUA, rhof[i], Uf[i], phif[i])
         )
       - fvc::interpolate(rhof[i]*rUA*ghf[i])
        *fvc::snGrad(rhof[i])
@@ -55,8 +50,7 @@
                     initialMassf[i]
                 )
               - fvc::domainIntegrate(thermof[i].psi()*thermof[i].p())
-            )
+            )/fvc::domainIntegrate(thermof[i].psi());
-            /fvc::domainIntegrate(thermof[i].psi());
 
         rhof[i] = thermof[i].rho();
     }