46 |
|
#include "nonbonded/LJ.hpp" |
47 |
|
#include "utils/simError.h" |
48 |
|
|
49 |
– |
|
49 |
|
namespace OpenMD { |
50 |
|
|
51 |
< |
bool LJ::initialized_ = false; |
52 |
< |
bool LJ::shiftedPot_ = false; |
54 |
< |
bool LJ::shiftedFrc_ = false; |
55 |
< |
ForceField* LJ::forceField_ = NULL; |
56 |
< |
std::map<int, AtomType*> LJ::LJMap; |
57 |
< |
std::map<std::pair<AtomType*, AtomType*>, LJInteractionData> LJ::MixingMap; |
58 |
< |
|
59 |
< |
LJ* LJ::_instance = NULL; |
51 |
> |
LJ::LJ() : name_("LJ"), initialized_(false), shiftedPot_(false), |
52 |
> |
shiftedFrc_(false), forceField_(NULL) {} |
53 |
|
|
61 |
– |
LJ* LJ::Instance() { |
62 |
– |
if (!_instance) { |
63 |
– |
_instance = new LJ(); |
64 |
– |
} |
65 |
– |
return _instance; |
66 |
– |
} |
67 |
– |
|
54 |
|
LJParam LJ::getLJParam(AtomType* atomType) { |
55 |
|
|
56 |
|
// Do sanity checking on the AtomType we were passed before |
92 |
|
return ljParam.sigma; |
93 |
|
} |
94 |
|
|
109 |
– |
RealType LJ::getSigma(int atid) { |
110 |
– |
if (!initialized_) initialize(); |
111 |
– |
std::map<int, AtomType*> :: const_iterator it; |
112 |
– |
it = LJMap.find(atid); |
113 |
– |
if (it == LJMap.end()) { |
114 |
– |
sprintf( painCave.errMsg, |
115 |
– |
"LJ::getSigma could not find atid %d in LJMap\n", |
116 |
– |
(atid)); |
117 |
– |
painCave.severity = OPENMD_ERROR; |
118 |
– |
painCave.isFatal = 1; |
119 |
– |
simError(); |
120 |
– |
} |
121 |
– |
AtomType* atype = it->second; |
122 |
– |
|
123 |
– |
return getSigma(atype); |
124 |
– |
} |
125 |
– |
|
95 |
|
RealType LJ::getSigma(AtomType* atomType1, AtomType* atomType2) { |
96 |
|
RealType sigma1 = getSigma(atomType1); |
97 |
|
RealType sigma2 = getSigma(atomType2); |
98 |
|
|
99 |
|
ForceFieldOptions& fopts = forceField_->getForceFieldOptions(); |
100 |
< |
std::string DistanceMix = fopts.getDistanceMixingRule(); |
100 |
> |
string DistanceMix = fopts.getDistanceMixingRule(); |
101 |
|
toUpper(DistanceMix); |
102 |
|
|
103 |
|
if (DistanceMix == "GEOMETRIC") |
111 |
|
return ljParam.epsilon; |
112 |
|
} |
113 |
|
|
145 |
– |
RealType LJ::getEpsilon(int atid) { |
146 |
– |
if (!initialized_) initialize(); |
147 |
– |
std::map<int, AtomType*> :: const_iterator it; |
148 |
– |
it = LJMap.find(atid); |
149 |
– |
if (it == LJMap.end()) { |
150 |
– |
sprintf( painCave.errMsg, |
151 |
– |
"LJ::getEpsilon could not find atid %d in LJMap\n", |
152 |
– |
(atid)); |
153 |
– |
painCave.severity = OPENMD_ERROR; |
154 |
– |
painCave.isFatal = 1; |
155 |
– |
simError(); |
156 |
– |
} |
157 |
– |
AtomType* atype = it->second; |
158 |
– |
|
159 |
– |
return getEpsilon(atype); |
160 |
– |
} |
161 |
– |
|
114 |
|
RealType LJ::getEpsilon(AtomType* atomType1, AtomType* atomType2) { |
115 |
|
RealType epsilon1 = getEpsilon(atomType1); |
116 |
|
RealType epsilon2 = getEpsilon(atomType2); |
118 |
|
} |
119 |
|
|
120 |
|
void LJ::initialize() { |
121 |
< |
ForceField::AtomTypeContainer atomTypes = forceField_->getAtomTypes(); |
121 |
> |
ForceField::AtomTypeContainer* atomTypes = forceField_->getAtomTypes(); |
122 |
|
ForceField::AtomTypeContainer::MapTypeIterator i; |
123 |
|
AtomType* at; |
124 |
|
|
125 |
< |
for (at = atomTypes.beginType(i); at != NULL; |
126 |
< |
at = atomTypes.nextType(i)) { |
125 |
> |
for (at = atomTypes->beginType(i); at != NULL; |
126 |
> |
at = atomTypes->nextType(i)) { |
127 |
|
|
128 |
|
if (at->isLennardJones()) |
129 |
|
addType(at); |
130 |
|
} |
131 |
|
|
132 |
< |
ForceField::NonBondedInteractionTypeContainer nbiTypes = forceField_->getNonBondedInteractionTypes(); |
132 |
> |
ForceField::NonBondedInteractionTypeContainer* nbiTypes = forceField_->getNonBondedInteractionTypes(); |
133 |
|
ForceField::NonBondedInteractionTypeContainer::MapTypeIterator j; |
134 |
|
NonBondedInteractionType* nbt; |
135 |
|
|
136 |
< |
for (nbt = nbiTypes.beginType(j); nbt != NULL; |
137 |
< |
nbt = nbiTypes.nextType(j)) { |
136 |
> |
for (nbt = nbiTypes->beginType(j); nbt != NULL; |
137 |
> |
nbt = nbiTypes->nextType(j)) { |
138 |
|
|
139 |
|
if (nbt->isLennardJones()) { |
140 |
|
|
141 |
< |
std::pair<AtomType*, AtomType*> atypes = nbt->getAtomTypes(); |
141 |
> |
pair<AtomType*, AtomType*> atypes = nbt->getAtomTypes(); |
142 |
|
|
143 |
|
GenericData* data = nbt->getPropertyByName("LennardJones"); |
144 |
|
if (data == NULL) { |
179 |
|
void LJ::addType(AtomType* atomType){ |
180 |
|
RealType sigma1 = getSigma(atomType); |
181 |
|
RealType epsilon1 = getEpsilon(atomType); |
182 |
< |
|
182 |
> |
|
183 |
|
// add it to the map: |
184 |
|
AtomTypeProperties atp = atomType->getATP(); |
185 |
|
|
186 |
< |
std::pair<std::map<int,AtomType*>::iterator,bool> ret; |
187 |
< |
ret = LJMap.insert( std::pair<int, AtomType*>(atp.ident, atomType) ); |
186 |
> |
pair<map<int,AtomType*>::iterator,bool> ret; |
187 |
> |
ret = LJMap.insert( pair<int, AtomType*>(atp.ident, atomType) ); |
188 |
|
if (ret.second == false) { |
189 |
|
sprintf( painCave.errMsg, |
190 |
|
"LJ already had a previous entry with ident %d\n", |
240 |
|
} |
241 |
|
} |
242 |
|
|
243 |
< |
void LJ::calcForce(AtomType* at1, AtomType* at2, Vector3d d, |
244 |
< |
RealType rij, RealType r2, RealType rcut, RealType sw, |
293 |
< |
RealType vdwMult, RealType &vpair, RealType &pot, |
294 |
< |
Vector3d &f1) { |
295 |
< |
|
243 |
> |
void LJ::calcForce(InteractionData idat) { |
244 |
> |
|
245 |
|
if (!initialized_) initialize(); |
246 |
|
|
247 |
< |
RealType ros; |
248 |
< |
RealType rcos; |
249 |
< |
RealType myPot = 0.0; |
301 |
< |
RealType myPotC = 0.0; |
302 |
< |
RealType myDeriv = 0.0; |
303 |
< |
RealType myDerivC = 0.0; |
304 |
< |
|
305 |
< |
std::pair<AtomType*, AtomType*> key = std::make_pair(at1, at2); |
306 |
< |
LJInteractionData mixer = MixingMap[key]; |
307 |
< |
|
308 |
< |
RealType sigmai = mixer.sigmai; |
309 |
< |
RealType epsilon = mixer.epsilon; |
247 |
> |
pair<AtomType*, AtomType*> key = make_pair(idat.atype1, idat.atype2); |
248 |
> |
map<pair<AtomType*, AtomType*>, LJInteractionData>::iterator it; |
249 |
> |
it = MixingMap.find(key); |
250 |
|
|
251 |
< |
|
252 |
< |
ros = rij * sigmai; |
253 |
< |
|
254 |
< |
getLJfunc(ros, myPot, myDeriv); |
251 |
> |
if (it != MixingMap.end()) { |
252 |
> |
|
253 |
> |
LJInteractionData mixer = (*it).second; |
254 |
> |
|
255 |
> |
RealType sigmai = mixer.sigmai; |
256 |
> |
RealType epsilon = mixer.epsilon; |
257 |
> |
|
258 |
> |
RealType ros; |
259 |
> |
RealType rcos; |
260 |
> |
RealType myPot = 0.0; |
261 |
> |
RealType myPotC = 0.0; |
262 |
> |
RealType myDeriv = 0.0; |
263 |
> |
RealType myDerivC = 0.0; |
264 |
> |
|
265 |
> |
ros = idat.rij * sigmai; |
266 |
> |
|
267 |
> |
getLJfunc(ros, myPot, myDeriv); |
268 |
> |
|
269 |
> |
if (shiftedPot_) { |
270 |
> |
rcos = idat.rcut * sigmai; |
271 |
> |
getLJfunc(rcos, myPotC, myDerivC); |
272 |
> |
myDerivC = 0.0; |
273 |
> |
} else if (LJ::shiftedFrc_) { |
274 |
> |
rcos = idat.rcut * sigmai; |
275 |
> |
getLJfunc(rcos, myPotC, myDerivC); |
276 |
> |
myPotC = myPotC + myDerivC * (idat.rij - idat.rcut) * sigmai; |
277 |
> |
} else { |
278 |
> |
myPotC = 0.0; |
279 |
> |
myDerivC = 0.0; |
280 |
> |
} |
281 |
|
|
282 |
< |
if (shiftedPot_) { |
283 |
< |
rcos = rcut * sigmai; |
284 |
< |
getLJfunc(rcos, myPotC, myDerivC); |
285 |
< |
myDerivC = 0.0; |
286 |
< |
} else if (LJ::shiftedFrc_) { |
287 |
< |
rcos = rcut * sigmai; |
288 |
< |
getLJfunc(rcos, myPotC, myDerivC); |
289 |
< |
myPotC = myPotC + myDerivC * (rij - rcut) * sigmai; |
290 |
< |
} else { |
325 |
< |
myPotC = 0.0; |
326 |
< |
myDerivC = 0.0; |
282 |
> |
RealType pot_temp = idat.vdwMult * epsilon * (myPot - myPotC); |
283 |
> |
idat.vpair += pot_temp; |
284 |
> |
|
285 |
> |
RealType dudr = idat.sw * idat.vdwMult * epsilon * (myDeriv - |
286 |
> |
myDerivC)*sigmai; |
287 |
> |
|
288 |
> |
idat.pot += idat.sw * pot_temp; |
289 |
> |
idat.f1 = idat.d * dudr / idat.rij; |
290 |
> |
|
291 |
|
} |
328 |
– |
|
329 |
– |
RealType pot_temp = vdwMult * epsilon * (myPot - myPotC); |
330 |
– |
vpair += pot_temp; |
331 |
– |
|
332 |
– |
RealType dudr = sw * vdwMult * epsilon * (myDeriv - myDerivC)*sigmai; |
333 |
– |
|
334 |
– |
pot += sw * pot_temp; |
335 |
– |
f1 = d * dudr / rij; |
336 |
– |
|
292 |
|
return; |
338 |
– |
|
339 |
– |
|
340 |
– |
|
293 |
|
} |
342 |
– |
|
343 |
– |
void LJ::do_lj_pair(int *atid1, int *atid2, RealType *d, RealType *rij, |
344 |
– |
RealType *r2, RealType *rcut, RealType *sw, |
345 |
– |
RealType *vdwMult, |
346 |
– |
RealType *vpair, RealType *pot, RealType *f1) { |
347 |
– |
|
348 |
– |
if (!initialized_) initialize(); |
349 |
– |
|
350 |
– |
AtomType* atype1 = LJMap[*atid1]; |
351 |
– |
AtomType* atype2 = LJMap[*atid2]; |
352 |
– |
|
353 |
– |
Vector3d disp(d[0], d[1], d[2]); |
354 |
– |
Vector3d frc(f1[0], f1[1], f1[2]); |
355 |
– |
|
356 |
– |
calcForce(atype1, atype2, disp, *rij, *r2, *rcut, *sw, *vdwMult, *vpair, |
357 |
– |
*pot, frc); |
358 |
– |
|
359 |
– |
f1[0] = frc.x(); |
360 |
– |
f1[1] = frc.y(); |
361 |
– |
f1[2] = frc.z(); |
362 |
– |
|
363 |
– |
return; |
364 |
– |
} |
294 |
|
|
295 |
|
void LJ::getLJfunc(RealType r, RealType &pot, RealType &deriv) { |
296 |
|
|
307 |
|
return; |
308 |
|
} |
309 |
|
|
310 |
< |
|
311 |
< |
void LJ::setLJDefaultCutoff(RealType *thisRcut, int *sP, int *sF) { |
312 |
< |
shiftedPot_ = (bool)(*sP); |
313 |
< |
shiftedFrc_ = (bool)(*sF); |
310 |
> |
RealType LJ::getSuggestedCutoffRadius(AtomType* at1, AtomType* at2) { |
311 |
> |
if (!initialized_) initialize(); |
312 |
> |
pair<AtomType*, AtomType*> key = make_pair(at1, at2); |
313 |
> |
map<pair<AtomType*, AtomType*>, LJInteractionData>::iterator it; |
314 |
> |
it = MixingMap.find(key); |
315 |
> |
if (it == MixingMap.end()) |
316 |
> |
return 0.0; |
317 |
> |
else { |
318 |
> |
LJInteractionData mixer = (*it).second; |
319 |
> |
return 2.5 * mixer.sigma; |
320 |
> |
} |
321 |
|
} |
386 |
– |
} |
322 |
|
|
388 |
– |
extern "C" { |
389 |
– |
|
390 |
– |
#define fortranGetSigma FC_FUNC(getsigma, GETSIGMA) |
391 |
– |
#define fortranGetEpsilon FC_FUNC(getepsilon, GETEPSILON) |
392 |
– |
#define fortranSetLJCutoff FC_FUNC(setljdefaultcutoff, SETLJDEFAULTCUTOFF) |
393 |
– |
#define fortranDoLJPair FC_FUNC(do_lj_pair, DO_LJ_PAIR) |
394 |
– |
|
395 |
– |
RealType fortranGetSigma(int* atid) { |
396 |
– |
return OpenMD::LJ::Instance()->getSigma(*atid); |
397 |
– |
} |
398 |
– |
RealType fortranGetEpsilon(int* atid) { |
399 |
– |
return OpenMD::LJ::Instance()->getEpsilon(*atid); |
400 |
– |
} |
401 |
– |
void fortranSetLJCutoff(RealType *rcut, int *shiftedPot, int *shiftedFrc) { |
402 |
– |
return OpenMD::LJ::Instance()->setLJDefaultCutoff(rcut, shiftedPot, |
403 |
– |
shiftedFrc); |
404 |
– |
} |
405 |
– |
void fortranDoLJPair(int *atid1, int *atid2, RealType *d, RealType *rij, |
406 |
– |
RealType *r2, RealType *rcut, RealType *sw, |
407 |
– |
RealType *vdwMult, RealType* vpair, RealType* pot, |
408 |
– |
RealType *f1){ |
409 |
– |
|
410 |
– |
return OpenMD::LJ::Instance()->do_lj_pair(atid1, atid2, d, rij, r2, rcut, |
411 |
– |
sw, vdwMult, vpair, pot, f1); |
412 |
– |
} |
323 |
|
} |