31 siteMasses_(
List<scalar>(0)),
32 siteCharges_(
List<scalar>(0)),
34 pairPotentialSites_(
List<bool>(false)),
35 electrostaticSites_(
List<bool>(false)),
46 siteReferencePositions_(dict.
lookup(
"siteReferencePositions")),
47 siteMasses_(dict.
lookup(
"siteMasses")),
48 siteCharges_(dict.
lookup(
"siteCharges")),
50 pairPotentialSites_(),
51 electrostaticSites_(),
57 setInteracionSiteBools
63 mass_ =
sum(siteMasses_);
70 forAll(siteReferencePositions_, i)
72 centreOfMass += siteReferencePositions_[i]*siteMasses_[i];
75 centreOfMass /= mass_;
77 siteReferencePositions_ -= centreOfMass;
79 if (siteIds_.
size() == 1)
87 else if (linearMoleculeTest())
93 vector dir = siteReferencePositions_[1] - siteReferencePositions_[0];
99 siteReferencePositions_ = (Q & siteReferencePositions_);
106 forAll(siteReferencePositions_, i)
108 centreOfMass += siteReferencePositions_[i]*siteMasses_[i];
111 centreOfMass /= mass_;
113 siteReferencePositions_ -= centreOfMass;
117 forAll(siteReferencePositions_, i)
119 const vector&
p(siteReferencePositions_[i]);
140 forAll(siteReferencePositions_, i)
142 const vector&
p(siteReferencePositions_[i]);
144 momOfInertia += siteMasses_[i]*
tensor 146 p.
y()*p.
y() + p.
z()*p.
z(), -p.
x()*p.
y(), -p.
x()*p.
z(),
147 -p.
y()*p.
x(), p.
x()*p.
x() + p.
z()*p.
z(), -p.
y()*p.
z(),
148 -p.
z()*p.
x(), -p.
z()*p.
y(), p.
x()*p.
x() + p.
y()*p.
y()
154 FatalErrorIn(
"molecule::constantProperties::constantProperties")
155 <<
"An eigenvalue of the inertia tensor is zero, the molecule " 156 << dict.
name() <<
" is not a valid 6DOF shape." 175 siteReferencePositions_ = (Q & siteReferencePositions_);
184 forAll(siteReferencePositions_, i)
186 centreOfMass += siteReferencePositions_[i]*siteMasses_[i];
189 centreOfMass /= mass_;
191 siteReferencePositions_ -= centreOfMass;
198 forAll(siteReferencePositions_, i)
200 const vector&
p(siteReferencePositions_[i]);
202 momOfInertia += siteMasses_[i]*
tensor 204 p.
y()*p.
y() + p.
z()*p.
z(), -p.
x()*p.
y(), -p.
x()*p.
z(),
205 -p.
y()*p.
x(), p.
x()*p.
x() + p.
z()*p.
z(), -p.
y()*p.
z(),
206 -p.
z()*p.
x(), -p.
z()*p.
y(), p.
x()*p.
x() + p.
y()*p.
y()
225 const label tetFaceI,
232 const vector& specialPosition,
239 particle(mesh, position, cellI, tetFaceI, tetPtI),
245 specialPosition_(specialPosition),
246 potentialEnergy_(0.0),
251 sitePositions_(constProps.
nSites())
259 inline void Foam::molecule::constantProperties::checkSiteListSizes()
const 263 siteIds_.
size() != siteReferencePositions_.
size()
264 || siteIds_.
size() != siteCharges_.
size()
267 FatalErrorIn(
"molecule::constantProperties::checkSiteListSizes")
268 <<
"Sizes of site id, charge and " 269 <<
"referencePositions are not the same. " 275 inline void Foam::molecule::constantProperties::setInteracionSiteBools
287 const word&
id(siteIds[i]);
289 pairPotentialSites_[i] = (
findIndex(pairPotSiteIds,
id) > -1);
291 electrostaticSites_[i] = (
mag(siteCharges_[i]) > VSMALL);
296 inline bool Foam::molecule::constantProperties::linearMoleculeTest()
const 298 if (siteIds_.
size() == 2)
303 vector refDir = siteReferencePositions_[1] - siteReferencePositions_[0];
305 refDir /=
mag(refDir);
310 i < siteReferencePositions_.size();
314 vector dir = siteReferencePositions_[i] - siteReferencePositions_[i-1];
318 if (
mag(refDir & dir) < 1 - SMALL)
333 return siteReferencePositions_;
368 return pairPotentialSites_;
382 << sId <<
" site not found." 386 return pairPotentialSites_[
s];
393 return electrostaticSites_;
408 "molecule::constantProperties::electrostaticSite(label)" 409 ) << sId <<
" site not found." 413 return electrostaticSites_[
s];
420 return momentOfInertia_;
426 return ((momentOfInertia_.
xx() < 0) && (momentOfInertia_.
yy() > 0));
432 return (momentOfInertia_.
zz() < 0);
461 return siteIds_.
size();
542 return sitePositions_;
548 return sitePositions_;
554 return specialPosition_;
560 return specialPosition_;
566 return potentialEnergy_;
572 return potentialEnergy_;
dimensionedVector eigenValues(const dimensionedTensor &dt)
label findIndex(const ListType &, typename ListType::const_reference, const label start=0)
Find first occurence of given element and return index,.
gmvFile<< "tracers "<< particles.size()<< nl;forAllConstIter(Cloud< passiveParticle >, particles, iter){gmvFile<< iter().position().x()<< " ";}gmvFile<< nl;forAllConstIter(Cloud< passiveParticle >, particles, iter){gmvFile<< iter().position().y()<< " ";}gmvFile<< nl;forAllConstIter(Cloud< passiveParticle >, particles, iter){gmvFile<< iter().position().z()<< " ";}gmvFile<< nl;forAll(lagrangianScalarNames, i){word name=lagrangianScalarNames[i];IOField< scalar > s(IOobject( name, runTime.timeName(), cloud::prefix, mesh, IOobject::MUST_READ, IOobject::NO_WRITE ))
const Field< vector > & siteReferencePositions() const
dimensioned< scalar > mag(const dimensioned< Type > &)
void setSitePositions(const constantProperties &constProps)
const vector & tau() const
Tensor< scalar > tensor
Tensor of scalars.
const List< vector > & sitePositions() const
A class for handling words, derived from string.
intWM_LABEL_SIZE_t label
A label is an int32_t or int64_t as specified by the pre-processor macro WM_LABEL_SIZE.
void size(const label)
Override size to be inconsistent with allocated storage.
const List< vector > & siteForces() const
const fileName & name() const
Return the dictionary name.
const List< scalar > & siteCharges() const
A list of keyword definitions, which are a keyword followed by any number of values (e...
const vector & pi() const
dimensionedTensor eigenVectors(const dimensionedTensor &dt)
const List< scalar > & siteMasses() const
Class to hold molecule constant properties.
const List< label > & siteIds() const
A 1D array of objects of type <T>, where the size of the vector is known and used for subscript bound...
DiagTensor< scalar > diagTensor
A scalar version of the templated DiagTensor.
const double e
Elementary charge.
void setSize(const label)
Reset size of List.
Ostream & endl(Ostream &os)
Add newline and flush stream.
static const DiagTensor zero
dimensioned< Type > sum(const DimensionedField< Type, GeoMesh > &df)
Pre-declare SubField and related Field type.
errorManip< error > abort(error &err)
const List< bool > & pairPotentialSites() const
#define FatalErrorIn(functionName)
Report an error message using Foam::FatalError.
molecule(const polyMesh &mesh, const vector &position, const label cellI, const label tetFaceI, const label tetPtI, const tensor &Q, const vector &v, const vector &a, const vector &pi, const vector &tau, const vector &specialPosition, const constantProperties &constProps, const label special, const label id)
Construct from components.
label degreesOfFreedom() const
Mesh consisting of general polyhedral cells.
const tensor & rf() const
ITstream & lookup(const word &, bool recursive=false, bool patternMatch=true) const
Find and return an entry data stream.
particle(const polyMesh &mesh, const vector &position, const label cellI, const label tetFaceI, const label tetPtI)
Construct from components.
Vector< scalar > vector
A scalar version of the templated Vector.
bool pairPotentialSite(label sId) const
bool electrostaticSite(label sId) const
const diagTensor & momentOfInertia() const
bool linearMolecule() const
tensor rotationTensor(const vector &n1, const vector &n2)
bool pointMolecule() const
const List< bool > & electrostaticSites() const
const vector & specialPosition() const
scalar potentialEnergy() const