| 110 |
|
Globals* simParams_ = info_->getSimParams(); |
| 111 |
|
ForceFieldOptions& forceFieldOptions_ = forceField_->getForceFieldOptions(); |
| 112 |
|
int mdFileVersion; |
| 113 |
+ |
rCut_ = 0.0; //Needs a value for a later max() call; |
| 114 |
|
|
| 115 |
|
if (simParams_->haveMDfileVersion()) |
| 116 |
|
mdFileVersion = simParams_->getMDfileVersion(); |
| 391 |
|
info_->prepareTopology(); |
| 392 |
|
|
| 393 |
|
doParticlePot_ = info_->getSimParams()->getOutputParticlePotential(); |
| 394 |
+ |
doHeatFlux_ = info_->getSimParams()->getPrintHeatFlux(); |
| 395 |
+ |
if (doHeatFlux_) doParticlePot_ = true; |
| 396 |
|
|
| 397 |
|
} |
| 398 |
|
|
| 449 |
|
Molecule::CutoffGroupIterator ci; |
| 450 |
|
CutoffGroup* cg; |
| 451 |
|
|
| 452 |
< |
// forces are zeroed here, before any are accumulated. |
| 452 |
> |
// forces and potentials are zeroed here, before any are |
| 453 |
> |
// accumulated. |
| 454 |
|
|
| 455 |
+ |
Snapshot* snap = info_->getSnapshotManager()->getCurrentSnapshot(); |
| 456 |
+ |
|
| 457 |
+ |
snap->setBondPotential(0.0); |
| 458 |
+ |
snap->setBendPotential(0.0); |
| 459 |
+ |
snap->setTorsionPotential(0.0); |
| 460 |
+ |
snap->setInversionPotential(0.0); |
| 461 |
+ |
|
| 462 |
+ |
potVec zeroPot(0.0); |
| 463 |
+ |
snap->setLongRangePotential(zeroPot); |
| 464 |
+ |
snap->setExcludedPotentials(zeroPot); |
| 465 |
+ |
|
| 466 |
+ |
snap->setRestraintPotential(0.0); |
| 467 |
+ |
snap->setRawPotential(0.0); |
| 468 |
+ |
|
| 469 |
|
for (mol = info_->beginMolecule(mi); mol != NULL; |
| 470 |
|
mol = info_->nextMolecule(mi)) { |
| 471 |
|
for(atom = mol->beginAtom(ai); atom != NULL; |
| 489 |
|
} |
| 490 |
|
|
| 491 |
|
// Zero out the stress tensor |
| 492 |
< |
tau *= 0.0; |
| 493 |
< |
|
| 492 |
> |
stressTensor *= 0.0; |
| 493 |
> |
// Zero out the heatFlux |
| 494 |
> |
fDecomp_->setHeatFlux( Vector3d(0.0) ); |
| 495 |
|
} |
| 496 |
|
|
| 497 |
|
void ForceManager::shortRangeInteractions() { |
| 601 |
|
} |
| 602 |
|
} |
| 603 |
|
} |
| 604 |
< |
|
| 605 |
< |
RealType shortRangePotential = bondPotential + bendPotential + |
| 606 |
< |
torsionPotential + inversionPotential; |
| 604 |
> |
|
| 605 |
> |
#ifdef IS_MPI |
| 606 |
> |
// Collect from all nodes. This should eventually be moved into a |
| 607 |
> |
// SystemDecomposition, but this is a better place than in |
| 608 |
> |
// Thermo to do the collection. |
| 609 |
> |
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &bondPotential, 1, MPI::REALTYPE, |
| 610 |
> |
MPI::SUM); |
| 611 |
> |
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &bendPotential, 1, MPI::REALTYPE, |
| 612 |
> |
MPI::SUM); |
| 613 |
> |
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &torsionPotential, 1, |
| 614 |
> |
MPI::REALTYPE, MPI::SUM); |
| 615 |
> |
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &inversionPotential, 1, |
| 616 |
> |
MPI::REALTYPE, MPI::SUM); |
| 617 |
> |
#endif |
| 618 |
> |
|
| 619 |
|
Snapshot* curSnapshot = info_->getSnapshotManager()->getCurrentSnapshot(); |
| 620 |
< |
curSnapshot->statData[Stats::SHORT_RANGE_POTENTIAL] = shortRangePotential; |
| 621 |
< |
curSnapshot->statData[Stats::BOND_POTENTIAL] = bondPotential; |
| 622 |
< |
curSnapshot->statData[Stats::BEND_POTENTIAL] = bendPotential; |
| 623 |
< |
curSnapshot->statData[Stats::DIHEDRAL_POTENTIAL] = torsionPotential; |
| 624 |
< |
curSnapshot->statData[Stats::INVERSION_POTENTIAL] = inversionPotential; |
| 620 |
> |
|
| 621 |
> |
curSnapshot->setBondPotential(bondPotential); |
| 622 |
> |
curSnapshot->setBendPotential(bendPotential); |
| 623 |
> |
curSnapshot->setTorsionPotential(torsionPotential); |
| 624 |
> |
curSnapshot->setInversionPotential(inversionPotential); |
| 625 |
> |
|
| 626 |
> |
// RealType shortRangePotential = bondPotential + bendPotential + |
| 627 |
> |
// torsionPotential + inversionPotential; |
| 628 |
> |
|
| 629 |
> |
// curSnapshot->setShortRangePotential(shortRangePotential); |
| 630 |
|
} |
| 631 |
|
|
| 632 |
|
void ForceManager::longRangeInteractions() { |
| 633 |
|
|
| 634 |
+ |
|
| 635 |
|
Snapshot* curSnapshot = info_->getSnapshotManager()->getCurrentSnapshot(); |
| 636 |
|
DataStorage* config = &(curSnapshot->atomData); |
| 637 |
|
DataStorage* cgConfig = &(curSnapshot->cgData); |
| 655 |
|
// center of mass of the group is the same as position of the atom |
| 656 |
|
// if cutoff group does not exist |
| 657 |
|
cgConfig->position = config->position; |
| 658 |
+ |
cgConfig->velocity = config->velocity; |
| 659 |
|
} |
| 660 |
|
|
| 661 |
|
fDecomp_->zeroWorkArrays(); |
| 662 |
|
fDecomp_->distributeData(); |
| 663 |
|
|
| 664 |
|
int cg1, cg2, atom1, atom2, topoDist; |
| 665 |
< |
Vector3d d_grp, dag, d; |
| 665 |
> |
Vector3d d_grp, dag, d, gvel2, vel2; |
| 666 |
|
RealType rgrpsq, rgrp, r2, r; |
| 667 |
|
RealType electroMult, vdwMult; |
| 668 |
|
RealType vij; |
| 675 |
|
InteractionData idat; |
| 676 |
|
SelfData sdat; |
| 677 |
|
RealType mf; |
| 640 |
– |
RealType lrPot; |
| 678 |
|
RealType vpair; |
| 679 |
+ |
RealType dVdFQ1(0.0); |
| 680 |
+ |
RealType dVdFQ2(0.0); |
| 681 |
|
potVec longRangePotential(0.0); |
| 682 |
|
potVec workPot(0.0); |
| 683 |
+ |
potVec exPot(0.0); |
| 684 |
|
vector<int>::iterator ia, jb; |
| 685 |
|
|
| 686 |
|
int loopStart, loopEnd; |
| 688 |
|
idat.vdwMult = &vdwMult; |
| 689 |
|
idat.electroMult = &electroMult; |
| 690 |
|
idat.pot = &workPot; |
| 691 |
+ |
idat.excludedPot = &exPot; |
| 692 |
|
sdat.pot = fDecomp_->getEmbeddingPotential(); |
| 693 |
+ |
sdat.excludedPot = fDecomp_->getExcludedSelfPotential(); |
| 694 |
|
idat.vpair = &vpair; |
| 695 |
+ |
idat.dVdFQ1 = &dVdFQ1; |
| 696 |
+ |
idat.dVdFQ2 = &dVdFQ2; |
| 697 |
|
idat.f1 = &f1; |
| 698 |
|
idat.sw = &sw; |
| 699 |
|
idat.shiftedPot = (cutoffMethod_ == SHIFTED_POTENTIAL) ? true : false; |
| 707 |
|
} else { |
| 708 |
|
loopStart = PAIR_LOOP; |
| 709 |
|
} |
| 666 |
– |
|
| 710 |
|
for (int iLoop = loopStart; iLoop <= loopEnd; iLoop++) { |
| 711 |
|
|
| 712 |
|
if (iLoop == loopStart) { |
| 738 |
|
|
| 739 |
|
in_switching_region = switcher_->getSwitch(rgrpsq, sw, dswdr, |
| 740 |
|
rgrp); |
| 741 |
< |
|
| 741 |
> |
|
| 742 |
|
atomListRow = fDecomp_->getAtomsInGroupRow(cg1); |
| 743 |
|
atomListColumn = fDecomp_->getAtomsInGroupColumn(cg2); |
| 744 |
|
|
| 745 |
+ |
if (doHeatFlux_) |
| 746 |
+ |
gvel2 = fDecomp_->getGroupVelocityColumn(cg2); |
| 747 |
+ |
|
| 748 |
|
for (ia = atomListRow.begin(); |
| 749 |
|
ia != atomListRow.end(); ++ia) { |
| 750 |
|
atom1 = (*ia); |
| 751 |
< |
|
| 751 |
> |
|
| 752 |
|
for (jb = atomListColumn.begin(); |
| 753 |
|
jb != atomListColumn.end(); ++jb) { |
| 754 |
|
atom2 = (*jb); |
| 755 |
|
|
| 756 |
< |
if (!fDecomp_->skipAtomPair(atom1, atom2)) { |
| 756 |
> |
if (!fDecomp_->skipAtomPair(atom1, atom2, cg1, cg2)) { |
| 757 |
> |
|
| 758 |
|
vpair = 0.0; |
| 759 |
|
workPot = 0.0; |
| 760 |
+ |
exPot = 0.0; |
| 761 |
|
f1 = V3Zero; |
| 762 |
+ |
dVdFQ1 = 0.0; |
| 763 |
+ |
dVdFQ2 = 0.0; |
| 764 |
|
|
| 765 |
|
fDecomp_->fillInteractionData(idat, atom1, atom2); |
| 766 |
< |
|
| 766 |
> |
|
| 767 |
|
topoDist = fDecomp_->getTopologicalDistance(atom1, atom2); |
| 768 |
|
vdwMult = vdwScale_[topoDist]; |
| 769 |
|
electroMult = electrostaticScale_[topoDist]; |
| 771 |
|
if (atomListRow.size() == 1 && atomListColumn.size() == 1) { |
| 772 |
|
idat.d = &d_grp; |
| 773 |
|
idat.r2 = &rgrpsq; |
| 774 |
+ |
if (doHeatFlux_) |
| 775 |
+ |
vel2 = gvel2; |
| 776 |
|
} else { |
| 777 |
|
d = fDecomp_->getInteratomicVector(atom1, atom2); |
| 778 |
|
curSnapshot->wrapVector( d ); |
| 779 |
|
r2 = d.lengthSquare(); |
| 780 |
|
idat.d = &d; |
| 781 |
|
idat.r2 = &r2; |
| 782 |
+ |
if (doHeatFlux_) |
| 783 |
+ |
vel2 = fDecomp_->getAtomVelocityColumn(atom2); |
| 784 |
|
} |
| 785 |
|
|
| 786 |
|
r = sqrt( *(idat.r2) ); |
| 793 |
|
fDecomp_->unpackInteractionData(idat, atom1, atom2); |
| 794 |
|
vij += vpair; |
| 795 |
|
fij += f1; |
| 796 |
< |
tau -= outProduct( *(idat.d), f1); |
| 796 |
> |
stressTensor -= outProduct( *(idat.d), f1); |
| 797 |
> |
if (doHeatFlux_) |
| 798 |
> |
fDecomp_->addToHeatFlux(*(idat.d) * dot(f1, vel2)); |
| 799 |
|
} |
| 800 |
|
} |
| 801 |
|
} |
| 808 |
|
fij += fg; |
| 809 |
|
|
| 810 |
|
if (atomListRow.size() == 1 && atomListColumn.size() == 1) { |
| 811 |
< |
tau -= outProduct( *(idat.d), fg); |
| 811 |
> |
stressTensor -= outProduct( *(idat.d), fg); |
| 812 |
> |
if (doHeatFlux_) |
| 813 |
> |
fDecomp_->addToHeatFlux(*(idat.d) * dot(fg, vel2)); |
| 814 |
> |
|
| 815 |
|
} |
| 816 |
|
|
| 817 |
|
for (ia = atomListRow.begin(); |
| 827 |
|
// find the distance between the atom |
| 828 |
|
// and the center of the cutoff group: |
| 829 |
|
dag = fDecomp_->getAtomToGroupVectorRow(atom1, cg1); |
| 830 |
< |
tau -= outProduct(dag, fg); |
| 830 |
> |
stressTensor -= outProduct(dag, fg); |
| 831 |
> |
if (doHeatFlux_) |
| 832 |
> |
fDecomp_->addToHeatFlux( dag * dot(fg, vel2)); |
| 833 |
|
} |
| 834 |
|
} |
| 835 |
|
} |
| 847 |
|
// find the distance between the atom |
| 848 |
|
// and the center of the cutoff group: |
| 849 |
|
dag = fDecomp_->getAtomToGroupVectorColumn(atom2, cg2); |
| 850 |
< |
tau -= outProduct(dag, fg); |
| 850 |
> |
stressTensor -= outProduct(dag, fg); |
| 851 |
> |
if (doHeatFlux_) |
| 852 |
> |
fDecomp_->addToHeatFlux( dag * dot(fg, vel2)); |
| 853 |
|
} |
| 854 |
|
} |
| 855 |
|
} |
| 856 |
|
} |
| 857 |
|
//if (!info_->usesAtomicVirial()) { |
| 858 |
< |
// tau -= outProduct(d_grp, fij); |
| 858 |
> |
// stressTensor -= outProduct(d_grp, fij); |
| 859 |
> |
// if (doHeatFlux_) |
| 860 |
> |
// fDecomp_->addToHeatFlux( d_grp * dot(fij, vel2)); |
| 861 |
|
//} |
| 862 |
|
} |
| 863 |
|
} |
| 868 |
|
|
| 869 |
|
fDecomp_->collectIntermediateData(); |
| 870 |
|
|
| 871 |
< |
for (int atom1 = 0; atom1 < info_->getNAtoms(); atom1++) { |
| 871 |
> |
for (unsigned int atom1 = 0; atom1 < info_->getNAtoms(); atom1++) { |
| 872 |
|
fDecomp_->fillSelfData(sdat, atom1); |
| 873 |
|
interactionMan_->doPreForce(sdat); |
| 874 |
|
} |
| 879 |
|
} |
| 880 |
|
} |
| 881 |
|
|
| 882 |
+ |
// collects pairwise information |
| 883 |
|
fDecomp_->collectData(); |
| 884 |
|
|
| 885 |
|
if (info_->requiresSelfCorrection()) { |
| 886 |
< |
|
| 821 |
< |
for (int atom1 = 0; atom1 < info_->getNAtoms(); atom1++) { |
| 886 |
> |
for (unsigned int atom1 = 0; atom1 < info_->getNAtoms(); atom1++) { |
| 887 |
|
fDecomp_->fillSelfData(sdat, atom1); |
| 888 |
|
interactionMan_->doSelfCorrection(sdat); |
| 889 |
|
} |
| 825 |
– |
|
| 890 |
|
} |
| 891 |
|
|
| 892 |
+ |
// collects single-atom information |
| 893 |
+ |
fDecomp_->collectSelfData(); |
| 894 |
+ |
|
| 895 |
|
longRangePotential = *(fDecomp_->getEmbeddingPotential()) + |
| 896 |
|
*(fDecomp_->getPairwisePotential()); |
| 897 |
|
|
| 898 |
< |
lrPot = longRangePotential.sum(); |
| 898 |
> |
curSnapshot->setLongRangePotential(longRangePotential); |
| 899 |
> |
|
| 900 |
> |
curSnapshot->setExcludedPotentials(*(fDecomp_->getExcludedSelfPotential()) + |
| 901 |
> |
*(fDecomp_->getExcludedPotential())); |
| 902 |
|
|
| 833 |
– |
//store the tau and long range potential |
| 834 |
– |
curSnapshot->statData[Stats::LONG_RANGE_POTENTIAL] = lrPot; |
| 835 |
– |
curSnapshot->statData[Stats::VANDERWAALS_POTENTIAL] = longRangePotential[VANDERWAALS_FAMILY]; |
| 836 |
– |
curSnapshot->statData[Stats::ELECTROSTATIC_POTENTIAL] = longRangePotential[ELECTROSTATIC_FAMILY]; |
| 903 |
|
} |
| 904 |
|
|
| 905 |
|
|
| 909 |
|
Molecule::RigidBodyIterator rbIter; |
| 910 |
|
RigidBody* rb; |
| 911 |
|
Snapshot* curSnapshot = info_->getSnapshotManager()->getCurrentSnapshot(); |
| 912 |
< |
|
| 912 |
> |
|
| 913 |
|
// collect the atomic forces onto rigid bodies |
| 914 |
|
|
| 915 |
|
for (mol = info_->beginMolecule(mi); mol != NULL; |
| 917 |
|
for (rb = mol->beginRigidBody(rbIter); rb != NULL; |
| 918 |
|
rb = mol->nextRigidBody(rbIter)) { |
| 919 |
|
Mat3x3d rbTau = rb->calcForcesAndTorquesAndVirial(); |
| 920 |
< |
tau += rbTau; |
| 920 |
> |
stressTensor += rbTau; |
| 921 |
|
} |
| 922 |
|
} |
| 923 |
|
|
| 924 |
|
#ifdef IS_MPI |
| 925 |
< |
Mat3x3d tmpTau(tau); |
| 926 |
< |
MPI_Allreduce(tmpTau.getArrayPointer(), tau.getArrayPointer(), |
| 861 |
< |
9, MPI_REALTYPE, MPI_SUM, MPI_COMM_WORLD); |
| 925 |
> |
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, stressTensor.getArrayPointer(), 9, |
| 926 |
> |
MPI::REALTYPE, MPI::SUM); |
| 927 |
|
#endif |
| 928 |
< |
curSnapshot->setTau(tau); |
| 928 |
> |
curSnapshot->setStressTensor(stressTensor); |
| 929 |
> |
|
| 930 |
|
} |
| 931 |
|
|
| 932 |
|
} //end namespace OpenMD |