35 |
|
* |
36 |
|
* [1] Meineke, et al., J. Comp. Chem. 26, 252-271 (2005). |
37 |
|
* [2] Fennell & Gezelter, J. Chem. Phys. 124, 234104 (2006). |
38 |
< |
* [3] Sun, Lin & Gezelter, J. Chem. Phys. 128, 24107 (2008). |
38 |
> |
* [3] Sun, Lin & Gezelter, J. Chem. Phys. 128, 234107 (2008). |
39 |
|
* [4] Kuang & Gezelter, J. Chem. Phys. 133, 164101 (2010). |
40 |
|
* [5] Vardeman, Stocker & Gezelter, J. Chem. Theory Comput. 7, 834 (2011). |
41 |
|
*/ |
42 |
+ |
|
43 |
+ |
#include "config.h" |
44 |
+ |
|
45 |
+ |
#ifdef IS_MPI |
46 |
+ |
#include <mpi.h> |
47 |
+ |
#endif |
48 |
|
|
49 |
|
#include "io/DumpWriter.hpp" |
50 |
|
#include "primitives/Molecule.hpp" |
60 |
|
#define isinf(x) (!_finite(x) && !_isnan(x)) |
61 |
|
#endif |
62 |
|
|
57 |
– |
#ifdef IS_MPI |
58 |
– |
#include <mpi.h> |
59 |
– |
#endif |
60 |
– |
|
63 |
|
using namespace std; |
64 |
|
namespace OpenMD { |
65 |
|
|
312 |
|
SimInfo::MoleculeIterator mi; |
313 |
|
Molecule::IntegrableObjectIterator ii; |
314 |
|
RigidBody::AtomIterator ai; |
313 |
– |
Atom* atom; |
315 |
|
|
316 |
|
#ifndef IS_MPI |
317 |
|
os << " <Snapshot>\n"; |
319 |
|
writeFrameProperties(os, info_->getSnapshotManager()->getCurrentSnapshot()); |
320 |
|
|
321 |
|
os << " <StuntDoubles>\n"; |
322 |
< |
for (mol = info_->beginMolecule(mi); mol != NULL; mol = info_->nextMolecule(mi)) { |
323 |
< |
|
322 |
> |
for (mol = info_->beginMolecule(mi); mol != NULL; |
323 |
> |
mol = info_->nextMolecule(mi)) { |
324 |
|
|
325 |
|
for (sd = mol->beginIntegrableObject(ii); sd != NULL; |
326 |
|
sd = mol->nextIntegrableObject(ii)) { |
336 |
|
mol = info_->nextMolecule(mi)) { |
337 |
|
|
338 |
|
for (sd = mol->beginIntegrableObject(ii); sd != NULL; |
339 |
< |
sd = mol->nextIntegrableObject(ii)) { |
340 |
< |
|
339 |
> |
sd = mol->nextIntegrableObject(ii)) { |
340 |
> |
|
341 |
|
int ioIndex = sd->getGlobalIntegrableObjectIndex(); |
342 |
|
// do one for the IO itself |
343 |
|
os << prepareSiteLine(sd, ioIndex, 0); |
346 |
|
|
347 |
|
RigidBody* rb = static_cast<RigidBody*>(sd); |
348 |
|
int siteIndex = 0; |
349 |
< |
for (atom = rb->beginAtom(ai); atom != NULL; |
349 |
> |
for (Atom* atom = rb->beginAtom(ai); atom != NULL; |
350 |
|
atom = rb->nextAtom(ai)) { |
351 |
|
os << prepareSiteLine(atom, ioIndex, siteIndex); |
352 |
|
siteIndex++; |
421 |
|
// send our buffer: |
422 |
|
MPI::COMM_WORLD.Send((void *)buffer.c_str(), sendBufferLength, |
423 |
|
MPI::CHAR, masterNode, 0); |
424 |
+ |
|
425 |
|
} |
426 |
|
} |
427 |
|
} |
449 |
|
|
450 |
|
RigidBody* rb = static_cast<RigidBody*>(sd); |
451 |
|
int siteIndex = 0; |
452 |
< |
for (atom = rb->beginAtom(ai); atom != NULL; |
452 |
> |
for (Atom* atom = rb->beginAtom(ai); atom != NULL; |
453 |
|
atom = rb->nextAtom(ai)) { |
454 |
|
buffer += prepareSiteLine(atom, ioIndex, siteIndex); |
455 |
|
siteIndex++; |
627 |
|
} |
628 |
|
|
629 |
|
std::string DumpWriter::prepareSiteLine(StuntDouble* sd, int ioIndex, int siteIndex) { |
630 |
< |
|
630 |
> |
int storageLayout = info_->getSnapshotManager()->getStorageLayout(); |
631 |
|
|
632 |
|
std::string id; |
633 |
|
std::string type; |
643 |
|
} |
644 |
|
|
645 |
|
if (needFlucQ_) { |
646 |
< |
type += "cw"; |
647 |
< |
RealType fqPos = sd->getFlucQPos(); |
648 |
< |
if (isinf(fqPos) || isnan(fqPos) ) { |
649 |
< |
sprintf( painCave.errMsg, |
650 |
< |
"DumpWriter detected a numerical error writing the" |
651 |
< |
" fluctuating charge for object %s", id.c_str()); |
652 |
< |
painCave.isFatal = 1; |
653 |
< |
simError(); |
654 |
< |
} |
655 |
< |
sprintf(tempBuffer, " %13e ", fqPos); |
656 |
< |
line += tempBuffer; |
657 |
< |
|
658 |
< |
RealType fqVel = sd->getFlucQVel(); |
657 |
< |
if (isinf(fqVel) || isnan(fqVel) ) { |
658 |
< |
sprintf( painCave.errMsg, |
659 |
< |
"DumpWriter detected a numerical error writing the" |
660 |
< |
" fluctuating charge velocity for object %s", id.c_str()); |
661 |
< |
painCave.isFatal = 1; |
662 |
< |
simError(); |
663 |
< |
} |
664 |
< |
sprintf(tempBuffer, " %13e ", fqVel); |
665 |
< |
line += tempBuffer; |
646 |
> |
if (storageLayout & DataStorage::dslFlucQPosition) { |
647 |
> |
type += "c"; |
648 |
> |
RealType fqPos = sd->getFlucQPos(); |
649 |
> |
if (isinf(fqPos) || isnan(fqPos) ) { |
650 |
> |
sprintf( painCave.errMsg, |
651 |
> |
"DumpWriter detected a numerical error writing the" |
652 |
> |
" fluctuating charge for object %s", id.c_str()); |
653 |
> |
painCave.isFatal = 1; |
654 |
> |
simError(); |
655 |
> |
} |
656 |
> |
sprintf(tempBuffer, " %13e ", fqPos); |
657 |
> |
line += tempBuffer; |
658 |
> |
} |
659 |
|
|
660 |
< |
if (needForceVector_) { |
661 |
< |
type += "g"; |
662 |
< |
RealType fqFrc = sd->getFlucQFrc(); |
663 |
< |
if (isinf(fqFrc) || isnan(fqFrc) ) { |
660 |
> |
if (storageLayout & DataStorage::dslFlucQVelocity) { |
661 |
> |
type += "w"; |
662 |
> |
RealType fqVel = sd->getFlucQVel(); |
663 |
> |
if (isinf(fqVel) || isnan(fqVel) ) { |
664 |
|
sprintf( painCave.errMsg, |
665 |
|
"DumpWriter detected a numerical error writing the" |
666 |
< |
" fluctuating charge force for object %s", id.c_str()); |
666 |
> |
" fluctuating charge velocity for object %s", id.c_str()); |
667 |
|
painCave.isFatal = 1; |
668 |
|
simError(); |
669 |
|
} |
670 |
< |
sprintf(tempBuffer, " %13e ", fqFrc); |
670 |
> |
sprintf(tempBuffer, " %13e ", fqVel); |
671 |
|
line += tempBuffer; |
672 |
|
} |
680 |
– |
} |
673 |
|
|
674 |
+ |
if (needForceVector_) { |
675 |
+ |
if (storageLayout & DataStorage::dslFlucQForce) { |
676 |
+ |
type += "g"; |
677 |
+ |
RealType fqFrc = sd->getFlucQFrc(); |
678 |
+ |
if (isinf(fqFrc) || isnan(fqFrc) ) { |
679 |
+ |
sprintf( painCave.errMsg, |
680 |
+ |
"DumpWriter detected a numerical error writing the" |
681 |
+ |
" fluctuating charge force for object %s", id.c_str()); |
682 |
+ |
painCave.isFatal = 1; |
683 |
+ |
simError(); |
684 |
+ |
} |
685 |
+ |
sprintf(tempBuffer, " %13e ", fqFrc); |
686 |
+ |
line += tempBuffer; |
687 |
+ |
} |
688 |
+ |
} |
689 |
+ |
} |
690 |
+ |
|
691 |
|
if (needElectricField_) { |
692 |
< |
type += "e"; |
693 |
< |
Vector3d eField= sd->getElectricField(); |
694 |
< |
if (isinf(eField[0]) || isnan(eField[0]) || |
695 |
< |
isinf(eField[1]) || isnan(eField[1]) || |
696 |
< |
isinf(eField[2]) || isnan(eField[2]) ) { |
697 |
< |
sprintf( painCave.errMsg, |
698 |
< |
"DumpWriter detected a numerical error writing the electric" |
699 |
< |
" field for object %s", id.c_str()); |
700 |
< |
painCave.isFatal = 1; |
701 |
< |
simError(); |
692 |
> |
if (storageLayout & DataStorage::dslElectricField) { |
693 |
> |
type += "e"; |
694 |
> |
Vector3d eField= sd->getElectricField(); |
695 |
> |
if (isinf(eField[0]) || isnan(eField[0]) || |
696 |
> |
isinf(eField[1]) || isnan(eField[1]) || |
697 |
> |
isinf(eField[2]) || isnan(eField[2]) ) { |
698 |
> |
sprintf( painCave.errMsg, |
699 |
> |
"DumpWriter detected a numerical error writing the electric" |
700 |
> |
" field for object %s", id.c_str()); |
701 |
> |
painCave.isFatal = 1; |
702 |
> |
simError(); |
703 |
> |
} |
704 |
> |
sprintf(tempBuffer, " %13e %13e %13e", |
705 |
> |
eField[0], eField[1], eField[2]); |
706 |
> |
line += tempBuffer; |
707 |
|
} |
694 |
– |
sprintf(tempBuffer, " %13e %13e %13e", |
695 |
– |
eField[0], eField[1], eField[2]); |
696 |
– |
line += tempBuffer; |
708 |
|
} |
709 |
|
|
710 |
|
|
711 |
|
if (needParticlePot_) { |
712 |
< |
type += "u"; |
713 |
< |
RealType particlePot = sd->getParticlePot(); |
714 |
< |
if (isinf(particlePot) || isnan(particlePot)) { |
715 |
< |
sprintf( painCave.errMsg, |
716 |
< |
"DumpWriter detected a numerical error writing the particle " |
717 |
< |
" potential for object %s", id.c_str()); |
718 |
< |
painCave.isFatal = 1; |
719 |
< |
simError(); |
712 |
> |
if (storageLayout & DataStorage::dslParticlePot) { |
713 |
> |
type += "u"; |
714 |
> |
RealType particlePot = sd->getParticlePot(); |
715 |
> |
if (isinf(particlePot) || isnan(particlePot)) { |
716 |
> |
sprintf( painCave.errMsg, |
717 |
> |
"DumpWriter detected a numerical error writing the particle " |
718 |
> |
" potential for object %s", id.c_str()); |
719 |
> |
painCave.isFatal = 1; |
720 |
> |
simError(); |
721 |
> |
} |
722 |
> |
sprintf(tempBuffer, " %13e", particlePot); |
723 |
> |
line += tempBuffer; |
724 |
|
} |
710 |
– |
sprintf(tempBuffer, " %13e", particlePot); |
711 |
– |
line += tempBuffer; |
725 |
|
} |
726 |
< |
|
714 |
< |
|
726 |
> |
|
727 |
|
sprintf(tempBuffer, "%s %7s %s\n", id.c_str(), type.c_str(), line.c_str()); |
728 |
|
return std::string(tempBuffer); |
729 |
|
} |
738 |
|
#ifdef IS_MPI |
739 |
|
if (worldRank == 0) { |
740 |
|
#endif // is_mpi |
741 |
< |
|
741 |
> |
|
742 |
|
eorStream = createOStream(eorFilename_); |
743 |
|
|
744 |
|
#ifdef IS_MPI |
745 |
|
} |
746 |
< |
#endif // is_mpi |
747 |
< |
|
746 |
> |
#endif |
747 |
> |
|
748 |
|
writeFrame(*eorStream); |
749 |
< |
|
749 |
> |
|
750 |
|
#ifdef IS_MPI |
751 |
|
if (worldRank == 0) { |
752 |
< |
#endif // is_mpi |
752 |
> |
#endif |
753 |
> |
|
754 |
|
writeClosing(*eorStream); |
755 |
|
delete eorStream; |
756 |
+ |
|
757 |
|
#ifdef IS_MPI |
758 |
|
} |
759 |
|
#endif // is_mpi |