53 |
|
#include "brains/SimInfo.hpp" |
54 |
|
#include "math/Vector3.hpp" |
55 |
|
#include "primitives/Molecule.hpp" |
56 |
+ |
#include "primitives/StuntDouble.hpp" |
57 |
|
#include "UseTheForce/fCutoffPolicy.h" |
58 |
|
#include "UseTheForce/DarkSide/fElectrostaticSummationMethod.h" |
59 |
|
#include "UseTheForce/DarkSide/fElectrostaticScreeningMethod.h" |
85 |
|
|
86 |
|
SimInfo::SimInfo(ForceField* ff, Globals* simParams) : |
87 |
|
forceField_(ff), simParams_(simParams), |
88 |
< |
ndf_(0), ndfRaw_(0), ndfTrans_(0), nZconstraint_(0), |
88 |
> |
ndf_(0), fdf_local(0), ndfRaw_(0), ndfTrans_(0), nZconstraint_(0), |
89 |
|
nGlobalMols_(0), nGlobalAtoms_(0), nGlobalCutoffGroups_(0), |
90 |
|
nGlobalIntegrableObjects_(0), nGlobalRigidBodies_(0), |
91 |
|
nAtoms_(0), nBonds_(0), nBends_(0), nTorsions_(0), nRigidBodies_(0), |
92 |
|
nIntegrableObjects_(0), nCutoffGroups_(0), nConstraints_(0), |
93 |
< |
sman_(NULL), fortranInitialized_(false) { |
93 |
> |
sman_(NULL), fortranInitialized_(false), calcBoxDipole_(false) { |
94 |
|
|
95 |
|
MoleculeStamp* molStamp; |
96 |
|
int nMolWithSameStamp; |
291 |
|
|
292 |
|
} |
293 |
|
|
294 |
+ |
int SimInfo::getFdf() { |
295 |
+ |
#ifdef IS_MPI |
296 |
+ |
MPI_Allreduce(&fdf_local,&fdf_,1,MPI_INT,MPI_SUM, MPI_COMM_WORLD); |
297 |
+ |
#else |
298 |
+ |
fdf_ = fdf_local; |
299 |
+ |
#endif |
300 |
+ |
return fdf_; |
301 |
+ |
} |
302 |
+ |
|
303 |
|
void SimInfo::calcNdfRaw() { |
304 |
|
int ndfRaw_local; |
305 |
|
|
601 |
|
/** @deprecate */ |
602 |
|
int isError = 0; |
603 |
|
|
604 |
+ |
setupCutoff(); |
605 |
+ |
|
606 |
|
setupElectrostaticSummationMethod( isError ); |
607 |
|
setupSwitchingFunction(); |
608 |
+ |
setupAccumulateBoxDipole(); |
609 |
|
|
610 |
|
if(isError){ |
611 |
|
sprintf( painCave.errMsg, |
613 |
|
painCave.isFatal = 1; |
614 |
|
simError(); |
615 |
|
} |
603 |
– |
|
604 |
– |
|
605 |
– |
setupCutoff(); |
616 |
|
|
617 |
|
calcNdf(); |
618 |
|
calcNdfRaw(); |
662 |
|
int usePBC = simParams_->getUsePeriodicBoundaryConditions(); |
663 |
|
int useRF; |
664 |
|
int useSF; |
665 |
+ |
int useSP; |
666 |
+ |
int useBoxDipole; |
667 |
|
std::string myMethod; |
668 |
|
|
669 |
|
// set the useRF logical |
670 |
|
useRF = 0; |
671 |
|
useSF = 0; |
672 |
+ |
useSP = 0; |
673 |
|
|
674 |
|
|
675 |
|
if (simParams_->haveElectrostaticSummationMethod()) { |
676 |
|
std::string myMethod = simParams_->getElectrostaticSummationMethod(); |
677 |
|
toUpper(myMethod); |
678 |
< |
if (myMethod == "REACTION_FIELD") { |
679 |
< |
useRF=1; |
680 |
< |
} else { |
681 |
< |
if (myMethod == "SHIFTED_FORCE") { |
682 |
< |
useSF = 1; |
683 |
< |
} |
678 |
> |
if (myMethod == "REACTION_FIELD"){ |
679 |
> |
useRF = 1; |
680 |
> |
} else if (myMethod == "SHIFTED_FORCE"){ |
681 |
> |
useSF = 1; |
682 |
> |
} else if (myMethod == "SHIFTED_POTENTIAL"){ |
683 |
> |
useSP = 1; |
684 |
|
} |
685 |
|
} |
686 |
+ |
|
687 |
+ |
if (simParams_->haveAccumulateBoxDipole()) |
688 |
+ |
if (simParams_->getAccumulateBoxDipole()) |
689 |
+ |
useBoxDipole = 1; |
690 |
|
|
691 |
|
//loop over all of the atom types |
692 |
|
for (i = atomTypes.begin(); i != atomTypes.end(); ++i) { |
757 |
|
MPI_Allreduce(&temp, &useRF, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
758 |
|
|
759 |
|
temp = useSF; |
760 |
< |
MPI_Allreduce(&temp, &useSF, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
760 |
> |
MPI_Allreduce(&temp, &useSF, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
761 |
|
|
762 |
+ |
temp = useSP; |
763 |
+ |
MPI_Allreduce(&temp, &useSP, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
764 |
+ |
|
765 |
+ |
temp = useBoxDipole; |
766 |
+ |
MPI_Allreduce(&temp, &useBoxDipole, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
767 |
+ |
|
768 |
|
#endif |
769 |
|
|
770 |
|
fInfo_.SIM_uses_PBC = usePBC; |
782 |
|
fInfo_.SIM_uses_FLARB = useFLARB; |
783 |
|
fInfo_.SIM_uses_RF = useRF; |
784 |
|
fInfo_.SIM_uses_SF = useSF; |
785 |
< |
|
786 |
< |
if( myMethod == "REACTION_FIELD") { |
764 |
< |
|
765 |
< |
if (simParams_->haveDielectric()) { |
766 |
< |
fInfo_.dielect = simParams_->getDielectric(); |
767 |
< |
} else { |
768 |
< |
sprintf(painCave.errMsg, |
769 |
< |
"SimSetup Error: No Dielectric constant was set.\n" |
770 |
< |
"\tYou are trying to use Reaction Field without" |
771 |
< |
"\tsetting a dielectric constant!\n"); |
772 |
< |
painCave.isFatal = 1; |
773 |
< |
simError(); |
774 |
< |
} |
775 |
< |
} |
776 |
< |
|
785 |
> |
fInfo_.SIM_uses_SP = useSP; |
786 |
> |
fInfo_.SIM_uses_BoxDipole = useBoxDipole; |
787 |
|
} |
788 |
|
|
789 |
|
void SimInfo::setupFortranSim() { |
800 |
|
} |
801 |
|
|
802 |
|
//calculate mass ratio of cutoff group |
803 |
< |
std::vector<double> mfact; |
803 |
> |
std::vector<RealType> mfact; |
804 |
|
SimInfo::MoleculeIterator mi; |
805 |
|
Molecule* mol; |
806 |
|
Molecule::CutoffGroupIterator ci; |
807 |
|
CutoffGroup* cg; |
808 |
|
Molecule::AtomIterator ai; |
809 |
|
Atom* atom; |
810 |
< |
double totalMass; |
810 |
> |
RealType totalMass; |
811 |
|
|
812 |
|
//to avoid memory reallocation, reserve enough space for mfact |
813 |
|
mfact.reserve(getNCutoffGroups()); |
967 |
|
notifyFortranCutoffPolicy(&cp); |
968 |
|
|
969 |
|
// Check the Skin Thickness for neighborlists |
970 |
< |
double skin; |
970 |
> |
RealType skin; |
971 |
|
if (simParams_->haveSkinThickness()) { |
972 |
|
skin = simParams_->getSkinThickness(); |
973 |
|
notifyFortranSkinThickness(&skin); |
979 |
|
if (simParams_->haveSwitchingRadius()) { |
980 |
|
rsw_ = simParams_->getSwitchingRadius(); |
981 |
|
} else { |
982 |
< |
rsw_ = rcut_; |
982 |
> |
if (fInfo_.SIM_uses_Charges | |
983 |
> |
fInfo_.SIM_uses_Dipoles | |
984 |
> |
fInfo_.SIM_uses_RF) { |
985 |
> |
|
986 |
> |
rsw_ = 0.85 * rcut_; |
987 |
> |
sprintf(painCave.errMsg, |
988 |
> |
"SimCreator Warning: No value was set for the switchingRadius.\n" |
989 |
> |
"\tOOPSE will use a default value of 85 percent of the cutoffRadius.\n" |
990 |
> |
"\tswitchingRadius = %f. for this simulation\n", rsw_); |
991 |
> |
painCave.isFatal = 0; |
992 |
> |
simError(); |
993 |
> |
} else { |
994 |
> |
rsw_ = rcut_; |
995 |
> |
sprintf(painCave.errMsg, |
996 |
> |
"SimCreator Warning: No value was set for the switchingRadius.\n" |
997 |
> |
"\tOOPSE will use the same value as the cutoffRadius.\n" |
998 |
> |
"\tswitchingRadius = %f. for this simulation\n", rsw_); |
999 |
> |
painCave.isFatal = 0; |
1000 |
> |
simError(); |
1001 |
> |
} |
1002 |
|
} |
1003 |
+ |
|
1004 |
|
notifyFortranCutoffs(&rcut_, &rsw_); |
1005 |
|
|
1006 |
|
} else { |
1057 |
|
int errorOut; |
1058 |
|
int esm = NONE; |
1059 |
|
int sm = UNDAMPED; |
1060 |
< |
double alphaVal; |
1061 |
< |
double dielectric; |
1062 |
< |
|
1060 |
> |
RealType alphaVal; |
1061 |
> |
RealType dielectric; |
1062 |
> |
|
1063 |
|
errorOut = isError; |
1034 |
– |
alphaVal = simParams_->getDampingAlpha(); |
1035 |
– |
dielectric = simParams_->getDielectric(); |
1064 |
|
|
1065 |
|
if (simParams_->haveElectrostaticSummationMethod()) { |
1066 |
|
std::string myMethod = simParams_->getElectrostaticSummationMethod(); |
1077 |
|
if (myMethod == "SHIFTED_FORCE") { |
1078 |
|
esm = SHIFTED_FORCE; |
1079 |
|
} else { |
1080 |
< |
if (myMethod == "REACTION_FIELD") { |
1080 |
> |
if (myMethod == "REACTION_FIELD") { |
1081 |
|
esm = REACTION_FIELD; |
1082 |
+ |
dielectric = simParams_->getDielectric(); |
1083 |
+ |
if (!simParams_->haveDielectric()) { |
1084 |
+ |
// throw warning |
1085 |
+ |
sprintf( painCave.errMsg, |
1086 |
+ |
"SimInfo warning: dielectric was not specified in the input file\n\tfor the reaction field correction method.\n" |
1087 |
+ |
"\tA default value of %f will be used for the dielectric.\n", dielectric); |
1088 |
+ |
painCave.isFatal = 0; |
1089 |
+ |
simError(); |
1090 |
+ |
} |
1091 |
|
} else { |
1092 |
|
// throw error |
1093 |
|
sprintf( painCave.errMsg, |
1114 |
|
if (myScreen == "DAMPED") { |
1115 |
|
sm = DAMPED; |
1116 |
|
if (!simParams_->haveDampingAlpha()) { |
1117 |
< |
//throw error |
1117 |
> |
// first set a cutoff dependent alpha value |
1118 |
> |
// we assume alpha depends linearly with rcut from 0 to 20.5 ang |
1119 |
> |
alphaVal = 0.5125 - rcut_* 0.025; |
1120 |
> |
// for values rcut > 20.5, alpha is zero |
1121 |
> |
if (alphaVal < 0) alphaVal = 0; |
1122 |
> |
|
1123 |
> |
// throw warning |
1124 |
|
sprintf( painCave.errMsg, |
1125 |
|
"SimInfo warning: dampingAlpha was not specified in the input file.\n" |
1126 |
< |
"\tA default value of %f (1/ang) will be used.\n", alphaVal); |
1126 |
> |
"\tA default value of %f (1/ang) will be used for the cutoff of\n\t%f (ang).\n", alphaVal, rcut_); |
1127 |
|
painCave.isFatal = 0; |
1128 |
|
simError(); |
1129 |
|
} |
1175 |
|
|
1176 |
|
} |
1177 |
|
|
1178 |
+ |
void SimInfo::setupAccumulateBoxDipole() { |
1179 |
+ |
|
1180 |
+ |
// we only call setAccumulateBoxDipole if the accumulateBoxDipole parameter is true |
1181 |
+ |
if ( simParams_->haveAccumulateBoxDipole() ) |
1182 |
+ |
if ( simParams_->getAccumulateBoxDipole() ) { |
1183 |
+ |
setAccumulateBoxDipole(); |
1184 |
+ |
calcBoxDipole_ = true; |
1185 |
+ |
} |
1186 |
+ |
|
1187 |
+ |
} |
1188 |
+ |
|
1189 |
|
void SimInfo::addProperty(GenericData* genData) { |
1190 |
|
properties_.addProperty(genData); |
1191 |
|
} |
1242 |
|
Molecule* mol; |
1243 |
|
|
1244 |
|
Vector3d comVel(0.0); |
1245 |
< |
double totalMass = 0.0; |
1245 |
> |
RealType totalMass = 0.0; |
1246 |
|
|
1247 |
|
|
1248 |
|
for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) { |
1249 |
< |
double mass = mol->getMass(); |
1249 |
> |
RealType mass = mol->getMass(); |
1250 |
|
totalMass += mass; |
1251 |
|
comVel += mass * mol->getComVel(); |
1252 |
|
} |
1253 |
|
|
1254 |
|
#ifdef IS_MPI |
1255 |
< |
double tmpMass = totalMass; |
1255 |
> |
RealType tmpMass = totalMass; |
1256 |
|
Vector3d tmpComVel(comVel); |
1257 |
< |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
1258 |
< |
MPI_Allreduce(tmpComVel.getArrayPointer(), comVel.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
1257 |
> |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
1258 |
> |
MPI_Allreduce(tmpComVel.getArrayPointer(), comVel.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
1259 |
|
#endif |
1260 |
|
|
1261 |
|
comVel /= totalMass; |
1268 |
|
Molecule* mol; |
1269 |
|
|
1270 |
|
Vector3d com(0.0); |
1271 |
< |
double totalMass = 0.0; |
1271 |
> |
RealType totalMass = 0.0; |
1272 |
|
|
1273 |
|
for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) { |
1274 |
< |
double mass = mol->getMass(); |
1274 |
> |
RealType mass = mol->getMass(); |
1275 |
|
totalMass += mass; |
1276 |
|
com += mass * mol->getCom(); |
1277 |
|
} |
1278 |
|
|
1279 |
|
#ifdef IS_MPI |
1280 |
< |
double tmpMass = totalMass; |
1280 |
> |
RealType tmpMass = totalMass; |
1281 |
|
Vector3d tmpCom(com); |
1282 |
< |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
1283 |
< |
MPI_Allreduce(tmpCom.getArrayPointer(), com.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
1282 |
> |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
1283 |
> |
MPI_Allreduce(tmpCom.getArrayPointer(), com.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
1284 |
|
#endif |
1285 |
|
|
1286 |
|
com /= totalMass; |
1304 |
|
Molecule* mol; |
1305 |
|
|
1306 |
|
|
1307 |
< |
double totalMass = 0.0; |
1307 |
> |
RealType totalMass = 0.0; |
1308 |
|
|
1309 |
|
|
1310 |
|
for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) { |
1311 |
< |
double mass = mol->getMass(); |
1311 |
> |
RealType mass = mol->getMass(); |
1312 |
|
totalMass += mass; |
1313 |
|
com += mass * mol->getCom(); |
1314 |
|
comVel += mass * mol->getComVel(); |
1315 |
|
} |
1316 |
|
|
1317 |
|
#ifdef IS_MPI |
1318 |
< |
double tmpMass = totalMass; |
1318 |
> |
RealType tmpMass = totalMass; |
1319 |
|
Vector3d tmpCom(com); |
1320 |
|
Vector3d tmpComVel(comVel); |
1321 |
< |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
1322 |
< |
MPI_Allreduce(tmpCom.getArrayPointer(), com.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
1323 |
< |
MPI_Allreduce(tmpComVel.getArrayPointer(), comVel.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
1321 |
> |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
1322 |
> |
MPI_Allreduce(tmpCom.getArrayPointer(), com.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
1323 |
> |
MPI_Allreduce(tmpComVel.getArrayPointer(), comVel.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
1324 |
|
#endif |
1325 |
|
|
1326 |
|
com /= totalMass; |
1339 |
|
void SimInfo::getInertiaTensor(Mat3x3d &inertiaTensor, Vector3d &angularMomentum){ |
1340 |
|
|
1341 |
|
|
1342 |
< |
double xx = 0.0; |
1343 |
< |
double yy = 0.0; |
1344 |
< |
double zz = 0.0; |
1345 |
< |
double xy = 0.0; |
1346 |
< |
double xz = 0.0; |
1347 |
< |
double yz = 0.0; |
1342 |
> |
RealType xx = 0.0; |
1343 |
> |
RealType yy = 0.0; |
1344 |
> |
RealType zz = 0.0; |
1345 |
> |
RealType xy = 0.0; |
1346 |
> |
RealType xz = 0.0; |
1347 |
> |
RealType yz = 0.0; |
1348 |
|
Vector3d com(0.0); |
1349 |
|
Vector3d comVel(0.0); |
1350 |
|
|
1356 |
|
Vector3d thisq(0.0); |
1357 |
|
Vector3d thisv(0.0); |
1358 |
|
|
1359 |
< |
double thisMass = 0.0; |
1359 |
> |
RealType thisMass = 0.0; |
1360 |
|
|
1361 |
|
|
1362 |
|
|
1394 |
|
#ifdef IS_MPI |
1395 |
|
Mat3x3d tmpI(inertiaTensor); |
1396 |
|
Vector3d tmpAngMom; |
1397 |
< |
MPI_Allreduce(tmpI.getArrayPointer(), inertiaTensor.getArrayPointer(),9,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
1398 |
< |
MPI_Allreduce(tmpAngMom.getArrayPointer(), angularMomentum.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
1397 |
> |
MPI_Allreduce(tmpI.getArrayPointer(), inertiaTensor.getArrayPointer(),9,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
1398 |
> |
MPI_Allreduce(tmpAngMom.getArrayPointer(), angularMomentum.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
1399 |
|
#endif |
1400 |
|
|
1401 |
|
return; |
1416 |
|
Vector3d thisr(0.0); |
1417 |
|
Vector3d thisp(0.0); |
1418 |
|
|
1419 |
< |
double thisMass; |
1419 |
> |
RealType thisMass; |
1420 |
|
|
1421 |
|
for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) { |
1422 |
|
thisMass = mol->getMass(); |
1429 |
|
|
1430 |
|
#ifdef IS_MPI |
1431 |
|
Vector3d tmpAngMom; |
1432 |
< |
MPI_Allreduce(tmpAngMom.getArrayPointer(), angularMomentum.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
1432 |
> |
MPI_Allreduce(tmpAngMom.getArrayPointer(), angularMomentum.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
1433 |
|
#endif |
1434 |
|
|
1435 |
|
return angularMomentum; |
1436 |
|
} |
1437 |
|
|
1438 |
< |
|
1438 |
> |
StuntDouble* SimInfo::getIOIndexToIntegrableObject(int index) { |
1439 |
> |
return IOIndexToIntegrableObject.at(index); |
1440 |
> |
} |
1441 |
> |
|
1442 |
> |
void SimInfo::setIOIndexToIntegrableObject(const std::vector<StuntDouble*>& v) { |
1443 |
> |
IOIndexToIntegrableObject= v; |
1444 |
> |
} |
1445 |
> |
|
1446 |
> |
/* |
1447 |
> |
void SimInfo::setStuntDoubleFromGlobalIndex(std::vector<StuntDouble*> v) { |
1448 |
> |
assert( v.size() == nAtoms_ + nRigidBodies_); |
1449 |
> |
sdByGlobalIndex_ = v; |
1450 |
> |
} |
1451 |
> |
|
1452 |
> |
StuntDouble* SimInfo::getStuntDoubleFromGlobalIndex(int index) { |
1453 |
> |
//assert(index < nAtoms_ + nRigidBodies_); |
1454 |
> |
return sdByGlobalIndex_.at(index); |
1455 |
> |
} |
1456 |
> |
*/ |
1457 |
|
}//end namespace oopse |
1458 |
|
|