From b6b7943fb72ec2e8317a6846bdf6714b16788b21 Mon Sep 17 00:00:00 2001
From: andy <a.heather@opencfd.co.uk>
Date: Fri, 19 Jun 2009 12:16:53 +0100
Subject: [PATCH] using constructor form for DpDt field

---
 .../solvers/lagrangian/coalChemistryFoam/createFields.H    | 7 +++++--
 .../solvers/lagrangian/reactingParcelFoam/createFields.H   | 7 +++++--
 .../lagrangian/trackedReactingParcelFoam/createFields.H    | 7 +++++--
 3 files changed, 15 insertions(+), 6 deletions(-)

diff --git a/applications/solvers/lagrangian/coalChemistryFoam/createFields.H b/applications/solvers/lagrangian/coalChemistryFoam/createFields.H
index faf324fee1..bba39fe862 100644
--- a/applications/solvers/lagrangian/coalChemistryFoam/createFields.H
+++ b/applications/solvers/lagrangian/coalChemistryFoam/createFields.H
@@ -113,8 +113,11 @@
     );
 
     Info<< "Creating field DpDt\n" << endl;
-    volScalarField DpDt =
-        fvc::DDt(surfaceScalarField("phiU", phi/fvc::interpolate(rho)), p);
+    volScalarField DpDt
+    (
+        "DpDt",
+        fvc::DDt(surfaceScalarField("phiU", phi/fvc::interpolate(rho)), p)
+    );
 
     Info<< "\nConstructing explicit enthalpy cell source" << endl;
     timeActivatedExplicitCellSource enthalpySource
diff --git a/applications/solvers/lagrangian/reactingParcelFoam/createFields.H b/applications/solvers/lagrangian/reactingParcelFoam/createFields.H
index cad1330c68..ec820fa5e3 100644
--- a/applications/solvers/lagrangian/reactingParcelFoam/createFields.H
+++ b/applications/solvers/lagrangian/reactingParcelFoam/createFields.H
@@ -74,8 +74,11 @@
     );
 
     Info<< "Creating field DpDt\n" << endl;
-    volScalarField DpDt =
-        fvc::DDt(surfaceScalarField("phiU", phi/fvc::interpolate(rho)), p);
+    volScalarField DpDt
+    (
+        "DpDt",
+        fvc::DDt(surfaceScalarField("phiU", phi/fvc::interpolate(rho)), p)
+    );
 
     multivariateSurfaceInterpolationScheme<scalar>::fieldTable fields;
 
diff --git a/applications/solvers/lagrangian/trackedReactingParcelFoam/createFields.H b/applications/solvers/lagrangian/trackedReactingParcelFoam/createFields.H
index 9668f9c9be..da3cca5a5b 100644
--- a/applications/solvers/lagrangian/trackedReactingParcelFoam/createFields.H
+++ b/applications/solvers/lagrangian/trackedReactingParcelFoam/createFields.H
@@ -74,8 +74,11 @@
     );
 
     Info<< "Creating field DpDt\n" << endl;
-    volScalarField DpDt =
-        fvc::DDt(surfaceScalarField("phiU", phi/fvc::interpolate(rho)), p);
+    volScalarField DpDt
+    (
+        "DpDt",
+        fvc::DDt(surfaceScalarField("phiU", phi/fvc::interpolate(rho)), p)
+    );
 
     multivariateSurfaceInterpolationScheme<scalar>::fieldTable fields;