From fa0717dd00583261753c150d73a154407367f8af Mon Sep 17 00:00:00 2001
From: graham <graham.macpherson@strath.ac.uk>
Date: Mon, 5 Jan 2009 17:42:35 +0000
Subject: [PATCH] rewriting molConfig, renamed to mdInitiaise.  Driving all
 creation of molecules from within moleculeCloud.

---
 .../solvers/molecularDynamics/mdFoam/mdFoam.C |   1 -
 .../preProcessing/mdInitialise/Make/files     |   3 +
 .../preProcessing/mdInitialise/Make/options   |  18 ++
 .../preProcessing/mdInitialise/mdInitialise.C |  95 +++++++++
 .../molConfig_old}/Make/files                 |   0
 .../molConfig_old}/Make/options               |   0
 .../molConfig_old}/correctVelocities.H        |   0
 .../molConfig_old}/createMolecules.C          |   0
 .../molConfig_old}/createPositions.H          |   0
 .../molConfig_old}/createVelocities.H         |   0
 .../molConfig_old}/genMolConfig.C             |   0
 .../molConfig_old}/latticeStructures/BCC.H    |   0
 .../molConfig_old}/latticeStructures/FCC.H    |   0
 .../molConfig_old}/latticeStructures/SC.H     |   0
 .../molConfig_old}/molConfig.C                |   0
 .../molConfig_old}/molConfig.H                |   0
 .../molConfig_old}/molConfigI.H               |   0
 .../molConfig_old}/origin.H                   |   0
 .../molConfig_old}/readZoneSubDict.H          |   0
 .../molConfig_old}/startingPoint.H            |   0
 .../velocityDistributions/maxwellian.H        |   0
 .../velocityDistributions/uniform.H           |   0
 .../correlationFunctionI.H                    |  14 +-
 .../molecularDynamics/molecule/Make/options   |   2 +-
 .../molecularDynamics/molecule/mdTools/md.H   |   1 +
 .../molecule/moleculeCloud/moleculeCloud.C    | 154 ++++++--------
 .../molecule/moleculeCloud/moleculeCloud.H    |  29 ++-
 .../potential/potential/potential.C           | 199 +++++++++++++++---
 .../potential/potential/potential.H           |  16 ++
 29 files changed, 384 insertions(+), 148 deletions(-)
 create mode 100755 applications/utilities/preProcessing/mdInitialise/Make/files
 create mode 100755 applications/utilities/preProcessing/mdInitialise/Make/options
 create mode 100644 applications/utilities/preProcessing/mdInitialise/mdInitialise.C
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/Make/files (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/Make/options (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/correctVelocities.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/createMolecules.C (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/createPositions.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/createVelocities.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/genMolConfig.C (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/latticeStructures/BCC.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/latticeStructures/FCC.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/latticeStructures/SC.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/molConfig.C (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/molConfig.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/molConfigI.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/origin.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/readZoneSubDict.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/startingPoint.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/velocityDistributions/maxwellian.H (100%)
 rename applications/utilities/preProcessing/{molConfig => mdInitialise/molConfig_old}/velocityDistributions/uniform.H (100%)

diff --git a/applications/solvers/molecularDynamics/mdFoam/mdFoam.C b/applications/solvers/molecularDynamics/mdFoam/mdFoam.C
index 88e06cfdc7..4357c5c0b1 100644
--- a/applications/solvers/molecularDynamics/mdFoam/mdFoam.C
+++ b/applications/solvers/molecularDynamics/mdFoam/mdFoam.C
@@ -32,7 +32,6 @@ Description
 
 #include "fvCFD.H"
 #include "md.H"
-#include "potential.H"
 
 int main(int argc, char *argv[])
 {
diff --git a/applications/utilities/preProcessing/mdInitialise/Make/files b/applications/utilities/preProcessing/mdInitialise/Make/files
new file mode 100755
index 0000000000..dc06cf6bcd
--- /dev/null
+++ b/applications/utilities/preProcessing/mdInitialise/Make/files
@@ -0,0 +1,3 @@
+mdInitialise.C
+
+EXE = $(FOAM_APPBIN)/mdInitialise
diff --git a/applications/utilities/preProcessing/mdInitialise/Make/options b/applications/utilities/preProcessing/mdInitialise/Make/options
new file mode 100755
index 0000000000..289c0990a2
--- /dev/null
+++ b/applications/utilities/preProcessing/mdInitialise/Make/options
@@ -0,0 +1,18 @@
+EXE_INC = \
+    -I$(LIB_SRC)/meshTools/lnInclude \
+    -I$(LIB_SRC)/dynamicMesh/lnInclude \
+    -I$(LIB_SRC)/lagrangian/molecularDynamics/molecule/lnInclude \
+    -I$(LIB_SRC)/lagrangian/molecularDynamics/potential/lnInclude \
+    -I$(LIB_SRC)/lagrangian/molecularDynamics/molecularMeasurements/lnInclude \
+    -I$(LIB_SRC)/lagrangian/basic/lnInclude \
+    -I$(LIB_SRC)/finiteVolume/lnInclude
+
+EXE_LIBS = \
+    -lmeshTools \
+    -ldynamicMesh \
+    -lfiniteVolume \
+    -llagrangian \
+    -lmolecule \
+    -lpotential \
+    -lmolecularMeasurements
+
diff --git a/applications/utilities/preProcessing/mdInitialise/mdInitialise.C b/applications/utilities/preProcessing/mdInitialise/mdInitialise.C
new file mode 100644
index 0000000000..6c474208d5
--- /dev/null
+++ b/applications/utilities/preProcessing/mdInitialise/mdInitialise.C
@@ -0,0 +1,95 @@
+/*---------------------------------------------------------------------------*\
+ =========                   |
+ \\      /   F ield          | OpenFOAM: The Open Source CFD Toolbox
+  \\    /    O peration      |
+   \\  /     A nd            | Copyright (C) 1991-2008 OpenCFD Ltd.
+    \\/      M anipulation   |
+-------------------------------------------------------------------------------
+License
+    This file is part of OpenFOAM.
+
+    OpenFOAM is free software; you can redistribute it and/or modify it
+    under the terms of the GNU General Public License as published by the
+    Free Software Foundation; either version 2 of the License, or (at your
+    option) any later version.
+
+    OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
+    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+    FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+    for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with OpenFOAM; if not, write to the Free Software Foundation,
+    Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+
+\*---------------------------------------------------------------------------*/
+
+#include "md.H"
+#include "fvCFD.H"
+
+// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
+
+int main(int argc, char *argv[])
+{
+#   include "setRootCase.H"
+#   include "createTime.H"
+#   include "createMesh.H"
+
+    IOdictionary mdInitialiseDict
+    (
+        IOobject
+        (
+            "mdInitialiseDict",
+            runTime.system(),
+            runTime,
+            IOobject::MUST_READ,
+            IOobject::NO_WRITE,
+            false
+        )
+    );
+
+    IOdictionary idListDict
+    (
+        IOobject
+        (
+            "idList",
+            mesh.time().constant(),
+            mesh,
+            IOobject::NO_READ,
+            IOobject::AUTO_WRITE
+        )
+    );
+
+    potential pot(mesh, mdInitialiseDict, idListDict);
+
+    moleculeCloud molecules(mesh, pot, mdInitialiseDict);
+
+    label totalMolecules = molecules.size();
+
+    if (Pstream::parRun())
+    {
+        reduce(totalMolecules, sumOp<label>());
+    }
+
+    Info<< nl << "Total number of molecules added: " << totalMolecules
+        << nl << endl;
+
+    IOstream::defaultPrecision(12);
+
+    if (!mesh.write())
+    {
+        FatalErrorIn(args.executable())
+            << "Failed writing moleculeCloud."
+            << nl << exit(FatalError);
+    }
+
+    Info<< nl << "ClockTime = " << runTime.elapsedClockTime() << " s"
+        << nl << endl;
+
+    Info << nl << "End\n" << endl;
+
+    return 0;
+}
+
+
+// ************************************************************************* //
diff --git a/applications/utilities/preProcessing/molConfig/Make/files b/applications/utilities/preProcessing/mdInitialise/molConfig_old/Make/files
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/Make/files
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/Make/files
diff --git a/applications/utilities/preProcessing/molConfig/Make/options b/applications/utilities/preProcessing/mdInitialise/molConfig_old/Make/options
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/Make/options
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/Make/options
diff --git a/applications/utilities/preProcessing/molConfig/correctVelocities.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/correctVelocities.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/correctVelocities.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/correctVelocities.H
diff --git a/applications/utilities/preProcessing/molConfig/createMolecules.C b/applications/utilities/preProcessing/mdInitialise/molConfig_old/createMolecules.C
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/createMolecules.C
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/createMolecules.C
diff --git a/applications/utilities/preProcessing/molConfig/createPositions.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/createPositions.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/createPositions.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/createPositions.H
diff --git a/applications/utilities/preProcessing/molConfig/createVelocities.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/createVelocities.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/createVelocities.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/createVelocities.H
diff --git a/applications/utilities/preProcessing/molConfig/genMolConfig.C b/applications/utilities/preProcessing/mdInitialise/molConfig_old/genMolConfig.C
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/genMolConfig.C
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/genMolConfig.C
diff --git a/applications/utilities/preProcessing/molConfig/latticeStructures/BCC.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/latticeStructures/BCC.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/latticeStructures/BCC.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/latticeStructures/BCC.H
diff --git a/applications/utilities/preProcessing/molConfig/latticeStructures/FCC.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/latticeStructures/FCC.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/latticeStructures/FCC.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/latticeStructures/FCC.H
diff --git a/applications/utilities/preProcessing/molConfig/latticeStructures/SC.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/latticeStructures/SC.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/latticeStructures/SC.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/latticeStructures/SC.H
diff --git a/applications/utilities/preProcessing/molConfig/molConfig.C b/applications/utilities/preProcessing/mdInitialise/molConfig_old/molConfig.C
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/molConfig.C
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/molConfig.C
diff --git a/applications/utilities/preProcessing/molConfig/molConfig.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/molConfig.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/molConfig.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/molConfig.H
diff --git a/applications/utilities/preProcessing/molConfig/molConfigI.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/molConfigI.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/molConfigI.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/molConfigI.H
diff --git a/applications/utilities/preProcessing/molConfig/origin.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/origin.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/origin.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/origin.H
diff --git a/applications/utilities/preProcessing/molConfig/readZoneSubDict.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/readZoneSubDict.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/readZoneSubDict.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/readZoneSubDict.H
diff --git a/applications/utilities/preProcessing/molConfig/startingPoint.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/startingPoint.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/startingPoint.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/startingPoint.H
diff --git a/applications/utilities/preProcessing/molConfig/velocityDistributions/maxwellian.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/velocityDistributions/maxwellian.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/velocityDistributions/maxwellian.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/velocityDistributions/maxwellian.H
diff --git a/applications/utilities/preProcessing/molConfig/velocityDistributions/uniform.H b/applications/utilities/preProcessing/mdInitialise/molConfig_old/velocityDistributions/uniform.H
similarity index 100%
rename from applications/utilities/preProcessing/molConfig/velocityDistributions/uniform.H
rename to applications/utilities/preProcessing/mdInitialise/molConfig_old/velocityDistributions/uniform.H
diff --git a/src/lagrangian/molecularDynamics/molecularMeasurements/correlationFunction/correlationFunctionI.H b/src/lagrangian/molecularDynamics/molecularMeasurements/correlationFunction/correlationFunctionI.H
index 60311eddac..4e3320612c 100644
--- a/src/lagrangian/molecularDynamics/molecularMeasurements/correlationFunction/correlationFunctionI.H
+++ b/src/lagrangian/molecularDynamics/molecularMeasurements/correlationFunction/correlationFunctionI.H
@@ -25,43 +25,43 @@ License
 \*---------------------------------------------------------------------------*/
 
 template<class Type>
-inline const Field< Field<Type> >& Foam::correlationFunction<Type>::
-tZeroBuffers() const
+inline const Foam::Field< Foam::Field<Type> >&
+Foam::correlationFunction<Type>::tZeroBuffers() const
 {
     return tZeroBuffers_;
 }
 
 
 template<class Type>
-inline scalar Foam::correlationFunction<Type>::duration() const
+inline Foam::scalar Foam::correlationFunction<Type>::duration() const
 {
     return duration_;
 }
 
 
 template<class Type>
-inline scalar Foam::correlationFunction<Type>::sampleInterval() const
+inline Foam::scalar Foam::correlationFunction<Type>::sampleInterval() const
 {
     return sampleInterval_;
 }
 
 
 template<class Type>
-inline scalar Foam::correlationFunction<Type>::averagingInterval() const
+inline Foam::scalar Foam::correlationFunction<Type>::averagingInterval() const
 {
     return averagingInterval_;
 }
 
 
 template<class Type>
-inline label Foam::correlationFunction<Type>::sampleSteps() const
+inline Foam::label Foam::correlationFunction<Type>::sampleSteps() const
 {
     return sampleSteps_;
 }
 
 
 template<class Type>
-inline label Foam::correlationFunction<Type>::measurandFieldSize() const
+inline Foam::label Foam::correlationFunction<Type>::measurandFieldSize() const
 {
     return tZeroBuffers_[0].size();
 }
diff --git a/src/lagrangian/molecularDynamics/molecule/Make/options b/src/lagrangian/molecularDynamics/molecule/Make/options
index 1026db276a..620e87e138 100755
--- a/src/lagrangian/molecularDynamics/molecule/Make/options
+++ b/src/lagrangian/molecularDynamics/molecule/Make/options
@@ -2,7 +2,7 @@ EXE_INC = \
     -I$(LIB_SRC)/finiteVolume/lnInclude \
     -I$(LIB_SRC)/lagrangian/basic/lnInclude \
     -I$(LIB_SRC)/lagrangian/molecularDynamics/potential/lnInclude \
-	-I$(LIB_SRC)/lagrangian/molecularDynamics/molecularMeasurements/lnInclude
+    -I$(LIB_SRC)/lagrangian/molecularDynamics/molecularMeasurements/lnInclude
 
 EXE_LIBS = \
     -lfiniteVolume \
diff --git a/src/lagrangian/molecularDynamics/molecule/mdTools/md.H b/src/lagrangian/molecularDynamics/molecule/mdTools/md.H
index 39ddd97b38..ae4ab08124 100644
--- a/src/lagrangian/molecularDynamics/molecule/mdTools/md.H
+++ b/src/lagrangian/molecularDynamics/molecule/mdTools/md.H
@@ -1,6 +1,7 @@
 #ifndef md_H
 #define md_H
 
+#   include "potential.H"
 #   include "moleculeCloud.H"
 #   include "correlationFunction.H"
 #   include "distribution.H"
diff --git a/src/lagrangian/molecularDynamics/molecule/moleculeCloud/moleculeCloud.C b/src/lagrangian/molecularDynamics/molecule/moleculeCloud/moleculeCloud.C
index ffbf39edc0..b5c213f0e4 100644
--- a/src/lagrangian/molecularDynamics/molecule/moleculeCloud/moleculeCloud.C
+++ b/src/lagrangian/molecularDynamics/molecule/moleculeCloud/moleculeCloud.C
@@ -460,6 +460,53 @@ void Foam::moleculeCloud::removeHighEnergyOverlaps()
 }
 
 
+void Foam::moleculeCloud::initialiseMolecules
+(
+    const IOdictionary& mdInitialiseDict
+)
+{
+    Info<< nl
+        << "Initialising molecules in each zone specified in mdInitialiseDict."
+        << endl;
+
+    const cellZoneMesh& cellZoneI = mesh_.cellZones();
+
+    if (!cellZoneI.size())
+    {
+        FatalErrorIn("void Foam::moleculeCloud::initialiseMolecules")
+            << "No cellZones found in the mesh."
+            << abort(FatalError);
+    }
+
+    forAll (cellZoneI, cZ)
+    {
+        if (cellZoneI[cZ].size())
+        {
+            if (!mdInitialiseDict.found(cellZoneI[cZ].name()))
+            {
+                Info<< "No specification subDictionary for zone "
+                    << cellZoneI[cZ].name() << " found.  Not filling." << endl;
+            }
+            else
+            {
+                label n = 0;
+
+                label totalZoneMols = 0;
+
+                label molsPlacedThisIteration = 0;
+
+                // Continue trying to place molecules as long as at
+                // least one molecule is placed in each iteration.
+                // The "|| totalZoneMols == 0" condition means that the
+                // algorithm will continue if the origin is outside the
+                // zone.
+
+
+            }
+        }
+    }
+}
+
 // * * * * * * * * * * * * * * * * Constructors  * * * * * * * * * * * * * * //
 
 Foam::moleculeCloud::moleculeCloud
@@ -479,77 +526,6 @@ Foam::moleculeCloud::moleculeCloud
 
     buildConstProps();
 
-    // ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-    const Cloud<molecule>& cloud = *this;
-
-    if(Pstream::master())
-    {
-        vector position1 = vector(-2.4e-9,0,0.3e-9);
-
-        addParticle
-        (
-            new molecule
-            (
-                cloud,
-                position1,
-                mesh_.findCell(position1),
-                tensor(1, 0, 0, 0, 1, 0, 0, 0, 1),
-                vector(-405, 5, 5),
-                vector::zero,
-                vector(1e-36, -1.2e-35, -3.7e-35),
-                vector::zero,
-                vector::zero,
-                constProps(0),
-                0,
-                0
-            )
-        );
-
-        vector position2 = vector(-2.35e-9,0,-0.4e-9);
-
-        addParticle
-        (
-            new molecule
-            (
-                cloud,
-                position2,
-                mesh_.findCell(position2),
-                tensor(0, 0, 1, 0, 1, 0, -1, 0, 0),
-                vector(396,-3.7,-5),
-                vector::zero,
-                vector(-2.1e-35, 1.4e-35, 2e-36),
-                vector::zero,
-                vector::zero,
-                constProps(1),
-                0,
-                1
-            )
-        );
-
-        vector position3 = vector(-2e-9,0.52e-9,0);
-
-        addParticle
-        (
-            new molecule
-            (
-                cloud,
-                position3,
-                mesh_.findCell(position2),
-                tensor(-1, 0, 0, 0, 1, 0, 0, 0, -1),
-                vector(403.2, 1, -2),
-                vector::zero,
-                vector(4e-36, 1e-35, -1.3e-35),
-                vector::zero,
-                vector::zero,
-                constProps(1),
-                0,
-                1
-            )
-        );
-    }
-    // ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-
-
     buildCellOccupancy();
 
     removeHighEnergyOverlaps();
@@ -558,29 +534,27 @@ Foam::moleculeCloud::moleculeCloud
 }
 
 
-// Foam::moleculeCloud::moleculeCloud
-// (
-//     const polyMesh& mesh,
-//     label nMol,
-//     const labelField& id,
-//     const scalarField& mass,
-//     const vectorField& positions,
-//     const labelField& cells,
-//     const vectorField& U,
-//     const vectorField& A,
-//     const labelField& tethered,
-//     const vectorField& tetherPositions
-// )
-// :
-//     Cloud<molecule>(mesh, "moleculeCloud", false),
-//     mesh_(mesh),
-//     referredInteractionList_(*this)
-// {
+Foam::moleculeCloud::moleculeCloud
+(
+    const polyMesh& mesh,
+    const potential& pot,
+    const IOdictionary& mdInitialiseDict
+)
+    :
+    Cloud<molecule>(mesh, "moleculeCloud", false),
+    mesh_(mesh),
+    pot_(pot),
+    il_(mesh_),
+    constPropList_()
+{
+    buildConstProps();
+
+    initialiseMolecules(mdInitialiseDict);
+}
 //     // Do I need to read the fields if I'm just about to clear them?
 //     molecule::readFields(*this);
 
 //     clear();
-
 //     // This clear() is here for the moment to stop existing files
 //     // being appended to, this would be better accomplished by getting
 //     // mesh.removeFiles(mesh.instance()); (or equivalent) to work.
diff --git a/src/lagrangian/molecularDynamics/molecule/moleculeCloud/moleculeCloud.H b/src/lagrangian/molecularDynamics/molecule/moleculeCloud/moleculeCloud.H
index f63d4fdd2c..a048514932 100644
--- a/src/lagrangian/molecularDynamics/molecule/moleculeCloud/moleculeCloud.H
+++ b/src/lagrangian/molecularDynamics/molecule/moleculeCloud/moleculeCloud.H
@@ -110,6 +110,11 @@ private:
 
         void removeHighEnergyOverlaps();
 
+        void initialiseMolecules
+        (
+            const IOdictionary& mdInitialiseDict
+        );
+
         //- Disallow default bitwise copy construct
         moleculeCloud(const moleculeCloud&);
 
@@ -136,23 +141,13 @@ public:
             const potential& pot
         );
 
-        //- Construct given polyMesh and fields of components.
-        //- Intended for use
-        //- by the molConfig utility
-        // moleculeCloud
-        // (
-        //     const polyMesh& mesh,
-        //     label nMol,
-        //     const labelField& id,
-        //     const scalarField& mass,
-        //     const vectorField& positions,
-        //     const labelField& cells,
-        //     const vectorField& U,
-        //     const vectorField& A,
-        //     const labelField& tethered,
-        //     const vectorField& tetherPositions
-        // );
-
+        //- Construct given mesh, potential and mdInitialiseDict
+        moleculeCloud
+        (
+            const polyMesh& mesh,
+            const potential& pot,
+            const IOdictionary& mdInitialiseDict
+        );
 
     // Member Functions
 
diff --git a/src/lagrangian/molecularDynamics/potential/potential/potential.C b/src/lagrangian/molecularDynamics/potential/potential/potential.C
index 0767e25812..6042e94755 100644
--- a/src/lagrangian/molecularDynamics/potential/potential/potential.C
+++ b/src/lagrangian/molecularDynamics/potential/potential/potential.C
@@ -28,37 +28,8 @@ License
 
 // * * * * * * * * * * * * * Private Member Functions  * * * * * * * * * * * //
 
-void Foam::potential::potential::readPotentialDict()
+void Foam::potential::setSiteIdList(const IOdictionary& moleculePropertiesDict)
 {
-    Info<< nl <<  "Reading potential dictionary:" << endl;
-
-    IOdictionary idListDict
-    (
-        IOobject
-        (
-            "idList",
-            mesh_.time().constant(),
-            mesh_,
-            IOobject::MUST_READ,
-            IOobject::NO_WRITE
-        )
-    );
-
-    idList_ = List<word>(idListDict.lookup("idList"));
-
-    IOdictionary moleculePropertiesDict
-    (
-        IOobject
-        (
-            "moleculeProperties",
-            mesh_.time().constant(),
-            mesh_,
-            IOobject::MUST_READ,
-            IOobject::NO_WRITE,
-            false
-        )
-    );
-
     DynamicList<word> siteIdList;
 
     DynamicList<word> pairPotentialSiteIdList;
@@ -108,7 +79,7 @@ void Foam::potential::potential::readPotentialDict()
         }
     }
 
-    label nPairPotIds_ = pairPotentialSiteIdList.size();
+    nPairPotIds_ = pairPotentialSiteIdList.size();
 
     forAll(siteIdList, aSIN)
     {
@@ -121,8 +92,46 @@ void Foam::potential::potential::readPotentialDict()
     }
 
     siteIdList_.transfer(pairPotentialSiteIdList.shrink());
+}
 
-    pairPotentialSiteIdList = SubList<word>(siteIdList_, nPairPotIds_);
+
+void Foam::potential::potential::readPotentialDict()
+{
+    Info<< nl <<  "Reading potential dictionary:" << endl;
+
+    IOdictionary idListDict
+    (
+        IOobject
+        (
+            "idList",
+            mesh_.time().constant(),
+            mesh_,
+            IOobject::MUST_READ,
+            IOobject::NO_WRITE
+        )
+    );
+
+    idList_ = List<word>(idListDict.lookup("idList"));
+
+    IOdictionary moleculePropertiesDict
+    (
+        IOobject
+        (
+            "moleculeProperties",
+            mesh_.time().constant(),
+            mesh_,
+            IOobject::MUST_READ,
+            IOobject::NO_WRITE,
+            false
+        )
+    );
+
+    setSiteIdList(moleculePropertiesDict);
+
+    List<word> pairPotentialSiteIdList
+    (
+        SubList<word>(siteIdList_, nPairPotIds_)
+    );
 
     Info<< nl << "Unique site ids found: " << siteIdList_
         << nl << "Site Ids requiring a pair potential: "
@@ -239,6 +248,119 @@ void Foam::potential::potential::readPotentialDict()
 }
 
 
+void Foam::potential::potential::readMdInitialiseDict
+(
+    const IOdictionary& mdInitialiseDict,
+    IOdictionary& idListDict
+)
+{
+    IOdictionary moleculePropertiesDict
+    (
+        IOobject
+        (
+            "moleculeProperties",
+            mesh_.time().constant(),
+            mesh_,
+            IOobject::MUST_READ,
+            IOobject::NO_WRITE,
+            false
+        )
+    );
+
+    DynamicList<word> idList;
+
+    DynamicList<word> tetherSiteIdList;
+
+    forAll(mdInitialiseDict.toc(), zone)
+    {
+        const dictionary& zoneDict = mdInitialiseDict.subDict
+        (
+            mdInitialiseDict.toc()[zone]
+        );
+
+        List<word> ids
+        (
+            zoneDict.lookup("latticeIds")
+        );
+
+        forAll(ids, i)
+        {
+            const word& id = ids[i];
+
+            if(!moleculePropertiesDict.found(id))
+            {
+                FatalErrorIn("potential.C") << nl
+                    << "Molecule type "
+                    << id
+                    << " not found in moleculeProperties dictionary."
+                    << nl
+                    << abort(FatalError);
+            }
+
+            if (findIndex(idList,id) == -1)
+            {
+                idList.append(id);
+            }
+        }
+
+        List<word> tetherSiteIds
+        (
+            zoneDict.lookup("tetherSiteIds")
+        );
+
+        forAll(tetherSiteIds, t)
+        {
+            const word& tetherSiteId = tetherSiteIds[t];
+
+            bool idFound = false;
+
+            forAll(ids, i)
+            {
+                if (idFound)
+                {
+                    break;
+                }
+
+                const word& id = ids[i];
+
+                List<word> siteIds
+                (
+                    moleculePropertiesDict.subDict(id).lookup("siteIds")
+                );
+
+                if (findIndex(siteIds, tetherSiteId) != -1)
+                {
+                    idFound = true;
+                }
+            }
+
+            if (idFound)
+            {
+                tetherSiteIdList.append(tetherSiteId);
+            }
+            else
+            {
+                FatalErrorIn("potential.C") << nl
+                    << "Tether id  "
+                    << tetherSiteId
+                    << " not found as a site of any molecule in zone."
+                    << nl
+                    << abort(FatalError);
+            }
+        }
+    }
+
+    idList_.transfer(idList);
+
+    tetherSiteIdList.shrink();
+
+    idListDict.add("idList", idList_);
+
+    idListDict.add("tetherSiteIdList", tetherSiteIdList);
+
+    setSiteIdList(moleculePropertiesDict);
+}
+
 // * * * * * * * * * * * * * * * * Constructors  * * * * * * * * * * * * * * //
 
 Foam::potential::potential(const polyMesh& mesh)
@@ -250,6 +372,19 @@ Foam::potential::potential(const polyMesh& mesh)
 }
 
 
