99 |
|
* Use the maximum suggested value that was found. |
100 |
|
* |
101 |
|
* cutoffMethod : (one of HARD, SWITCHED, SHIFTED_FORCE, TAYLOR_SHIFTED, |
102 |
< |
* or SHIFTED_POTENTIAL) |
102 |
> |
* SHIFTED_POTENTIAL, or EWALD_FULL) |
103 |
|
* If cutoffMethod was explicitly set, use that choice. |
104 |
|
* If cutoffMethod was not explicitly set, use SHIFTED_FORCE |
105 |
|
* |
172 |
|
stringToCutoffMethod["SHIFTED_POTENTIAL"] = SHIFTED_POTENTIAL; |
173 |
|
stringToCutoffMethod["SHIFTED_FORCE"] = SHIFTED_FORCE; |
174 |
|
stringToCutoffMethod["TAYLOR_SHIFTED"] = TAYLOR_SHIFTED; |
175 |
+ |
stringToCutoffMethod["EWALD_FULL"] = EWALD_FULL; |
176 |
|
|
177 |
|
if (simParams_->haveCutoffMethod()) { |
178 |
|
string cutMeth = toUpperCopy(simParams_->getCutoffMethod()); |
183 |
|
"ForceManager::setupCutoffs: Could not find chosen cutoffMethod %s\n" |
184 |
|
"\tShould be one of: " |
185 |
|
"HARD, SWITCHED, SHIFTED_POTENTIAL, TAYLOR_SHIFTED,\n" |
186 |
< |
"\tor SHIFTED_FORCE\n", |
186 |
> |
"\tSHIFTED_FORCE, or EWALD_FULL\n", |
187 |
|
cutMeth.c_str()); |
188 |
|
painCave.isFatal = 1; |
189 |
|
painCave.severity = OPENMD_ERROR; |
229 |
|
cutoffMethod_ = SHIFTED_FORCE; |
230 |
|
} else if (myMethod == "TAYLOR_SHIFTED") { |
231 |
|
cutoffMethod_ = TAYLOR_SHIFTED; |
232 |
+ |
} else if (myMethod == "EWALD_FULL") { |
233 |
+ |
cutoffMethod_ = EWALD_FULL; |
234 |
|
} |
235 |
|
|
236 |
|
if (simParams_->haveSwitchingRadius()) |
237 |
|
rSwitch_ = simParams_->getSwitchingRadius(); |
238 |
|
|
239 |
|
if (myMethod == "SHIFTED_POTENTIAL" || myMethod == "SHIFTED_FORCE" || |
240 |
< |
myMethod == "TAYLOR_SHIFTED") { |
240 |
> |
myMethod == "TAYLOR_SHIFTED" || myMethod == "EWALD_FULL") { |
241 |
|
if (simParams_->haveSwitchingRadius()){ |
242 |
|
sprintf(painCave.errMsg, |
243 |
|
"ForceManager::setupCutoffs : DEPRECATED ERROR MESSAGE\n" |
417 |
|
if (doHeatFlux_) doParticlePot_ = true; |
418 |
|
|
419 |
|
doElectricField_ = info_->getSimParams()->getOutputElectricField(); |
420 |
+ |
doSitePotential_ = info_->getSimParams()->getOutputSitePotential(); |
421 |
|
|
422 |
|
} |
423 |
|
|
638 |
|
// Collect from all nodes. This should eventually be moved into a |
639 |
|
// SystemDecomposition, but this is a better place than in |
640 |
|
// Thermo to do the collection. |
641 |
< |
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &bondPotential, 1, MPI::REALTYPE, |
642 |
< |
MPI::SUM); |
643 |
< |
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &bendPotential, 1, MPI::REALTYPE, |
644 |
< |
MPI::SUM); |
645 |
< |
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &torsionPotential, 1, |
646 |
< |
MPI::REALTYPE, MPI::SUM); |
647 |
< |
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &inversionPotential, 1, |
648 |
< |
MPI::REALTYPE, MPI::SUM); |
641 |
> |
|
642 |
> |
MPI_Allreduce(MPI_IN_PLACE, &bondPotential, 1, MPI_REALTYPE, |
643 |
> |
MPI_SUM, MPI_COMM_WORLD); |
644 |
> |
MPI_Allreduce(MPI_IN_PLACE, &bendPotential, 1, MPI_REALTYPE, |
645 |
> |
MPI_SUM, MPI_COMM_WORLD); |
646 |
> |
MPI_Allreduce(MPI_IN_PLACE, &torsionPotential, 1, |
647 |
> |
MPI_REALTYPE, MPI_SUM, MPI_COMM_WORLD); |
648 |
> |
MPI_Allreduce(MPI_IN_PLACE, &inversionPotential, 1, |
649 |
> |
MPI_REALTYPE, MPI_SUM, MPI_COMM_WORLD); |
650 |
|
#endif |
651 |
|
|
652 |
|
Snapshot* curSnapshot = info_->getSnapshotManager()->getCurrentSnapshot(); |
668 |
|
DataStorage* config = &(curSnapshot->atomData); |
669 |
|
DataStorage* cgConfig = &(curSnapshot->cgData); |
670 |
|
|
671 |
+ |
|
672 |
|
//calculate the center of mass of cutoff group |
673 |
|
|
674 |
|
SimInfo::MoleculeIterator mi; |
712 |
|
RealType dVdFQ1(0.0); |
713 |
|
RealType dVdFQ2(0.0); |
714 |
|
potVec longRangePotential(0.0); |
715 |
+ |
RealType reciprocalPotential(0.0); |
716 |
|
potVec workPot(0.0); |
717 |
|
potVec exPot(0.0); |
718 |
|
Vector3d eField1(0.0); |
719 |
|
Vector3d eField2(0.0); |
720 |
+ |
RealType sPot1(0.0); |
721 |
+ |
RealType sPot2(0.0); |
722 |
+ |
|
723 |
|
vector<int>::iterator ia, jb; |
724 |
|
|
725 |
|
int loopStart, loopEnd; |
735 |
|
idat.dVdFQ1 = &dVdFQ1; |
736 |
|
idat.dVdFQ2 = &dVdFQ2; |
737 |
|
idat.eField1 = &eField1; |
738 |
< |
idat.eField2 = &eField2; |
738 |
> |
idat.eField2 = &eField2; |
739 |
> |
idat.sPot1 = &sPot1; |
740 |
> |
idat.sPot2 = &sPot2; |
741 |
|
idat.f1 = &f1; |
742 |
|
idat.sw = &sw; |
743 |
|
idat.shiftedPot = (cutoffMethod_ == SHIFTED_POTENTIAL) ? true : false; |
744 |
|
idat.shiftedForce = (cutoffMethod_ == SHIFTED_FORCE || cutoffMethod_ == TAYLOR_SHIFTED) ? true : false; |
745 |
|
idat.doParticlePot = doParticlePot_; |
746 |
|
idat.doElectricField = doElectricField_; |
747 |
+ |
idat.doSitePotential = doSitePotential_; |
748 |
|
sdat.doParticlePot = doParticlePot_; |
749 |
|
|
750 |
|
loopEnd = PAIR_LOOP; |
779 |
|
rgrpsq = d_grp.lengthSquare(); |
780 |
|
|
781 |
|
if (rgrpsq < rCutSq) { |
769 |
– |
|
782 |
|
if (iLoop == PAIR_LOOP) { |
783 |
|
vij = 0.0; |
784 |
|
fij.zero(); |
785 |
|
eField1.zero(); |
786 |
|
eField2.zero(); |
787 |
+ |
sPot1 = 0.0; |
788 |
+ |
sPot2 = 0.0; |
789 |
|
} |
790 |
|
|
791 |
|
in_switching_region = switcher_->getSwitch(rgrpsq, sw, dswdr, |
837 |
|
|
838 |
|
r = sqrt( *(idat.r2) ); |
839 |
|
idat.rij = &r; |
840 |
< |
|
840 |
> |
|
841 |
|
if (iLoop == PREPAIR_LOOP) { |
842 |
|
interactionMan_->doPrePair(idat); |
843 |
|
} else { |
936 |
|
|
937 |
|
// collects pairwise information |
938 |
|
fDecomp_->collectData(); |
939 |
+ |
if (cutoffMethod_ == EWALD_FULL) { |
940 |
+ |
interactionMan_->doReciprocalSpaceSum(reciprocalPotential); |
941 |
+ |
|
942 |
+ |
curSnapshot->setReciprocalPotential(reciprocalPotential); |
943 |
+ |
} |
944 |
|
|
945 |
|
if (info_->requiresSelfCorrection()) { |
946 |
|
for (unsigned int atom1 = 0; atom1 < info_->getNAtoms(); atom1++) { |
962 |
|
|
963 |
|
} |
964 |
|
|
946 |
– |
|
965 |
|
void ForceManager::postCalculation() { |
966 |
|
|
967 |
|
vector<Perturbation*>::iterator pi; |
987 |
|
} |
988 |
|
|
989 |
|
#ifdef IS_MPI |
990 |
< |
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, stressTensor.getArrayPointer(), 9, |
991 |
< |
MPI::REALTYPE, MPI::SUM); |
990 |
> |
MPI_Allreduce(MPI_IN_PLACE, stressTensor.getArrayPointer(), 9, |
991 |
> |
MPI_REALTYPE, MPI_SUM, MPI_COMM_WORLD); |
992 |
|
#endif |
993 |
|
curSnapshot->setStressTensor(stressTensor); |
994 |
|
|