ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE/libmdtools/Molecule.cpp
Revision: 1234
Committed: Fri Jun 4 03:15:31 2004 UTC (20 years, 3 months ago) by tim
File size: 4880 byte(s)
Log Message:
new rattle algorithm is working

File Contents

# User Rev Content
1 gezelter 829 #include <stdlib.h>
2 mmeineke 426
3    
4     #include "Molecule.hpp"
5 chuckv 438 #include "simError.h"
6 mmeineke 426
7    
8    
9     Molecule::Molecule( void ){
10    
11     myAtoms = NULL;
12     myBonds = NULL;
13     myBends = NULL;
14     myTorsions = NULL;
15     }
16    
17     Molecule::~Molecule( void ){
18     int i;
19 tim 1167 CutoffGroup* cg;
20     vector<CutoffGroup*>::iterator iter;
21 mmeineke 426
22     if( myAtoms != NULL ){
23     for(i=0; i<nAtoms; i++) if(myAtoms[i] != NULL ) delete myAtoms[i];
24     delete[] myAtoms;
25     }
26    
27     if( myBonds != NULL ){
28     for(i=0; i<nBonds; i++) if(myBonds[i] != NULL ) delete myBonds[i];
29     delete[] myBonds;
30     }
31    
32     if( myBends != NULL ){
33     for(i=0; i<nBends; i++) if(myBends[i] != NULL ) delete myBends[i];
34     delete[] myBends;
35     }
36    
37     if( myTorsions != NULL ){
38     for(i=0; i<nTorsions; i++) if(myTorsions[i] != NULL ) delete myTorsions[i];
39     delete[] myTorsions;
40     }
41    
42 tim 1167 for(cg = beginCutoffGroup(iter); cg != NULL; cg = nextCutoffGroup(iter))
43     delete cg;
44     myCutoffGroups.clear();
45    
46 mmeineke 426 }
47    
48    
49     void Molecule::initialize( molInit &theInit ){
50 tim 1140
51 tim 1157 CutoffGroup* curCutoffGroup;
52     vector<CutoffGroup*>::iterator iterCutoff;
53     Atom* cutoffAtom;
54     vector<Atom*>::iterator iterAtom;
55     int atomIndex;
56    
57 mmeineke 426 nAtoms = theInit.nAtoms;
58     nMembers = nAtoms;
59     nBonds = theInit.nBonds;
60     nBends = theInit.nBends;
61     nTorsions = theInit.nTorsions;
62 gezelter 1097 nRigidBodies = theInit.nRigidBodies;
63 mmeineke 426 nOriented = theInit.nOriented;
64    
65     myAtoms = theInit.myAtoms;
66     myBonds = theInit.myBonds;
67     myBends = theInit.myBends;
68     myTorsions = theInit.myTorsions;
69 gezelter 1097 myRigidBodies = theInit.myRigidBodies;
70 gezelter 1104
71     myIntegrableObjects = theInit.myIntegrableObjects;
72 tim 1113
73     for (int i = 0; i < myRigidBodies.size(); i++)
74     myRigidBodies[i]->calcRefCoords();
75 tim 1136
76 tim 1157 myCutoffGroups = theInit.myCutoffGroups;
77 tim 1167 nCutoffGroups = myCutoffGroups.size();
78 tim 1234
79     myConstraintPairs = theInit.myConstraintPairs;
80 tim 1157
81 mmeineke 426 }
82    
83     void Molecule::calcForces( void ){
84    
85     int i;
86 tim 1136 double com[3];
87 mmeineke 426
88 gezelter 1104 for(i=0; i<myRigidBodies.size(); i++) {
89 gezelter 1097 myRigidBodies[i]->updateAtoms();
90     }
91    
92 tim 1136 //calculate the center of mass of the molecule
93 tim 1157 //getCOM(com);
94     //for(int i = 0; i < nAtoms; i ++)
95     // myAtoms[i]->setRc(com);
96 tim 1136
97    
98 mmeineke 426 for(i=0; i<nBonds; i++){
99     myBonds[i]->calc_forces();
100     }
101    
102     for(i=0; i<nBends; i++){
103     myBends[i]->calc_forces();
104     }
105    
106     for(i=0; i<nTorsions; i++){
107     myTorsions[i]->calc_forces();
108     }
109 gezelter 1097
110     // Rigid Body forces and torques are done after the fortran force loop
111    
112 mmeineke 426 }
113    
114    
115 mmeineke 428 double Molecule::getPotential( void ){
116 mmeineke 426
117     int i;
118     double myPot = 0.0;
119 gezelter 1109
120     for(i=0; i<myRigidBodies.size(); i++) {
121     myRigidBodies[i]->updateAtoms();
122     }
123 mmeineke 426
124     for(i=0; i<nBonds; i++){
125     myPot += myBonds[i]->get_potential();
126     }
127    
128     for(i=0; i<nBends; i++){
129     myPot += myBends[i]->get_potential();
130     }
131    
132     for(i=0; i<nTorsions; i++){
133     myPot += myTorsions[i]->get_potential();
134     }
135    
136     return myPot;
137     }
138 mmeineke 435
139     void Molecule::printMe( void ){
140    
141     int i;
142    
143     for(i=0; i<nBonds; i++){
144     myBonds[i]->printMe();
145     }
146    
147     for(i=0; i<nBends; i++){
148     myBends[i]->printMe();
149     }
150    
151     for(i=0; i<nTorsions; i++){
152     myTorsions[i]->printMe();
153     }
154 gezelter 1097
155 mmeineke 435 }
156 gezelter 446
157 mmeineke 449 void Molecule::moveCOM(double delta[3]){
158 gezelter 610 double aPos[3];
159     int i, j;
160 gezelter 446
161 tim 1113 for(i=0; i<myIntegrableObjects.size(); i++) {
162     if(myIntegrableObjects[i] != NULL ) {
163 gezelter 610
164 tim 1113 myIntegrableObjects[i]->getPos( aPos );
165 gezelter 610
166     for (j=0; j< 3; j++)
167     aPos[j] += delta[j];
168 gezelter 446
169 tim 1113 myIntegrableObjects[i]->setPos( aPos );
170 gezelter 446 }
171     }
172 gezelter 1097
173 gezelter 1104 for(i=0; i<myRigidBodies.size(); i++) {
174 gezelter 1097
175     myRigidBodies[i]->getPos( aPos );
176    
177     for (j=0; j< 3; j++)
178     aPos[j] += delta[j];
179    
180     myRigidBodies[i]->setPos( aPos );
181     }
182 gezelter 446 }
183    
184 gezelter 1097 void Molecule::atoms2rigidBodies( void ) {
185     int i;
186 gezelter 1104 for (i = 0; i < myRigidBodies.size(); i++) {
187     myRigidBodies[i]->calcForcesAndTorques();
188 gezelter 1097 }
189     }
190    
191 mmeineke 449 void Molecule::getCOM( double COM[3] ) {
192 gezelter 446
193     double mass, mtot;
194 gezelter 610 double aPos[3];
195     int i, j;
196 gezelter 446
197 gezelter 610 for (j=0; j<3; j++)
198     COM[j] = 0.0;
199    
200 gezelter 446 mtot = 0.0;
201    
202 tim 1113 for (i=0; i < myIntegrableObjects.size(); i++) {
203     if (myIntegrableObjects[i] != NULL) {
204 gezelter 446
205 tim 1113 mass = myIntegrableObjects[i]->getMass();
206 gezelter 446 mtot += mass;
207 gezelter 610
208 tim 1113 myIntegrableObjects[i]->getPos( aPos );
209 gezelter 446
210 gezelter 610 for( j = 0; j < 3; j++)
211     COM[j] += aPos[j] * mass;
212    
213 gezelter 446 }
214     }
215    
216 gezelter 610 for (j = 0; j < 3; j++)
217     COM[j] /= mtot;
218 gezelter 446 }
219 gezelter 468
220 gezelter 475 double Molecule::getCOMvel( double COMvel[3] ) {
221 gezelter 468
222 gezelter 475 double mass, mtot;
223 gezelter 607 double aVel[3];
224     int i, j;
225 gezelter 468
226 gezelter 607
227     for (j=0; j<3; j++)
228     COMvel[j] = 0.0;
229    
230 gezelter 468 mtot = 0.0;
231    
232 tim 1113 for (i=0; i < myIntegrableObjects.size(); i++) {
233     if (myIntegrableObjects[i] != NULL) {
234 mmeineke 489
235 tim 1113 mass = myIntegrableObjects[i]->getMass();
236 gezelter 468 mtot += mass;
237    
238 tim 1113 myIntegrableObjects[i]->getVel(aVel);
239 gezelter 607
240     for (j=0; j<3; j++)
241     COMvel[j] += aVel[j]*mass;
242    
243 gezelter 468 }
244     }
245    
246 gezelter 607 for (j=0; j<3; j++)
247     COMvel[j] /= mtot;
248 gezelter 468
249 gezelter 475 return mtot;
250    
251 gezelter 468 }
252 tim 658
253     double Molecule::getTotalMass()
254     {
255 tim 1113
256 tim 658 double totalMass;
257    
258     totalMass = 0;
259 tim 1113 for(int i =0; i < myIntegrableObjects.size(); i++){
260     totalMass += myIntegrableObjects[i]->getMass();
261 tim 658 }
262    
263     return totalMass;
264     }