+Foam::potential::potential
+(
+    const polyMesh& mesh,
+    const IOdictionary& mdInitialiseDict,
+    IOdictionary& idListDict
+)
+:
+    mesh_(mesh),
+    electrostaticPotential_()
+{
+    readMdInitialiseDict(mdInitialiseDict, idListDict);
+}
+
 // * * * * * * * * * * * * * * * * Destructor  * * * * * * * * * * * * * * * //
 
 Foam::potential::~potential()
diff --git a/src/lagrangian/molecularDynamics/potential/potential/potential.H b/src/lagrangian/molecularDynamics/potential/potential/potential.H
index feae0f48af..2a545ddc54 100644
--- a/src/lagrangian/molecularDynamics/potential/potential/potential.H
+++ b/src/lagrangian/molecularDynamics/potential/potential/potential.H
@@ -78,8 +78,16 @@ class potential
 
     // Private Member Functions
 
+        void setSiteIdList(const IOdictionary& moleculePropertiesDict);
+
         void readPotentialDict();
 
+        void readMdInitialiseDict
+        (
+            const IOdictionary& mdInitialiseDict,
+            IOdictionary& idListDict
+        );
+
         //- Disallow default bitwise copy construct
         potential(const potential&);
 
@@ -94,6 +102,14 @@ public:
         //- Construct from mesh reference
         potential(const polyMesh& mesh);
 
+        //- Construct from mdInitialiseDict
+        potential
+        (
+            const polyMesh& mesh,
+            const IOdictionary& mdInitialiseDict,
+            IOdictionary& idListDict
+        );
+
     // Destructor
 
         ~potential();