[ViewVC] Diff of: OpenMD/branches/development/src/brains/SimInfo.cpp

Comparing branches/development/src/brains/SimInfo.cpp (file contents):
Revision 1549 by gezelter, Wed Apr 27 18:38:15 2011 UTC vs.
Revision 1874 by gezelter, Wed May 15 15:09:35 2013 UTC

#	Line 35 \| Line 35
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).
39	<	* [4] Vardeman & Gezelter, in progress (2009).
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		/**
#	Line 54 \| Line 55
55		#include "math/Vector3.hpp"
56		#include "primitives/Molecule.hpp"
57		#include "primitives/StuntDouble.hpp"
57	–	#include "UseTheForce/DarkSide/neighborLists_interface.h"
58	–	#include "UseTheForce/doForces_interface.h"
58		#include "utils/MemoryUtils.hpp"
59		#include "utils/simError.h"
60		#include "selection/SelectionManager.hpp"
61		#include "io/ForceFieldOptions.hpp"
62	<	#include "UseTheForce/ForceField.hpp"
62	>	#include "brains/ForceField.hpp"
63		#include "nonbonded/SwitchingFunction.hpp"
65	–
64		#ifdef IS_MPI
65	<	#include "UseTheForce/mpiComponentPlan.h"
66	<	#include "UseTheForce/DarkSide/simParallel_interface.h"
69	<	#endif
65	>	#include <mpi.h>
66	>	#endif
67
68		using namespace std;
69		namespace OpenMD {
#	Line 75 \| Line 72 \| namespace OpenMD {
72		forceField_(ff), simParams_(simParams),
73		ndf_(0), fdf_local(0), ndfRaw_(0), ndfTrans_(0), nZconstraint_(0),
74		nGlobalMols_(0), nGlobalAtoms_(0), nGlobalCutoffGroups_(0),
75	<	nGlobalIntegrableObjects_(0), nGlobalRigidBodies_(0),
75	>	nGlobalIntegrableObjects_(0), nGlobalRigidBodies_(0), nGlobalFluctuatingCharges_(0),
76		nAtoms_(0), nBonds_(0), nBends_(0), nTorsions_(0), nInversions_(0),
77		nRigidBodies_(0), nIntegrableObjects_(0), nCutoffGroups_(0),
78	<	nConstraints_(0), sman_(NULL), fortranInitialized_(false),
78	>	nConstraints_(0), nFluctuatingCharges_(0), sman_(NULL), topologyDone_(false),
79		calcBoxDipole_(false), useAtomicVirial_(true) {
80
81		MoleculeStamp* molStamp;
#	Line 91 \| Line 88 \| namespace OpenMD {
88
89		vector<Component*> components = simParams->getComponents();
90
91	<	for (vector<Component*>::iterator i = components.begin(); i !=components.end(); ++i) {
91	>	for (vector<Component*>::iterator i = components.begin();
92	>	i !=components.end(); ++i) {
93		molStamp = (*i)->getMoleculeStamp();
94		nMolWithSameStamp = (*i)->getNMol();
95
#	Line 132 \| Line 130 \| namespace OpenMD {
130		//equal to the total number of atoms minus number of atoms belong to
131		//cutoff group defined in meta-data file plus the number of cutoff
132		//groups defined in meta-data file
135	–	std::cerr << "nGA = " << nGlobalAtoms_ << "\n";
136	–	std::cerr << "nCA = " << nCutoffAtoms << "\n";
137	–	std::cerr << "nG = " << nGroups << "\n";
133
134		nGlobalCutoffGroups_ = nGlobalAtoms_ - nCutoffAtoms + nGroups;
140	–
141	–	std::cerr << "nGCG = " << nGlobalCutoffGroups_ << "\n";
135
136		//every free atom (atom does not belong to rigid bodies) is an
137		//integrable object therefore the total number of integrable objects
#	Line 233 \| Line 226 \| namespace OpenMD {
226
227
228		void SimInfo::calcNdf() {
229	<	int ndf_local;
229	>	int ndf_local, nfq_local;
230		MoleculeIterator i;
231		vector<StuntDouble*>::iterator j;
232	+	vector<Atom*>::iterator k;
233	+
234		Molecule* mol;
235	<	StuntDouble* integrableObject;
235	>	StuntDouble* sd;
236	>	Atom* atom;
237
238		ndf_local = 0;
239	+	nfq_local = 0;
240
241		for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) {
245	–	for (integrableObject = mol->beginIntegrableObject(j); integrableObject != NULL;
246	–	integrableObject = mol->nextIntegrableObject(j)) {
242
243	+	for (sd = mol->beginIntegrableObject(j); sd != NULL;
244	+	sd = mol->nextIntegrableObject(j)) {
245	+
246		ndf_local += 3;
247
248	<	if (integrableObject->isDirectional()) {
249	<	if (integrableObject->isLinear()) {
248	>	if (sd->isDirectional()) {
249	>	if (sd->isLinear()) {
250		ndf_local += 2;
251		} else {
252		ndf_local += 3;
253		}
254		}
257	–
255		}
256	+
257	+	for (atom = mol->beginFluctuatingCharge(k); atom != NULL;
258	+	atom = mol->nextFluctuatingCharge(k)) {
259	+	if (atom->isFluctuatingCharge()) {
260	+	nfq_local++;
261	+	}
262	+	}
263		}
264
265	+	ndfLocal_ = ndf_local;
266	+
267		// n_constraints is local, so subtract them on each processor
268		ndf_local -= nConstraints_;
269
270		#ifdef IS_MPI
271	<	MPI_Allreduce(&ndf_local,&ndf_,1,MPI_INT,MPI_SUM, MPI_COMM_WORLD);
271	>	MPI::COMM_WORLD.Allreduce(&ndf_local, &ndf_, 1, MPI::INT,MPI::SUM);
272	>	MPI::COMM_WORLD.Allreduce(&nfq_local, &nGlobalFluctuatingCharges_, 1,
273	>	MPI::INT, MPI::SUM);
274		#else
275		ndf_ = ndf_local;
276	+	nGlobalFluctuatingCharges_ = nfq_local;
277		#endif
278
279		// nZconstraints_ is global, as are the 3 COM translations for the
#	Line 275 \| Line 284 \| namespace OpenMD {
284
285		int SimInfo::getFdf() {
286		#ifdef IS_MPI
287	<	MPI_Allreduce(&fdf_local,&fdf_,1,MPI_INT,MPI_SUM, MPI_COMM_WORLD);
287	>	MPI::COMM_WORLD.Allreduce(&fdf_local, &fdf_, 1, MPI::INT, MPI::SUM);
288		#else
289		fdf_ = fdf_local;
290		#endif
291		return fdf_;
292		}
293	+
294	+	unsigned int SimInfo::getNLocalCutoffGroups(){
295	+	int nLocalCutoffAtoms = 0;
296	+	Molecule* mol;
297	+	MoleculeIterator mi;
298	+	CutoffGroup* cg;
299	+	Molecule::CutoffGroupIterator ci;
300
301	+	for (mol = beginMolecule(mi); mol != NULL; mol = nextMolecule(mi)) {
302	+
303	+	for (cg = mol->beginCutoffGroup(ci); cg != NULL;
304	+	cg = mol->nextCutoffGroup(ci)) {
305	+	nLocalCutoffAtoms += cg->getNumAtom();
306	+
307	+	}
308	+	}
309	+
310	+	return nAtoms_ - nLocalCutoffAtoms + nCutoffGroups_;
311	+	}
312	+
313		void SimInfo::calcNdfRaw() {
314		int ndfRaw_local;
315
316		MoleculeIterator i;
317		vector<StuntDouble*>::iterator j;
318		Molecule* mol;
319	<	StuntDouble* integrableObject;
319	>	StuntDouble* sd;
320
321		// Raw degrees of freedom that we have to set
322		ndfRaw_local = 0;
323
324		for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) {
297	–	for (integrableObject = mol->beginIntegrableObject(j); integrableObject != NULL;
298	–	integrableObject = mol->nextIntegrableObject(j)) {
325
326	+	for (sd = mol->beginIntegrableObject(j); sd != NULL;
327	+	sd = mol->nextIntegrableObject(j)) {
328	+
329		ndfRaw_local += 3;
330
331	<	if (integrableObject->isDirectional()) {
332	<	if (integrableObject->isLinear()) {
331	>	if (sd->isDirectional()) {
332	>	if (sd->isLinear()) {
333		ndfRaw_local += 2;
334		} else {
335		ndfRaw_local += 3;
#	Line 311 \| Line 340 \| namespace OpenMD {
340		}
341
342		#ifdef IS_MPI
343	<	MPI_Allreduce(&ndfRaw_local,&ndfRaw_,1,MPI_INT,MPI_SUM, MPI_COMM_WORLD);
343	>	MPI::COMM_WORLD.Allreduce(&ndfRaw_local, &ndfRaw_, 1, MPI::INT, MPI::SUM);
344		#else
345		ndfRaw_ = ndfRaw_local;
346		#endif
#	Line 324 \| Line 353 \| namespace OpenMD {
353
354
355		#ifdef IS_MPI
356	<	MPI_Allreduce(&ndfTrans_local,&ndfTrans_,1,MPI_INT,MPI_SUM, MPI_COMM_WORLD);
356	>	MPI::COMM_WORLD.Allreduce(&ndfTrans_local, &ndfTrans_, 1,
357	>	MPI::INT, MPI::SUM);
358		#else
359		ndfTrans_ = ndfTrans_local;
360		#endif
#	Line 360 \| Line 390 \| namespace OpenMD {
390		Molecule::RigidBodyIterator rbIter;
391		RigidBody* rb;
392		Molecule::IntegrableObjectIterator ii;
393	<	StuntDouble* integrableObject;
393	>	StuntDouble* sd;
394
395	<	for (integrableObject = mol->beginIntegrableObject(ii);
396	<	integrableObject != NULL;
367	<	integrableObject = mol->nextIntegrableObject(ii)) {
395	>	for (sd = mol->beginIntegrableObject(ii); sd != NULL;
396	>	sd = mol->nextIntegrableObject(ii)) {
397
398	<	if (integrableObject->isRigidBody()) {
399	<	rb = static_cast<RigidBody*>(integrableObject);
398	>	if (sd->isRigidBody()) {
399	>	rb = static_cast<RigidBody*>(sd);
400		vector<Atom*> atoms = rb->getAtoms();
401		set<int> rigidAtoms;
402		for (int i = 0; i < static_cast<int>(atoms.size()); ++i) {
#	Line 378 \| Line 407 \| namespace OpenMD {
407		}
408		} else {
409		set<int> oneAtomSet;
410	<	oneAtomSet.insert(integrableObject->getGlobalIndex());
411	<	atomGroups.insert(map<int, set<int> >::value_type(integrableObject->getGlobalIndex(), oneAtomSet));
410	>	oneAtomSet.insert(sd->getGlobalIndex());
411	>	atomGroups.insert(map<int, set<int> >::value_type(sd->getGlobalIndex(), oneAtomSet));
412		}
413		}
414
#	Line 513 \| Line 542 \| namespace OpenMD {
542		Molecule::RigidBodyIterator rbIter;
543		RigidBody* rb;
544		Molecule::IntegrableObjectIterator ii;
545	<	StuntDouble* integrableObject;
545	>	StuntDouble* sd;
546
547	<	for (integrableObject = mol->beginIntegrableObject(ii);
548	<	integrableObject != NULL;
520	<	integrableObject = mol->nextIntegrableObject(ii)) {
547	>	for (sd = mol->beginIntegrableObject(ii); sd != NULL;
548	>	sd = mol->nextIntegrableObject(ii)) {
549
550	<	if (integrableObject->isRigidBody()) {
551	<	rb = static_cast<RigidBody*>(integrableObject);
550	>	if (sd->isRigidBody()) {
551	>	rb = static_cast<RigidBody*>(sd);
552		vector<Atom*> atoms = rb->getAtoms();
553		set<int> rigidAtoms;
554		for (int i = 0; i < static_cast<int>(atoms.size()); ++i) {
#	Line 531 \| Line 559 \| namespace OpenMD {
559		}
560		} else {
561		set<int> oneAtomSet;
562	<	oneAtomSet.insert(integrableObject->getGlobalIndex());
563	<	atomGroups.insert(map<int, set<int> >::value_type(integrableObject->getGlobalIndex(), oneAtomSet));
562	>	oneAtomSet.insert(sd->getGlobalIndex());
563	>	atomGroups.insert(map<int, set<int> >::value_type(sd->getGlobalIndex(), oneAtomSet));
564		}
565		}
566
#	Line 687 \| Line 715 \| namespace OpenMD {
715		Atom* atom;
716		set<AtomType*> atomTypes;
717
718	<	for(mol = beginMolecule(mi); mol != NULL; mol = nextMolecule(mi)) {
719	<	for(atom = mol->beginAtom(ai); atom != NULL; atom = mol->nextAtom(ai)) {
718	>	for(mol = beginMolecule(mi); mol != NULL; mol = nextMolecule(mi)) {
719	>	for(atom = mol->beginAtom(ai); atom != NULL;
720	>	atom = mol->nextAtom(ai)) {
721		atomTypes.insert(atom->getAtomType());
722		}
723		}
724	<
724	>
725		#ifdef IS_MPI
726
727		// loop over the found atom types on this processor, and add their
728		// numerical idents to a vector:
729	<
729	>
730		vector<int> foundTypes;
731		set<AtomType*>::iterator i;
732		for (i = atomTypes.begin(); i != atomTypes.end(); ++i)
#	Line 706 \| Line 735 \| namespace OpenMD {
735		// count_local holds the number of found types on this processor
736		int count_local = foundTypes.size();
737
738	<	// count holds the total number of found types on all processors
710	<	// (some will be redundant with the ones found locally):
711	<	int count;
712	<	MPI::COMM_WORLD.Allreduce(&count_local, &count, 1, MPI::INT, MPI::SUM);
738	>	int nproc = MPI::COMM_WORLD.Get_size();
739
740	<	// create a vector to hold the globally found types, and resize it:
741	<	vector<int> ftGlobal;
742	<	ftGlobal.resize(count);
743	<	vector<int> counts;
740	>	// we need arrays to hold the counts and displacement vectors for
741	>	// all processors
742	>	vector<int> counts(nproc, 0);
743	>	vector<int> disps(nproc, 0);
744
745	<	int nproc = MPI::COMM_WORLD.Get_size();
746	<	counts.resize(nproc);
747	<	vector<int> disps;
748	<	disps.resize(nproc);
745	>	// fill the counts array
746	>	MPI::COMM_WORLD.Allgather(&count_local, 1, MPI::INT, &counts[0],
747	>	1, MPI::INT);
748	>
749	>	// use the processor counts to compute the displacement array
750	>	disps[0] = 0;
751	>	int totalCount = counts[0];
752	>	for (int iproc = 1; iproc < nproc; iproc++) {
753	>	disps[iproc] = disps[iproc-1] + counts[iproc-1];
754	>	totalCount += counts[iproc];
755	>	}
756
757	<	// now spray out the foundTypes to all the other processors:
757	>	// we need a (possibly redundant) set of all found types:
758	>	vector<int> ftGlobal(totalCount);
759
760	+	// now spray out the foundTypes to all the other processors:
761		MPI::COMM_WORLD.Allgatherv(&foundTypes[0], count_local, MPI::INT,
762	<	&ftGlobal[0], &counts[0], &disps[0], MPI::INT);
762	>	&ftGlobal[0], &counts[0], &disps[0],
763	>	MPI::INT);
764
765	+	vector<int>::iterator j;
766	+
767		// foundIdents is a stl set, so inserting an already found ident
768		// will have no effect.
769		set<int> foundIdents;
770	<	vector<int>::iterator j;
770	>
771		for (j = ftGlobal.begin(); j != ftGlobal.end(); ++j)
772		foundIdents.insert((*j));
773
774		// now iterate over the foundIdents and get the actual atom types
775		// that correspond to these:
776		set<int>::iterator it;
777	<	for (it = foundIdents.begin(); it != foundIdents.end(); ++it)
777	>	for (it = foundIdents.begin(); it != foundIdents.end(); ++it)
778		atomTypes.insert( forceField_->getAtomType((*it)) );
779
780		#endif
781	<
781	>
782		return atomTypes;
783		}
784
785	+
786	+	int getGlobalCountOfType(AtomType* atype) {
787	+	/*
788	+	set<AtomType*> atypes = getSimulatedAtomTypes();
789	+	map<AtomType*, int> counts_;
790	+
791	+	for(mol = beginMolecule(mi); mol != NULL; mol = nextMolecule(mi)) {
792	+	for(atom = mol->beginAtom(ai); atom != NULL;
793	+	atom = mol->nextAtom(ai)) {
794	+	atom->getAtomType();
795	+	}
796	+	}
797	+	*/
798	+	return 0;
799	+	}
800	+
801		void SimInfo::setupSimVariables() {
802		useAtomicVirial_ = simParams_->getUseAtomicVirial();
803	<	// we only call setAccumulateBoxDipole if the accumulateBoxDipole parameter is true
803	>	// we only call setAccumulateBoxDipole if the accumulateBoxDipole
804	>	// parameter is true
805		calcBoxDipole_ = false;
806		if ( simParams_->haveAccumulateBoxDipole() )
807		if ( simParams_->getAccumulateBoxDipole() ) {
808		calcBoxDipole_ = true;
809		}
810	<
810	>
811		set<AtomType*>::iterator i;
812		set<AtomType*> atomTypes;
813		atomTypes = getSimulatedAtomTypes();
814	<	int usesElectrostatic = 0;
815	<	int usesMetallic = 0;
816	<	int usesDirectional = 0;
814	>	bool usesElectrostatic = false;
815	>	bool usesMetallic = false;
816	>	bool usesDirectional = false;
817	>	bool usesFluctuatingCharges = false;
818		//loop over all of the atom types
819		for (i = atomTypes.begin(); i != atomTypes.end(); ++i) {
820		usesElectrostatic \|= (*i)->isElectrostatic();
821		usesMetallic \|= (*i)->isMetal();
822		usesDirectional \|= (*i)->isDirectional();
823	+	usesFluctuatingCharges \|= (*i)->isFluctuatingCharge();
824		}
825
826	<	#ifdef IS_MPI
827	<	int temp;
826	>	#ifdef IS_MPI
827	>	bool temp;
828		temp = usesDirectional;
829	<	MPI_Allreduce(&temp, &usesDirectionalAtoms_, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD);
830	<
829	>	MPI::COMM_WORLD.Allreduce(&temp, &usesDirectionalAtoms_, 1, MPI::BOOL,
830	>	MPI::LOR);
831	>
832		temp = usesMetallic;
833	<	MPI_Allreduce(&temp, &usesMetallicAtoms_, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD);
834	<
833	>	MPI::COMM_WORLD.Allreduce(&temp, &usesMetallicAtoms_, 1, MPI::BOOL,
834	>	MPI::LOR);
835	>
836		temp = usesElectrostatic;
837	<	MPI_Allreduce(&temp, &usesElectrostaticAtoms_, 1, MPI_INT, MPI_LOR, MPI_COMM_WORLD);
837	>	MPI::COMM_WORLD.Allreduce(&temp, &usesElectrostaticAtoms_, 1, MPI::BOOL,
838	>	MPI::LOR);
839	>
840	>	temp = usesFluctuatingCharges;
841	>	MPI::COMM_WORLD.Allreduce(&temp, &usesFluctuatingCharges_, 1, MPI::BOOL,
842	>	MPI::LOR);
843	>	#else
844	>
845	>	usesDirectionalAtoms_ = usesDirectional;
846	>	usesMetallicAtoms_ = usesMetallic;
847	>	usesElectrostaticAtoms_ = usesElectrostatic;
848	>	usesFluctuatingCharges_ = usesFluctuatingCharges;
849	>
850		#endif
851	<	fInfo_.SIM_uses_PBC = usesPeriodicBoundaries_;
852	<	fInfo_.SIM_uses_DirectionalAtoms = usesDirectionalAtoms_;
853	<	fInfo_.SIM_uses_MetallicAtoms = usesMetallicAtoms_;
854	<	fInfo_.SIM_requires_SkipCorrection = usesElectrostaticAtoms_;
784	<	fInfo_.SIM_requires_SelfCorrection = usesElectrostaticAtoms_;
785	<	fInfo_.SIM_uses_AtomicVirial = usesAtomicVirial_;
851	>
852	>	requiresPrepair_ = usesMetallicAtoms_ ? true : false;
853	>	requiresSkipCorrection_ = usesElectrostaticAtoms_ ? true : false;
854	>	requiresSelfCorrection_ = usesElectrostaticAtoms_ ? true : false;
855		}
856
857
#	Line 825 \| Line 894 \| namespace OpenMD {
894		}
895
896
897	<	void SimInfo::setupFortran() {
829	<	int isError;
830	<	int nExclude, nOneTwo, nOneThree, nOneFour;
831	<	vector<int> fortranGlobalGroupMembership;
832	<
833	<	isError = 0;
897	>	void SimInfo::prepareTopology() {
898
835	–	//globalGroupMembership_ is filled by SimCreator
836	–	for (int i = 0; i < nGlobalAtoms_; i++) {
837	–	fortranGlobalGroupMembership.push_back(globalGroupMembership_[i] + 1);
838	–	}
839	–
899		//calculate mass ratio of cutoff group
841	–	vector<RealType> mfact;
900		SimInfo::MoleculeIterator mi;
901		Molecule* mol;
902		Molecule::CutoffGroupIterator ci;
#	Line 847 \| Line 905 \| namespace OpenMD {
905		Atom* atom;
906		RealType totalMass;
907
908	<	//to avoid memory reallocation, reserve enough space for mfact
909	<	mfact.reserve(getNCutoffGroups());
908	>	/**
909	>	* The mass factor is the relative mass of an atom to the total
910	>	* mass of the cutoff group it belongs to. By default, all atoms
911	>	* are their own cutoff groups, and therefore have mass factors of
912	>	* 1. We need some special handling for massless atoms, which
913	>	* will be treated as carrying the entire mass of the cutoff
914	>	* group.
915	>	*/
916	>	massFactors_.clear();
917	>	massFactors_.resize(getNAtoms(), 1.0);
918
919		for(mol = beginMolecule(mi); mol != NULL; mol = nextMolecule(mi)) {
920	<	for (cg = mol->beginCutoffGroup(ci); cg != NULL; cg = mol->nextCutoffGroup(ci)) {
920	>	for (cg = mol->beginCutoffGroup(ci); cg != NULL;
921	>	cg = mol->nextCutoffGroup(ci)) {
922
923		totalMass = cg->getMass();
924		for(atom = cg->beginAtom(ai); atom != NULL; atom = cg->nextAtom(ai)) {
925		// Check for massless groups - set mfact to 1 if true
926	<	if (totalMass != 0)
927	<	mfact.push_back(atom->getMass()/totalMass);
926	>	if (totalMass != 0)
927	>	massFactors_[atom->getLocalIndex()] = atom->getMass()/totalMass;
928		else
929	<	mfact.push_back( 1.0 );
929	>	massFactors_[atom->getLocalIndex()] = 1.0;
930		}
931		}
932		}
#	Line 873 \| Line 940 \| namespace OpenMD {
940		identArray_.push_back(atom->getIdent());
941		}
942		}
876	–
877	–	//fill molMembershipArray
878	–	//molMembershipArray is filled by SimCreator
879	–	vector<int> molMembershipArray(nGlobalAtoms_);
880	–	for (int i = 0; i < nGlobalAtoms_; i++) {
881	–	molMembershipArray[i] = globalMolMembership_[i] + 1;
882	–	}
943
944	<	//setup fortran simulation
885	<
886	<	nExclude = excludedInteractions_.getSize();
887	<	nOneTwo = oneTwoInteractions_.getSize();
888	<	nOneThree = oneThreeInteractions_.getSize();
889	<	nOneFour = oneFourInteractions_.getSize();
890	<
891	<	int* excludeList = excludedInteractions_.getPairList();
892	<	int* oneTwoList = oneTwoInteractions_.getPairList();
893	<	int* oneThreeList = oneThreeInteractions_.getPairList();
894	<	int* oneFourList = oneFourInteractions_.getPairList();
895	<
896	<	setFortranSim( &fInfo_, &nGlobalAtoms_, &nAtoms_, &identArray_[0],
897	<	&nExclude, excludeList,
898	<	&nOneTwo, oneTwoList,
899	<	&nOneThree, oneThreeList,
900	<	&nOneFour, oneFourList,
901	<	&molMembershipArray[0], &mfact[0], &nCutoffGroups_,
902	<	&fortranGlobalGroupMembership[0], &isError);
903	<
904	<	if( isError ){
905	<
906	<	sprintf( painCave.errMsg,
907	<	"There was an error setting the simulation information in fortran.\n" );
908	<	painCave.isFatal = 1;
909	<	painCave.severity = OPENMD_ERROR;
910	<	simError();
911	<	}
912	<
913	<
914	<	sprintf( checkPointMsg,
915	<	"succesfully sent the simulation information to fortran.\n");
916	<
917	<	errorCheckPoint();
918	<
919	<	// Setup number of neighbors in neighbor list if present
920	<	if (simParams_->haveNeighborListNeighbors()) {
921	<	int nlistNeighbors = simParams_->getNeighborListNeighbors();
922	<	setNeighbors(&nlistNeighbors);
923	<	}
924	<
925	<	#ifdef IS_MPI
926	<	mpiSimData parallelData;
927	<
928	<	//fill up mpiSimData struct
929	<	parallelData.nMolGlobal = getNGlobalMolecules();
930	<	parallelData.nMolLocal = getNMolecules();
931	<	parallelData.nAtomsGlobal = getNGlobalAtoms();
932	<	parallelData.nAtomsLocal = getNAtoms();
933	<	parallelData.nGroupsGlobal = getNGlobalCutoffGroups();
934	<	parallelData.nGroupsLocal = getNCutoffGroups();
935	<	parallelData.myNode = worldRank;
936	<	MPI_Comm_size(MPI_COMM_WORLD, &(parallelData.nProcessors));
937	<
938	<	//pass mpiSimData struct and index arrays to fortran
939	<	//setFsimParallel(&parallelData, &(parallelData.nAtomsLocal),
940	<	// &localToGlobalAtomIndex[0], &(parallelData.nGroupsLocal),
941	<	// &localToGlobalCutoffGroupIndex[0], &isError);
942	<
943	<	if (isError) {
944	<	sprintf(painCave.errMsg,
945	<	"mpiRefresh errror: fortran didn't like something we gave it.\n");
946	<	painCave.isFatal = 1;
947	<	simError();
948	<	}
949	<
950	<	sprintf(checkPointMsg, " mpiRefresh successful.\n");
951	<	errorCheckPoint();
952	<	#endif
953	<
954	<	initFortranFF(&isError);
955	<	if (isError) {
956	<	sprintf(painCave.errMsg,
957	<	"initFortranFF errror: fortran didn't like something we gave it.\n");
958	<	painCave.isFatal = 1;
959	<	simError();
960	<	}
961	<	fortranInitialized_ = true;
944	>	topologyDone_ = true;
945		}
946
947		void SimInfo::addProperty(GenericData* genData) {
#	Line 1003 \| Line 986 \| namespace OpenMD {
986
987		for (mol = beginMolecule(mi); mol != NULL; mol = nextMolecule(mi)) {
988
989	<	for (atom = mol->beginAtom(atomIter); atom != NULL; atom = mol->nextAtom(atomIter)) {
989	>	for (atom = mol->beginAtom(atomIter); atom != NULL;
990	>	atom = mol->nextAtom(atomIter)) {
991		atom->setSnapshotManager(sman_);
992		}
993
994	<	for (rb = mol->beginRigidBody(rbIter); rb != NULL; rb = mol->nextRigidBody(rbIter)) {
994	>	for (rb = mol->beginRigidBody(rbIter); rb != NULL;
995	>	rb = mol->nextRigidBody(rbIter)) {
996		rb->setSnapshotManager(sman_);
997		}
998
999	<	for (cg = mol->beginCutoffGroup(cgIter); cg != NULL; cg = mol->nextCutoffGroup(cgIter)) {
999	>	for (cg = mol->beginCutoffGroup(cgIter); cg != NULL;
1000	>	cg = mol->nextCutoffGroup(cgIter)) {
1001		cg->setSnapshotManager(sman_);
1002		}
1003		}
1004
1005		}
1006
1021	–	Vector3d SimInfo::getComVel(){
1022	–	SimInfo::MoleculeIterator i;
1023	–	Molecule* mol;
1007
1025	–	Vector3d comVel(0.0);
1026	–	RealType totalMass = 0.0;
1027	–
1028	–
1029	–	for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) {
1030	–	RealType mass = mol->getMass();
1031	–	totalMass += mass;
1032	–	comVel += mass * mol->getComVel();
1033	–	}
1034	–
1035	–	#ifdef IS_MPI
1036	–	RealType tmpMass = totalMass;
1037	–	Vector3d tmpComVel(comVel);
1038	–	MPI_Allreduce(&tmpMass,&totalMass,1,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
1039	–	MPI_Allreduce(tmpComVel.getArrayPointer(), comVel.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
1040	–	#endif
1041	–
1042	–	comVel /= totalMass;
1043	–
1044	–	return comVel;
1045	–	}
1046	–
1047	–	Vector3d SimInfo::getCom(){
1048	–	SimInfo::MoleculeIterator i;
1049	–	Molecule* mol;
1050	–
1051	–	Vector3d com(0.0);
1052	–	RealType totalMass = 0.0;
1053	–
1054	–	for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) {
1055	–	RealType mass = mol->getMass();
1056	–	totalMass += mass;
1057	–	com += mass * mol->getCom();
1058	–	}
1059	–
1060	–	#ifdef IS_MPI
1061	–	RealType tmpMass = totalMass;
1062	–	Vector3d tmpCom(com);
1063	–	MPI_Allreduce(&tmpMass,&totalMass,1,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
1064	–	MPI_Allreduce(tmpCom.getArrayPointer(), com.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
1065	–	#endif
1066	–
1067	–	com /= totalMass;
1068	–
1069	–	return com;
1070	–
1071	–	}
1072	–
1008		ostream& operator <<(ostream& o, SimInfo& info) {
1009
1010		return o;
1011		}
1012
1013	<
1079	<	/*
1080	<	Returns center of mass and center of mass velocity in one function call.
1081	<	*/
1082	<
1083	<	void SimInfo::getComAll(Vector3d &com, Vector3d &comVel){
1084	<	SimInfo::MoleculeIterator i;
1085	<	Molecule* mol;
1086	<
1087	<
1088	<	RealType totalMass = 0.0;
1089	<
1090	<
1091	<	for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) {
1092	<	RealType mass = mol->getMass();
1093	<	totalMass += mass;
1094	<	com += mass * mol->getCom();
1095	<	comVel += mass * mol->getComVel();
1096	<	}
1097	<
1098	<	#ifdef IS_MPI
1099	<	RealType tmpMass = totalMass;
1100	<	Vector3d tmpCom(com);
1101	<	Vector3d tmpComVel(comVel);
1102	<	MPI_Allreduce(&tmpMass,&totalMass,1,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
1103	<	MPI_Allreduce(tmpCom.getArrayPointer(), com.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
1104	<	MPI_Allreduce(tmpComVel.getArrayPointer(), comVel.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
1105	<	#endif
1106	<
1107	<	com /= totalMass;
1108	<	comVel /= totalMass;
1109	<	}
1110	<
1111	<	/*
1112	<	Return intertia tensor for entire system and angular momentum Vector.
1113	<
1114	<
1115	<	[ Ixx -Ixy -Ixz ]
1116	<	J =\| -Iyx Iyy -Iyz \|
1117	<	[ -Izx -Iyz Izz ]
1118	<	*/
1119	<
1120	<	void SimInfo::getInertiaTensor(Mat3x3d &inertiaTensor, Vector3d &angularMomentum){
1121	<
1122	<
1123	<	RealType xx = 0.0;
1124	<	RealType yy = 0.0;
1125	<	RealType zz = 0.0;
1126	<	RealType xy = 0.0;
1127	<	RealType xz = 0.0;
1128	<	RealType yz = 0.0;
1129	<	Vector3d com(0.0);
1130	<	Vector3d comVel(0.0);
1131	<
1132	<	getComAll(com, comVel);
1133	<
1134	<	SimInfo::MoleculeIterator i;
1135	<	Molecule* mol;
1136	<
1137	<	Vector3d thisq(0.0);
1138	<	Vector3d thisv(0.0);
1139	<
1140	<	RealType thisMass = 0.0;
1141	<
1142	<
1143	<
1144	<
1145	<	for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) {
1146	<
1147	<	thisq = mol->getCom()-com;
1148	<	thisv = mol->getComVel()-comVel;
1149	<	thisMass = mol->getMass();
1150	<	// Compute moment of intertia coefficients.
1151	<	xx += thisq[0]thisq[0]thisMass;
1152	<	yy += thisq[1]thisq[1]thisMass;
1153	<	zz += thisq[2]thisq[2]thisMass;
1154	<
1155	<	// compute products of intertia
1156	<	xy += thisq[0]thisq[1]thisMass;
1157	<	xz += thisq[0]thisq[2]thisMass;
1158	<	yz += thisq[1]thisq[2]thisMass;
1159	<
1160	<	angularMomentum += cross( thisq, thisv ) * thisMass;
1161	<
1162	<	}
1163	<
1164	<
1165	<	inertiaTensor(0,0) = yy + zz;
1166	<	inertiaTensor(0,1) = -xy;
1167	<	inertiaTensor(0,2) = -xz;
1168	<	inertiaTensor(1,0) = -xy;
1169	<	inertiaTensor(1,1) = xx + zz;
1170	<	inertiaTensor(1,2) = -yz;
1171	<	inertiaTensor(2,0) = -xz;
1172	<	inertiaTensor(2,1) = -yz;
1173	<	inertiaTensor(2,2) = xx + yy;
1174	<
1175	<	#ifdef IS_MPI
1176	<	Mat3x3d tmpI(inertiaTensor);
1177	<	Vector3d tmpAngMom;
1178	<	MPI_Allreduce(tmpI.getArrayPointer(), inertiaTensor.getArrayPointer(),9,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
1179	<	MPI_Allreduce(tmpAngMom.getArrayPointer(), angularMomentum.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
1180	<	#endif
1181	<
1182	<	return;
1183	<	}
1184	<
1185	<	//Returns the angular momentum of the system
1186	<	Vector3d SimInfo::getAngularMomentum(){
1187	<
1188	<	Vector3d com(0.0);
1189	<	Vector3d comVel(0.0);
1190	<	Vector3d angularMomentum(0.0);
1191	<
1192	<	getComAll(com,comVel);
1193	<
1194	<	SimInfo::MoleculeIterator i;
1195	<	Molecule* mol;
1196	<
1197	<	Vector3d thisr(0.0);
1198	<	Vector3d thisp(0.0);
1199	<
1200	<	RealType thisMass;
1201	<
1202	<	for (mol = beginMolecule(i); mol != NULL; mol = nextMolecule(i)) {
1203	<	thisMass = mol->getMass();
1204	<	thisr = mol->getCom()-com;
1205	<	thisp = (mol->getComVel()-comVel)*thisMass;
1206	<
1207	<	angularMomentum += cross( thisr, thisp );
1208	<
1209	<	}
1210	<
1211	<	#ifdef IS_MPI
1212	<	Vector3d tmpAngMom;
1213	<	MPI_Allreduce(tmpAngMom.getArrayPointer(), angularMomentum.getArrayPointer(),3,MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
1214	<	#endif
1215	<
1216	<	return angularMomentum;
1217	<	}
1218	<
1013	>
1014		StuntDouble* SimInfo::getIOIndexToIntegrableObject(int index) {
1015	<	return IOIndexToIntegrableObject.at(index);
1015	>	if (index >= int(IOIndexToIntegrableObject.size())) {
1016	>	sprintf(painCave.errMsg,
1017	>	"SimInfo::getIOIndexToIntegrableObject Error: Integrable Object\n"
1018	>	"\tindex exceeds number of known objects!\n");
1019	>	painCave.isFatal = 1;
1020	>	simError();
1021	>	return NULL;
1022	>	} else
1023	>	return IOIndexToIntegrableObject.at(index);
1024		}
1025
1026		void SimInfo::setIOIndexToIntegrableObject(const vector<StuntDouble*>& v) {
1027		IOIndexToIntegrableObject= v;
1028		}
1029
1227	–	/* Returns the Volume of the simulation based on a ellipsoid with semi-axes
1228	–	based on the radius of gyration V=4/3PiR_1R_2R_3
1229	–	where R_i are related to the principle inertia moments R_i = sqrt(C*I_i/N), this reduces to
1230	–	V = 4/3Pi(C/N)^3/2*sqrt(det(I)). See S.E. Baltazar et. al. Comp. Mat. Sci. 37 (2006) 526-536.
1231	–	*/
1232	–	void SimInfo::getGyrationalVolume(RealType &volume){
1233	–	Mat3x3d intTensor;
1234	–	RealType det;
1235	–	Vector3d dummyAngMom;
1236	–	RealType sysconstants;
1237	–	RealType geomCnst;
1238	–
1239	–	geomCnst = 3.0/2.0;
1240	–	/* Get the inertial tensor and angular momentum for free*/
1241	–	getInertiaTensor(intTensor,dummyAngMom);
1242	–
1243	–	det = intTensor.determinant();
1244	–	sysconstants = geomCnst/(RealType)nGlobalIntegrableObjects_;
1245	–	volume = 4.0/3.0NumericConstant::PIpow(sysconstants,3.0/2.0)*sqrt(det);
1246	–	return;
1247	–	}
1248	–
1249	–	void SimInfo::getGyrationalVolume(RealType &volume, RealType &detI){
1250	–	Mat3x3d intTensor;
1251	–	Vector3d dummyAngMom;
1252	–	RealType sysconstants;
1253	–	RealType geomCnst;
1254	–
1255	–	geomCnst = 3.0/2.0;
1256	–	/* Get the inertial tensor and angular momentum for free*/
1257	–	getInertiaTensor(intTensor,dummyAngMom);
1258	–
1259	–	detI = intTensor.determinant();
1260	–	sysconstants = geomCnst/(RealType)nGlobalIntegrableObjects_;
1261	–	volume = 4.0/3.0NumericConstant::PIpow(sysconstants,3.0/2.0)*sqrt(detI);
1262	–	return;
1263	–	}
1264	–	/*
1265	–	void SimInfo::setStuntDoubleFromGlobalIndex(vector<StuntDouble*> v) {
1266	–	assert( v.size() == nAtoms_ + nRigidBodies_);
1267	–	sdByGlobalIndex_ = v;
1268	–	}
1269	–
1270	–	StuntDouble* SimInfo::getStuntDoubleFromGlobalIndex(int index) {
1271	–	//assert(index < nAtoms_ + nRigidBodies_);
1272	–	return sdByGlobalIndex_.at(index);
1273	–	}
1274	–	*/
1030		int SimInfo::getNGlobalConstraints() {
1031		int nGlobalConstraints;
1032		#ifdef IS_MPI
1033	<	MPI_Allreduce(&nConstraints_, &nGlobalConstraints, 1, MPI_INT, MPI_SUM,
1034	<	MPI_COMM_WORLD);
1033	>	MPI::COMM_WORLD.Allreduce(&nConstraints_, &nGlobalConstraints, 1,
1034	>	MPI::INT, MPI::SUM);
1035		#else
1036		nGlobalConstraints = nConstraints_;
1037		#endif

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing branches/development/src/brains/SimInfo.cpp (file contents): Revision 1549 by gezelter, Wed Apr 27 18:38:15 2011 UTC vs. Revision 1874 by gezelter, Wed May 15 15:09:35 2013 UTC

Diff Legend

Comparing branches/development/src/brains/SimInfo.cpp (file contents):
Revision 1549 by gezelter, Wed Apr 27 18:38:15 2011 UTC vs.
Revision 1874 by gezelter, Wed May 15 15:09:35 2013 UTC