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), calcBoxDipole_(false) { |
95 |
> |
sman_(NULL), fortranInitialized_(false), calcBoxDipole_(false), |
96 |
> |
useAtomicVirial_(true) { |
97 |
|
|
98 |
|
MoleculeStamp* molStamp; |
99 |
|
int nMolWithSameStamp; |
156 |
|
+ nGlobalRigidBodies_; |
157 |
|
|
158 |
|
nGlobalMols_ = molStampIds_.size(); |
158 |
– |
|
159 |
– |
#ifdef IS_MPI |
159 |
|
molToProcMap_.resize(nGlobalMols_); |
161 |
– |
#endif |
162 |
– |
|
160 |
|
} |
161 |
|
|
162 |
|
SimInfo::~SimInfo() { |
663 |
|
int useSF; |
664 |
|
int useSP; |
665 |
|
int useBoxDipole; |
666 |
+ |
|
667 |
|
std::string myMethod; |
668 |
|
|
669 |
|
// set the useRF logical |
688 |
|
if (simParams_->getAccumulateBoxDipole()) |
689 |
|
useBoxDipole = 1; |
690 |
|
|
691 |
+ |
useAtomicVirial_ = simParams_->getUseAtomicVirial(); |
692 |
+ |
|
693 |
|
//loop over all of the atom types |
694 |
|
for (i = atomTypes.begin(); i != atomTypes.end(); ++i) { |
695 |
|
useLennardJones |= (*i)->isLennardJones(); |
767 |
|
temp = useBoxDipole; |
768 |
|
MPI_Allreduce(&temp, &useBoxDipole, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
769 |
|
|
770 |
+ |
temp = useAtomicVirial_; |
771 |
+ |
MPI_Allreduce(&temp, &useAtomicVirial_, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD); |
772 |
+ |
|
773 |
|
#endif |
774 |
|
|
775 |
|
fInfo_.SIM_uses_PBC = usePBC; |
789 |
|
fInfo_.SIM_uses_SF = useSF; |
790 |
|
fInfo_.SIM_uses_SP = useSP; |
791 |
|
fInfo_.SIM_uses_BoxDipole = useBoxDipole; |
792 |
+ |
fInfo_.SIM_uses_AtomicVirial = useAtomicVirial_; |
793 |
|
} |
794 |
|
|
795 |
|
void SimInfo::setupFortranSim() { |
856 |
|
int nGlobalExcludes = 0; |
857 |
|
int* globalExcludes = NULL; |
858 |
|
int* excludeList = exclude_.getExcludeList(); |
859 |
< |
setFortranSim( &fInfo_, &nGlobalAtoms_, &nAtoms_, &identArray[0], &nExclude, excludeList , |
860 |
< |
&nGlobalExcludes, globalExcludes, &molMembershipArray[0], |
861 |
< |
&mfact[0], &nCutoffGroups_, &fortranGlobalGroupMembership[0], &isError); |
862 |
< |
|
859 |
> |
setFortranSim( &fInfo_, &nGlobalAtoms_, &nAtoms_, &identArray[0], |
860 |
> |
&nExclude, excludeList , &nGlobalExcludes, globalExcludes, |
861 |
> |
&molMembershipArray[0], &mfact[0], &nCutoffGroups_, |
862 |
> |
&fortranGlobalGroupMembership[0], &isError); |
863 |
> |
|
864 |
|
if( isError ){ |
865 |
< |
|
865 |
> |
|
866 |
|
sprintf( painCave.errMsg, |
867 |
|
"There was an error setting the simulation information in fortran.\n" ); |
868 |
|
painCave.isFatal = 1; |
869 |
|
painCave.severity = OOPSE_ERROR; |
870 |
|
simError(); |
871 |
|
} |
872 |
< |
|
873 |
< |
#ifdef IS_MPI |
872 |
> |
|
873 |
> |
|
874 |
|
sprintf( checkPointMsg, |
875 |
|
"succesfully sent the simulation information to fortran.\n"); |
876 |
< |
MPIcheckPoint(); |
877 |
< |
#endif // is_mpi |
878 |
< |
|
876 |
> |
|
877 |
> |
errorCheckPoint(); |
878 |
> |
|
879 |
|
// Setup number of neighbors in neighbor list if present |
880 |
|
if (simParams_->haveNeighborListNeighbors()) { |
881 |
< |
setNeighbors(simParams_->getNeighborListNeighbors()); |
881 |
> |
int nlistNeighbors = simParams_->getNeighborListNeighbors(); |
882 |
> |
setNeighbors(&nlistNeighbors); |
883 |
|
} |
884 |
|
|
885 |
|
|
886 |
|
} |
887 |
|
|
888 |
|
|
883 |
– |
#ifdef IS_MPI |
889 |
|
void SimInfo::setupFortranParallel() { |
890 |
< |
|
890 |
> |
#ifdef IS_MPI |
891 |
|
//SimInfo is responsible for creating localToGlobalAtomIndex and localToGlobalGroupIndex |
892 |
|
std::vector<int> localToGlobalAtomIndex(getNAtoms(), 0); |
893 |
|
std::vector<int> localToGlobalCutoffGroupIndex; |
937 |
|
} |
938 |
|
|
939 |
|
sprintf(checkPointMsg, " mpiRefresh successful.\n"); |
940 |
< |
MPIcheckPoint(); |
940 |
> |
errorCheckPoint(); |
941 |
|
|
942 |
< |
|
942 |
> |
#endif |
943 |
|
} |
944 |
|
|
940 |
– |
#endif |
941 |
– |
|
945 |
|
void SimInfo::setupCutoff() { |
946 |
|
|
947 |
|
ForceFieldOptions& forceFieldOptions_ = forceField_->getForceFieldOptions(); |
949 |
|
// Check the cutoff policy |
950 |
|
int cp = TRADITIONAL_CUTOFF_POLICY; // Set to traditional by default |
951 |
|
|
952 |
+ |
// Set LJ shifting bools to false |
953 |
+ |
ljsp_ = false; |
954 |
+ |
ljsf_ = false; |
955 |
+ |
|
956 |
|
std::string myPolicy; |
957 |
|
if (forceFieldOptions_.haveCutoffPolicy()){ |
958 |
|
myPolicy = forceFieldOptions_.getCutoffPolicy(); |
1016 |
|
simError(); |
1017 |
|
} |
1018 |
|
} |
1019 |
< |
|
1020 |
< |
notifyFortranCutoffs(&rcut_, &rsw_); |
1019 |
> |
|
1020 |
> |
if (simParams_->haveElectrostaticSummationMethod()) { |
1021 |
> |
std::string myMethod = simParams_->getElectrostaticSummationMethod(); |
1022 |
> |
toUpper(myMethod); |
1023 |
> |
|
1024 |
> |
if (myMethod == "SHIFTED_POTENTIAL") { |
1025 |
> |
ljsp_ = true; |
1026 |
> |
} else if (myMethod == "SHIFTED_FORCE") { |
1027 |
> |
ljsf_ = true; |
1028 |
> |
} |
1029 |
> |
} |
1030 |
> |
notifyFortranCutoffs(&rcut_, &rsw_, &ljsp_, &ljsf_); |
1031 |
|
|
1032 |
|
} else { |
1033 |
|
|
1044 |
|
if (simParams_->haveElectrostaticSummationMethod()) { |
1045 |
|
std::string myMethod = simParams_->getElectrostaticSummationMethod(); |
1046 |
|
toUpper(myMethod); |
1047 |
< |
if (myMethod == "SHIFTED_POTENTIAL" || myMethod == "SHIFTED_FORCE") { |
1047 |
> |
|
1048 |
> |
// For the time being, we're tethering the LJ shifted behavior to the |
1049 |
> |
// electrostaticSummationMethod keyword options |
1050 |
> |
if (myMethod == "SHIFTED_POTENTIAL") { |
1051 |
> |
ljsp_ = true; |
1052 |
> |
} else if (myMethod == "SHIFTED_FORCE") { |
1053 |
> |
ljsf_ = true; |
1054 |
> |
} |
1055 |
> |
if (myMethod == "SHIFTED_POTENTIAL" || myMethod == "SHIFTED_FORCE") { |
1056 |
|
if (simParams_->haveSwitchingRadius()){ |
1057 |
|
sprintf(painCave.errMsg, |
1058 |
|
"SimInfo Warning: A value was set for the switchingRadius\n" |
1075 |
|
simError(); |
1076 |
|
rsw_ = 0.85 * rcut_; |
1077 |
|
} |
1078 |
< |
notifyFortranCutoffs(&rcut_, &rsw_); |
1078 |
> |
|
1079 |
> |
notifyFortranCutoffs(&rcut_, &rsw_, &ljsp_, &ljsf_); |
1080 |
> |
|
1081 |
|
} else { |
1082 |
|
// We didn't set rcut explicitly, and we don't have electrostatic atoms, so |
1083 |
|
// We'll punt and let fortran figure out the cutoffs later. |