| 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" |
| 60 |
|
#include "UseTheForce/DarkSide/fSwitchingFunctionType.h" |
| 61 |
|
#include "UseTheForce/doForces_interface.h" |
| 62 |
+ |
#include "UseTheForce/DarkSide/neighborLists_interface.h" |
| 63 |
|
#include "UseTheForce/DarkSide/electrostatic_interface.h" |
| 64 |
|
#include "UseTheForce/DarkSide/switcheroo_interface.h" |
| 65 |
|
#include "utils/MemoryUtils.hpp" |
| 68 |
|
#include "io/ForceFieldOptions.hpp" |
| 69 |
|
#include "UseTheForce/ForceField.hpp" |
| 70 |
|
|
| 71 |
+ |
|
| 72 |
|
#ifdef IS_MPI |
| 73 |
|
#include "UseTheForce/mpiComponentPlan.h" |
| 74 |
|
#include "UseTheForce/DarkSide/simParallel_interface.h" |
| 87 |
|
|
| 88 |
|
SimInfo::SimInfo(ForceField* ff, Globals* simParams) : |
| 89 |
|
forceField_(ff), simParams_(simParams), |
| 90 |
< |
ndf_(0), ndfRaw_(0), ndfTrans_(0), nZconstraint_(0), |
| 90 |
> |
ndf_(0), fdf_local(0), ndfRaw_(0), ndfTrans_(0), nZconstraint_(0), |
| 91 |
|
nGlobalMols_(0), nGlobalAtoms_(0), nGlobalCutoffGroups_(0), |
| 92 |
|
nGlobalIntegrableObjects_(0), nGlobalRigidBodies_(0), |
| 93 |
|
nAtoms_(0), nBonds_(0), nBends_(0), nTorsions_(0), nRigidBodies_(0), |
| 94 |
|
nIntegrableObjects_(0), nCutoffGroups_(0), nConstraints_(0), |
| 95 |
< |
sman_(NULL), fortranInitialized_(false) { |
| 95 |
> |
sman_(NULL), fortranInitialized_(false), calcBoxDipole_(false) { |
| 96 |
|
|
| 97 |
|
MoleculeStamp* molStamp; |
| 98 |
|
int nMolWithSameStamp; |
| 293 |
|
|
| 294 |
|
} |
| 295 |
|
|
| 296 |
+ |
int SimInfo::getFdf() { |
| 297 |
+ |
#ifdef IS_MPI |
| 298 |
+ |
MPI_Allreduce(&fdf_local,&fdf_,1,MPI_INT,MPI_SUM, MPI_COMM_WORLD); |
| 299 |
+ |
#else |
| 300 |
+ |
fdf_ = fdf_local; |
| 301 |
+ |
#endif |
| 302 |
+ |
return fdf_; |
| 303 |
+ |
} |
| 304 |
+ |
|
| 305 |
|
void SimInfo::calcNdfRaw() { |
| 306 |
|
int ndfRaw_local; |
| 307 |
|
|
| 602 |
|
//setup fortran force field |
| 603 |
|
/** @deprecate */ |
| 604 |
|
int isError = 0; |
| 605 |
+ |
|
| 606 |
+ |
setupCutoff(); |
| 607 |
|
|
| 608 |
|
setupElectrostaticSummationMethod( isError ); |
| 609 |
|
setupSwitchingFunction(); |
| 610 |
+ |
setupAccumulateBoxDipole(); |
| 611 |
|
|
| 612 |
|
if(isError){ |
| 613 |
|
sprintf( painCave.errMsg, |
| 615 |
|
painCave.isFatal = 1; |
| 616 |
|
simError(); |
| 617 |
|
} |
| 603 |
– |
|
| 604 |
– |
|
| 605 |
– |
setupCutoff(); |
| 618 |
|
|
| 619 |
|
calcNdf(); |
| 620 |
|
calcNdfRaw(); |
| 664 |
|
int usePBC = simParams_->getUsePeriodicBoundaryConditions(); |
| 665 |
|
int useRF; |
| 666 |
|
int useSF; |
| 667 |
+ |
int useSP; |
| 668 |
+ |
int useBoxDipole; |
| 669 |
|
std::string myMethod; |
| 670 |
|
|
| 671 |
|
// set the useRF logical |
| 672 |
|
useRF = 0; |
| 673 |
|
useSF = 0; |
| 674 |
+ |
useSP = 0; |
| 675 |
|
|
| 676 |
|
|
| 677 |
|
if (simParams_->haveElectrostaticSummationMethod()) { |
| 678 |
|
std::string myMethod = simParams_->getElectrostaticSummationMethod(); |
| 679 |
|
toUpper(myMethod); |
| 680 |
< |
if (myMethod == "REACTION_FIELD") { |
| 681 |
< |
useRF=1; |
| 682 |
< |
} else { |
| 683 |
< |
if (myMethod == "SHIFTED_FORCE") { |
| 684 |
< |
useSF = 1; |
| 685 |
< |
} |
| 680 |
> |
if (myMethod == "REACTION_FIELD"){ |
| 681 |
> |
useRF = 1; |
| 682 |
> |
} else if (myMethod == "SHIFTED_FORCE"){ |
| 683 |
> |
useSF = 1; |
| 684 |
> |
} else if (myMethod == "SHIFTED_POTENTIAL"){ |
| 685 |
> |
useSP = 1; |
| 686 |
|
} |
| 687 |
|
} |
| 688 |
+ |
|
| 689 |
+ |
if (simParams_->haveAccumulateBoxDipole()) |
| 690 |
+ |
if (simParams_->getAccumulateBoxDipole()) |
| 691 |
+ |
useBoxDipole = 1; |
| 692 |
|
|
| 693 |
|
//loop over all of the atom types |
| 694 |
|
for (i = atomTypes.begin(); i != atomTypes.end(); ++i) { |
| 759 |
|
MPI_Allreduce(&temp, &useRF, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
| 760 |
|
|
| 761 |
|
temp = useSF; |
| 762 |
< |
MPI_Allreduce(&temp, &useSF, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
| 762 |
> |
MPI_Allreduce(&temp, &useSF, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
| 763 |
|
|
| 764 |
+ |
temp = useSP; |
| 765 |
+ |
MPI_Allreduce(&temp, &useSP, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
| 766 |
+ |
|
| 767 |
+ |
temp = useBoxDipole; |
| 768 |
+ |
MPI_Allreduce(&temp, &useBoxDipole, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
| 769 |
+ |
|
| 770 |
|
#endif |
| 771 |
|
|
| 772 |
|
fInfo_.SIM_uses_PBC = usePBC; |
| 784 |
|
fInfo_.SIM_uses_FLARB = useFLARB; |
| 785 |
|
fInfo_.SIM_uses_RF = useRF; |
| 786 |
|
fInfo_.SIM_uses_SF = useSF; |
| 787 |
< |
|
| 788 |
< |
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 |
< |
|
| 787 |
> |
fInfo_.SIM_uses_SP = useSP; |
| 788 |
> |
fInfo_.SIM_uses_BoxDipole = useBoxDipole; |
| 789 |
|
} |
| 790 |
|
|
| 791 |
|
void SimInfo::setupFortranSim() { |
| 802 |
|
} |
| 803 |
|
|
| 804 |
|
//calculate mass ratio of cutoff group |
| 805 |
< |
std::vector<double> mfact; |
| 805 |
> |
std::vector<RealType> mfact; |
| 806 |
|
SimInfo::MoleculeIterator mi; |
| 807 |
|
Molecule* mol; |
| 808 |
|
Molecule::CutoffGroupIterator ci; |
| 809 |
|
CutoffGroup* cg; |
| 810 |
|
Molecule::AtomIterator ai; |
| 811 |
|
Atom* atom; |
| 812 |
< |
double totalMass; |
| 812 |
> |
RealType totalMass; |
| 813 |
|
|
| 814 |
|
//to avoid memory reallocation, reserve enough space for mfact |
| 815 |
|
mfact.reserve(getNCutoffGroups()); |
| 870 |
|
"succesfully sent the simulation information to fortran.\n"); |
| 871 |
|
MPIcheckPoint(); |
| 872 |
|
#endif // is_mpi |
| 873 |
+ |
|
| 874 |
+ |
// Setup number of neighbors in neighbor list if present |
| 875 |
+ |
if (simParams_->haveNeighborListNeighbors()) { |
| 876 |
+ |
setNeighbors(simParams_->getNeighborListNeighbors()); |
| 877 |
+ |
} |
| 878 |
+ |
|
| 879 |
+ |
|
| 880 |
|
} |
| 881 |
|
|
| 882 |
|
|
| 976 |
|
notifyFortranCutoffPolicy(&cp); |
| 977 |
|
|
| 978 |
|
// Check the Skin Thickness for neighborlists |
| 979 |
< |
double skin; |
| 979 |
> |
RealType skin; |
| 980 |
|
if (simParams_->haveSkinThickness()) { |
| 981 |
|
skin = simParams_->getSkinThickness(); |
| 982 |
|
notifyFortranSkinThickness(&skin); |
| 988 |
|
if (simParams_->haveSwitchingRadius()) { |
| 989 |
|
rsw_ = simParams_->getSwitchingRadius(); |
| 990 |
|
} else { |
| 991 |
< |
rsw_ = rcut_; |
| 991 |
> |
if (fInfo_.SIM_uses_Charges | |
| 992 |
> |
fInfo_.SIM_uses_Dipoles | |
| 993 |
> |
fInfo_.SIM_uses_RF) { |
| 994 |
> |
|
| 995 |
> |
rsw_ = 0.85 * rcut_; |
| 996 |
> |
sprintf(painCave.errMsg, |
| 997 |
> |
"SimCreator Warning: No value was set for the switchingRadius.\n" |
| 998 |
> |
"\tOOPSE will use a default value of 85 percent of the cutoffRadius.\n" |
| 999 |
> |
"\tswitchingRadius = %f. for this simulation\n", rsw_); |
| 1000 |
> |
painCave.isFatal = 0; |
| 1001 |
> |
simError(); |
| 1002 |
> |
} else { |
| 1003 |
> |
rsw_ = rcut_; |
| 1004 |
> |
sprintf(painCave.errMsg, |
| 1005 |
> |
"SimCreator Warning: No value was set for the switchingRadius.\n" |
| 1006 |
> |
"\tOOPSE will use the same value as the cutoffRadius.\n" |
| 1007 |
> |
"\tswitchingRadius = %f. for this simulation\n", rsw_); |
| 1008 |
> |
painCave.isFatal = 0; |
| 1009 |
> |
simError(); |
| 1010 |
> |
} |
| 1011 |
|
} |
| 1012 |
+ |
|
| 1013 |
|
notifyFortranCutoffs(&rcut_, &rsw_); |
| 1014 |
|
|
| 1015 |
|
} else { |
| 1066 |
|
int errorOut; |
| 1067 |
|
int esm = NONE; |
| 1068 |
|
int sm = UNDAMPED; |
| 1069 |
< |
double alphaVal; |
| 1070 |
< |
double dielectric; |
| 1071 |
< |
|
| 1069 |
> |
RealType alphaVal; |
| 1070 |
> |
RealType dielectric; |
| 1071 |
> |
|
| 1072 |
|
errorOut = isError; |
| 1034 |
– |
alphaVal = simParams_->getDampingAlpha(); |
| 1035 |
– |
dielectric = simParams_->getDielectric(); |
| 1073 |
|
|
| 1074 |
|
if (simParams_->haveElectrostaticSummationMethod()) { |
| 1075 |
|
std::string myMethod = simParams_->getElectrostaticSummationMethod(); |
| 1086 |
|
if (myMethod == "SHIFTED_FORCE") { |
| 1087 |
|
esm = SHIFTED_FORCE; |
| 1088 |
|
} else { |
| 1089 |
< |
if (myMethod == "REACTION_FIELD") { |
| 1089 |
> |
if (myMethod == "REACTION_FIELD") { |
| 1090 |
|
esm = REACTION_FIELD; |
| 1091 |
+ |
dielectric = simParams_->getDielectric(); |
| 1092 |
+ |
if (!simParams_->haveDielectric()) { |
| 1093 |
+ |
// throw warning |
| 1094 |
+ |
sprintf( painCave.errMsg, |
| 1095 |
+ |
"SimInfo warning: dielectric was not specified in the input file\n\tfor the reaction field correction method.\n" |
| 1096 |
+ |
"\tA default value of %f will be used for the dielectric.\n", dielectric); |
| 1097 |
+ |
painCave.isFatal = 0; |
| 1098 |
+ |
simError(); |
| 1099 |
+ |
} |
| 1100 |
|
} else { |
| 1101 |
|
// throw error |
| 1102 |
|
sprintf( painCave.errMsg, |
| 1123 |
|
if (myScreen == "DAMPED") { |
| 1124 |
|
sm = DAMPED; |
| 1125 |
|
if (!simParams_->haveDampingAlpha()) { |
| 1126 |
< |
//throw error |
| 1126 |
> |
// first set a cutoff dependent alpha value |
| 1127 |
> |
// we assume alpha depends linearly with rcut from 0 to 20.5 ang |
| 1128 |
> |
alphaVal = 0.5125 - rcut_* 0.025; |
| 1129 |
> |
// for values rcut > 20.5, alpha is zero |
| 1130 |
> |
if (alphaVal < 0) alphaVal = 0; |
| 1131 |
> |
|
| 1132 |
> |
// throw warning |
| 1133 |
|
sprintf( painCave.errMsg, |
| 1134 |
|
"SimInfo warning: dampingAlpha was not specified in the input file.\n" |
| 1135 |
< |
"\tA default value of %f (1/ang) will be used.\n", alphaVal); |
| 1135 |
> |
"\tA default value of %f (1/ang) will be used for the cutoff of\n\t%f (ang).\n", alphaVal, rcut_); |
| 1136 |
|
painCave.isFatal = 0; |
| 1137 |
|
simError(); |
| 1138 |
+ |
} else { |
| 1139 |
+ |
alphaVal = simParams_->getDampingAlpha(); |
| 1140 |
|
} |
| 1141 |
+ |
|
| 1142 |
|
} else { |
| 1143 |
|
// throw error |
| 1144 |
|
sprintf( painCave.errMsg, |
| 1187 |
|
|
| 1188 |
|
} |
| 1189 |
|
|
| 1190 |
+ |
void SimInfo::setupAccumulateBoxDipole() { |
| 1191 |
+ |
|
| 1192 |
+ |
// we only call setAccumulateBoxDipole if the accumulateBoxDipole parameter is true |
| 1193 |
+ |
if ( simParams_->haveAccumulateBoxDipole() ) |
| 1194 |
+ |
if ( simParams_->getAccumulateBoxDipole() ) { |
| 1195 |
+ |
setAccumulateBoxDipole(); |
| 1196 |
+ |
calcBoxDipole_ = true; |
| 1197 |
+ |
} |
| 1198 |
+ |
|
| 1199 |
+ |
} |
| 1200 |
+ |
|
| 1201 |
|
void SimInfo::addProperty(GenericData* genData) { |
| 1202 |
|
properties_.addProperty(genData); |
| 1203 |
|
} |
| 1254 |
|
Molecule* mol; |
| 1255 |
|
|
| 1256 |
|
Vector3d comVel(0.0); |
| 1257 |
< |
double totalMass = 0.0; |
| 1257 |
> |
RealType totalMass = 0.0; |
| 1258 |
|
|
| 1259 |
|
|
| 1260 |
|
for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) { |
| 1261 |
< |
double mass = mol->getMass(); |
| 1261 |
> |
RealType mass = mol->getMass(); |
| 1262 |
|
totalMass += mass; |
| 1263 |
|
comVel += mass * mol->getComVel(); |
| 1264 |
|
} |
| 1265 |
|
|
| 1266 |
|
#ifdef IS_MPI |
| 1267 |
< |
double tmpMass = totalMass; |
| 1267 |
> |
RealType tmpMass = totalMass; |
| 1268 |
|
Vector3d tmpComVel(comVel); |
| 1269 |
< |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
| 1270 |
< |
MPI_Allreduce(tmpComVel.getArrayPointer(), comVel.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
| 1269 |
> |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
| 1270 |
> |
MPI_Allreduce(tmpComVel.getArrayPointer(), comVel.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
| 1271 |
|
#endif |
| 1272 |
|
|
| 1273 |
|
comVel /= totalMass; |
| 1280 |
|
Molecule* mol; |
| 1281 |
|
|
| 1282 |
|
Vector3d com(0.0); |
| 1283 |
< |
double totalMass = 0.0; |
| 1283 |
> |
RealType totalMass = 0.0; |
| 1284 |
|
|
| 1285 |
|
for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) { |
| 1286 |
< |
double mass = mol->getMass(); |
| 1286 |
> |
RealType mass = mol->getMass(); |
| 1287 |
|
totalMass += mass; |
| 1288 |
|
com += mass * mol->getCom(); |
| 1289 |
|
} |
| 1290 |
|
|
| 1291 |
|
#ifdef IS_MPI |
| 1292 |
< |
double tmpMass = totalMass; |
| 1292 |
> |
RealType tmpMass = totalMass; |
| 1293 |
|
Vector3d tmpCom(com); |
| 1294 |
< |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
| 1295 |
< |
MPI_Allreduce(tmpCom.getArrayPointer(), com.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
| 1294 |
> |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
| 1295 |
> |
MPI_Allreduce(tmpCom.getArrayPointer(), com.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
| 1296 |
|
#endif |
| 1297 |
|
|
| 1298 |
|
com /= totalMass; |
| 1316 |
|
Molecule* mol; |
| 1317 |
|
|
| 1318 |
|
|
| 1319 |
< |
double totalMass = 0.0; |
| 1319 |
> |
RealType totalMass = 0.0; |
| 1320 |
|
|
| 1321 |
|
|
| 1322 |
|
for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) { |
| 1323 |
< |
double mass = mol->getMass(); |
| 1323 |
> |
RealType mass = mol->getMass(); |
| 1324 |
|
totalMass += mass; |
| 1325 |
|
com += mass * mol->getCom(); |
| 1326 |
|
comVel += mass * mol->getComVel(); |
| 1327 |
|
} |
| 1328 |
|
|
| 1329 |
|
#ifdef IS_MPI |
| 1330 |
< |
double tmpMass = totalMass; |
| 1330 |
> |
RealType tmpMass = totalMass; |
| 1331 |
|
Vector3d tmpCom(com); |
| 1332 |
|
Vector3d tmpComVel(comVel); |
| 1333 |
< |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
| 1334 |
< |
MPI_Allreduce(tmpCom.getArrayPointer(), com.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
| 1335 |
< |
MPI_Allreduce(tmpComVel.getArrayPointer(), comVel.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
| 1333 |
> |
MPI_Allreduce(&tmpMass,&totalMass,1,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
| 1334 |
> |
MPI_Allreduce(tmpCom.getArrayPointer(), com.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
| 1335 |
> |
MPI_Allreduce(tmpComVel.getArrayPointer(), comVel.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
| 1336 |
|
#endif |
| 1337 |
|
|
| 1338 |
|
com /= totalMass; |
| 1351 |
|
void SimInfo::getInertiaTensor(Mat3x3d &inertiaTensor, Vector3d &angularMomentum){ |
| 1352 |
|
|
| 1353 |
|
|
| 1354 |
< |
double xx = 0.0; |
| 1355 |
< |
double yy = 0.0; |
| 1356 |
< |
double zz = 0.0; |
| 1357 |
< |
double xy = 0.0; |
| 1358 |
< |
double xz = 0.0; |
| 1359 |
< |
double yz = 0.0; |
| 1354 |
> |
RealType xx = 0.0; |
| 1355 |
> |
RealType yy = 0.0; |
| 1356 |
> |
RealType zz = 0.0; |
| 1357 |
> |
RealType xy = 0.0; |
| 1358 |
> |
RealType xz = 0.0; |
| 1359 |
> |
RealType yz = 0.0; |
| 1360 |
|
Vector3d com(0.0); |
| 1361 |
|
Vector3d comVel(0.0); |
| 1362 |
|
|
| 1368 |
|
Vector3d thisq(0.0); |
| 1369 |
|
Vector3d thisv(0.0); |
| 1370 |
|
|
| 1371 |
< |
double thisMass = 0.0; |
| 1371 |
> |
RealType thisMass = 0.0; |
| 1372 |
|
|
| 1373 |
|
|
| 1374 |
|
|
| 1406 |
|
#ifdef IS_MPI |
| 1407 |
|
Mat3x3d tmpI(inertiaTensor); |
| 1408 |
|
Vector3d tmpAngMom; |
| 1409 |
< |
MPI_Allreduce(tmpI.getArrayPointer(), inertiaTensor.getArrayPointer(),9,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
| 1410 |
< |
MPI_Allreduce(tmpAngMom.getArrayPointer(), angularMomentum.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
| 1409 |
> |
MPI_Allreduce(tmpI.getArrayPointer(), inertiaTensor.getArrayPointer(),9,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
| 1410 |
> |
MPI_Allreduce(tmpAngMom.getArrayPointer(), angularMomentum.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
| 1411 |
|
#endif |
| 1412 |
|
|
| 1413 |
|
return; |
| 1428 |
|
Vector3d thisr(0.0); |
| 1429 |
|
Vector3d thisp(0.0); |
| 1430 |
|
|
| 1431 |
< |
double thisMass; |
| 1431 |
> |
RealType thisMass; |
| 1432 |
|
|
| 1433 |
|
for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) { |
| 1434 |
|
thisMass = mol->getMass(); |
| 1441 |
|
|
| 1442 |
|
#ifdef IS_MPI |
| 1443 |
|
Vector3d tmpAngMom; |
| 1444 |
< |
MPI_Allreduce(tmpAngMom.getArrayPointer(), angularMomentum.getArrayPointer(),3,MPI_DOUBLE,MPI_SUM, MPI_COMM_WORLD); |
| 1444 |
> |
MPI_Allreduce(tmpAngMom.getArrayPointer(), angularMomentum.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD); |
| 1445 |
|
#endif |
| 1446 |
|
|
| 1447 |
|
return angularMomentum; |
| 1448 |
|
} |
| 1449 |
|
|
| 1450 |
< |
|
| 1450 |
> |
StuntDouble* SimInfo::getIOIndexToIntegrableObject(int index) { |
| 1451 |
> |
return IOIndexToIntegrableObject.at(index); |
| 1452 |
> |
} |
| 1453 |
> |
|
| 1454 |
> |
void SimInfo::setIOIndexToIntegrableObject(const std::vector<StuntDouble*>& v) { |
| 1455 |
> |
IOIndexToIntegrableObject= v; |
| 1456 |
> |
} |
| 1457 |
> |
|
| 1458 |
> |
/* |
| 1459 |
> |
void SimInfo::setStuntDoubleFromGlobalIndex(std::vector<StuntDouble*> v) { |
| 1460 |
> |
assert( v.size() == nAtoms_ + nRigidBodies_); |
| 1461 |
> |
sdByGlobalIndex_ = v; |
| 1462 |
> |
} |
| 1463 |
> |
|
| 1464 |
> |
StuntDouble* SimInfo::getStuntDoubleFromGlobalIndex(int index) { |
| 1465 |
> |
//assert(index < nAtoms_ + nRigidBodies_); |
| 1466 |
> |
return sdByGlobalIndex_.at(index); |
| 1467 |
> |
} |
| 1468 |
> |
*/ |
| 1469 |
|
}//end namespace oopse |
| 1470 |
|
|