ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/OpenMD/branches/development/src/primitives/RigidBody.cpp
(Generate patch)

Comparing trunk/src/primitives/RigidBody.cpp (file contents):
Revision 2 by gezelter, Fri Sep 24 04:16:43 2004 UTC vs.
Revision 1211 by gezelter, Wed Jan 23 16:38:22 2008 UTC

# Line 1 | Line 1
1 + /*
2 + * Copyright (c) 2005 The University of Notre Dame. All Rights Reserved.
3 + *
4 + * The University of Notre Dame grants you ("Licensee") a
5 + * non-exclusive, royalty free, license to use, modify and
6 + * redistribute this software in source and binary code form, provided
7 + * that the following conditions are met:
8 + *
9 + * 1. Acknowledgement of the program authors must be made in any
10 + *    publication of scientific results based in part on use of the
11 + *    program.  An acceptable form of acknowledgement is citation of
12 + *    the article in which the program was described (Matthew
13 + *    A. Meineke, Charles F. Vardeman II, Teng Lin, Christopher
14 + *    J. Fennell and J. Daniel Gezelter, "OOPSE: An Object-Oriented
15 + *    Parallel Simulation Engine for Molecular Dynamics,"
16 + *    J. Comput. Chem. 26, pp. 252-271 (2005))
17 + *
18 + * 2. Redistributions of source code must retain the above copyright
19 + *    notice, this list of conditions and the following disclaimer.
20 + *
21 + * 3. Redistributions in binary form must reproduce the above copyright
22 + *    notice, this list of conditions and the following disclaimer in the
23 + *    documentation and/or other materials provided with the
24 + *    distribution.
25 + *
26 + * This software is provided "AS IS," without a warranty of any
27 + * kind. All express or implied conditions, representations and
28 + * warranties, including any implied warranty of merchantability,
29 + * fitness for a particular purpose or non-infringement, are hereby
30 + * excluded.  The University of Notre Dame and its licensors shall not
31 + * be liable for any damages suffered by licensee as a result of
32 + * using, modifying or distributing the software or its
33 + * derivatives. In no event will the University of Notre Dame or its
34 + * licensors be liable for any lost revenue, profit or data, or for
35 + * direct, indirect, special, consequential, incidental or punitive
36 + * damages, however caused and regardless of the theory of liability,
37 + * arising out of the use of or inability to use software, even if the
38 + * University of Notre Dame has been advised of the possibility of
39 + * such damages.
40 + */
41 + #include <algorithm>
42   #include <math.h>
43 < #include "RigidBody.hpp"
44 < #include "DirectionalAtom.hpp"
45 < #include "simError.h"
46 < #include "MatVec3.h"
47 <
48 < RigidBody::RigidBody() : StuntDouble() {
49 <  objType = OT_RIGIDBODY;
9 <  is_linear = false;
10 <  linear_axis =  -1;
11 <  momIntTol = 1e-6;
12 < }
13 <
14 < RigidBody::~RigidBody() {
15 < }
16 <
17 < void RigidBody::addAtom(Atom* at, AtomStamp* ats) {
18 <
19 <  vec3 coords;
20 <  vec3 euler;
21 <  mat3x3 Atmp;
22 <
23 <  myAtoms.push_back(at);
24 <
25 <  if( !ats->havePosition() ){
26 <    sprintf( painCave.errMsg,
27 <             "RigidBody error.\n"
28 <             "\tAtom %s does not have a position specified.\n"
29 <             "\tThis means RigidBody cannot set up reference coordinates.\n",
30 <             ats->getType() );
31 <    painCave.isFatal = 1;
32 <    simError();
43 > #include "primitives/RigidBody.hpp"
44 > #include "utils/simError.h"
45 > #include "utils/NumericConstant.hpp"
46 > namespace oopse {
47 >  
48 >  RigidBody::RigidBody() : StuntDouble(otRigidBody, &Snapshot::rigidbodyData),
49 >                           inertiaTensor_(0.0){    
50    }
51    
52 <  coords[0] = ats->getPosX();
53 <  coords[1] = ats->getPosY();
37 <  coords[2] = ats->getPosZ();
38 <
39 <  refCoords.push_back(coords);
40 <  
41 <  if (at->isDirectional()) {  
42 <
43 <    if( !ats->haveOrientation() ){
44 <      sprintf( painCave.errMsg,
45 <               "RigidBody error.\n"
46 <               "\tAtom %s does not have an orientation specified.\n"
47 <               "\tThis means RigidBody cannot set up reference orientations.\n",
48 <               ats->getType() );
49 <      painCave.isFatal = 1;
50 <      simError();
51 <    }    
52 >  void RigidBody::setPrevA(const RotMat3x3d& a) {
53 >    ((snapshotMan_->getPrevSnapshot())->*storage_).aMat[localIndex_] = a;
54      
55 <    euler[0] = ats->getEulerPhi();
56 <    euler[1] = ats->getEulerTheta();
57 <    euler[2] = ats->getEulerPsi();
55 >    for (int i =0 ; i < atoms_.size(); ++i){
56 >      if (atoms_[i]->isDirectional()) {
57 >        atoms_[i]->setPrevA(refOrients_[i].transpose() * a);
58 >      }
59 >    }
60      
57    doEulerToRotMat(euler, Atmp);
58    
59    refOrients.push_back(Atmp);
60    
61    }
62 < }
62 >  
63 >  
64 >  void RigidBody::setA(const RotMat3x3d& a) {
65 >    ((snapshotMan_->getCurrentSnapshot())->*storage_).aMat[localIndex_] = a;
66  
67 < void RigidBody::getPos(double theP[3]){
68 <  for (int i = 0; i < 3 ; i++)
69 <    theP[i] = pos[i];
70 < }      
71 <
72 < void RigidBody::setPos(double theP[3]){
70 <  for (int i = 0; i < 3 ; i++)
71 <    pos[i] = theP[i];
72 < }      
73 <
74 < void RigidBody::getVel(double theV[3]){
75 <  for (int i = 0; i < 3 ; i++)
76 <    theV[i] = vel[i];
77 < }      
78 <
79 < void RigidBody::setVel(double theV[3]){
80 <  for (int i = 0; i < 3 ; i++)
81 <    vel[i] = theV[i];
82 < }      
83 <
84 < void RigidBody::getFrc(double theF[3]){
85 <  for (int i = 0; i < 3 ; i++)
86 <    theF[i] = frc[i];
87 < }      
88 <
89 < void RigidBody::addFrc(double theF[3]){
90 <  for (int i = 0; i < 3 ; i++)
91 <    frc[i] += theF[i];
92 < }    
93 <
94 < void RigidBody::zeroForces() {
95 <
96 <  for (int i = 0; i < 3; i++) {
97 <    frc[i] = 0.0;
98 <    trq[i] = 0.0;
99 <  }
100 <
101 < }
102 <
103 < void RigidBody::setEuler( double phi, double theta, double psi ){
67 >    for (int i =0 ; i < atoms_.size(); ++i){
68 >      if (atoms_[i]->isDirectional()) {
69 >        atoms_[i]->setA(refOrients_[i].transpose() * a);
70 >      }
71 >    }
72 >  }    
73    
74 <    A[0][0] = (cos(phi) * cos(psi)) - (sin(phi) * cos(theta) * sin(psi));
75 <    A[0][1] = (sin(phi) * cos(psi)) + (cos(phi) * cos(theta) * sin(psi));
107 <    A[0][2] = sin(theta) * sin(psi);
74 >  void RigidBody::setA(const RotMat3x3d& a, int snapshotNo) {
75 >    ((snapshotMan_->getSnapshot(snapshotNo))->*storage_).aMat[localIndex_] = a;
76      
77 <    A[1][0] = -(cos(phi) * sin(psi)) - (sin(phi) * cos(theta) * cos(psi));
110 <    A[1][1] = -(sin(phi) * sin(psi)) + (cos(phi) * cos(theta) * cos(psi));
111 <    A[1][2] = sin(theta) * cos(psi);
77 >    //((snapshotMan_->getSnapshot(snapshotNo))->*storage_).electroFrame[localIndex_] = a.transpose() * sU_;    
78      
79 <    A[2][0] = sin(phi) * sin(theta);
80 <    A[2][1] = -cos(phi) * sin(theta);
81 <    A[2][2] = cos(theta);
82 <
83 < }
84 <
85 < void RigidBody::getQ( double q[4] ){
79 >    for (int i =0 ; i < atoms_.size(); ++i){
80 >      if (atoms_[i]->isDirectional()) {
81 >        atoms_[i]->setA(refOrients_[i].transpose() * a, snapshotNo);
82 >      }
83 >    }
84 >    
85 >  }  
86    
87 <  double t, s;
88 <  double ad1, ad2, ad3;
87 >  Mat3x3d RigidBody::getI() {
88 >    return inertiaTensor_;
89 >  }    
90 >  
91 >  std::vector<RealType> RigidBody::getGrad() {
92 >    std::vector<RealType> grad(6, 0.0);
93 >    Vector3d force;
94 >    Vector3d torque;
95 >    Vector3d myEuler;
96 >    RealType phi, theta, psi;
97 >    RealType cphi, sphi, ctheta, stheta;
98 >    Vector3d ephi;
99 >    Vector3d etheta;
100 >    Vector3d epsi;
101      
102 <  t = A[0][0] + A[1][1] + A[2][2] + 1.0;
103 <  if( t > 0.0 ){
102 >    force = getFrc();
103 >    torque =getTrq();
104 >    myEuler = getA().toEulerAngles();
105      
106 <    s = 0.5 / sqrt( t );
107 <    q[0] = 0.25 / s;
108 <    q[1] = (A[1][2] - A[2][1]) * s;
130 <    q[2] = (A[2][0] - A[0][2]) * s;
131 <    q[3] = (A[0][1] - A[1][0]) * s;
132 <  }
133 <  else{
106 >    phi = myEuler[0];
107 >    theta = myEuler[1];
108 >    psi = myEuler[2];
109      
110 <    ad1 = fabs( A[0][0] );
111 <    ad2 = fabs( A[1][1] );
112 <    ad3 = fabs( A[2][2] );
110 >    cphi = cos(phi);
111 >    sphi = sin(phi);
112 >    ctheta = cos(theta);
113 >    stheta = sin(theta);
114      
115 <    if( ad1 >= ad2 && ad1 >= ad3 ){
115 >    // get unit vectors along the phi, theta and psi rotation axes
116 >    
117 >    ephi[0] = 0.0;
118 >    ephi[1] = 0.0;
119 >    ephi[2] = 1.0;
120 >    
121 >    etheta[0] = cphi;
122 >    etheta[1] = sphi;
123 >    etheta[2] = 0.0;
124 >    
125 >    epsi[0] = stheta * cphi;
126 >    epsi[1] = stheta * sphi;
127 >    epsi[2] = ctheta;
128 >    
129 >    //gradient is equal to -force
130 >    for (int j = 0 ; j<3; j++)
131 >      grad[j] = -force[j];
132 >    
133 >    for (int j = 0; j < 3; j++ ) {
134        
135 <      s = 2.0 * sqrt( 1.0 + A[0][0] - A[1][1] - A[2][2] );
136 <      q[0] = (A[1][2] + A[2][1]) / s;
137 <      q[1] = 0.5 / s;
144 <      q[2] = (A[0][1] + A[1][0]) / s;
145 <      q[3] = (A[0][2] + A[2][0]) / s;
146 <    }
147 <    else if( ad2 >= ad1 && ad2 >= ad3 ){
135 >      grad[3] += torque[j]*ephi[j];
136 >      grad[4] += torque[j]*etheta[j];
137 >      grad[5] += torque[j]*epsi[j];
138        
149      s = sqrt( 1.0 + A[1][1] - A[0][0] - A[2][2] ) * 2.0;
150      q[0] = (A[0][2] + A[2][0]) / s;
151      q[1] = (A[0][1] + A[1][0]) / s;
152      q[2] = 0.5 / s;
153      q[3] = (A[1][2] + A[2][1]) / s;
139      }
140 <    else{
140 >    
141 >    return grad;
142 >  }    
143 >  
144 >  void RigidBody::accept(BaseVisitor* v) {
145 >    v->visit(this);
146 >  }    
147 >
148 >  /**@todo need modification */
149 >  void  RigidBody::calcRefCoords() {
150 >    RealType mtmp;
151 >    Vector3d refCOM(0.0);
152 >    mass_ = 0.0;
153 >    for (std::size_t i = 0; i < atoms_.size(); ++i) {
154 >      mtmp = atoms_[i]->getMass();
155 >      mass_ += mtmp;
156 >      refCOM += refCoords_[i]*mtmp;
157 >    }
158 >    refCOM /= mass_;
159 >    
160 >    // Next, move the origin of the reference coordinate system to the COM:
161 >    for (std::size_t i = 0; i < atoms_.size(); ++i) {
162 >      refCoords_[i] -= refCOM;
163 >    }
164 >
165 >    // Moment of Inertia calculation
166 >    Mat3x3d Itmp(0.0);    
167 >    for (std::size_t i = 0; i < atoms_.size(); i++) {
168 >      Mat3x3d IAtom(0.0);  
169 >      mtmp = atoms_[i]->getMass();
170 >      IAtom -= outProduct(refCoords_[i], refCoords_[i]) * mtmp;
171 >      RealType r2 = refCoords_[i].lengthSquare();
172 >      IAtom(0, 0) += mtmp * r2;
173 >      IAtom(1, 1) += mtmp * r2;
174 >      IAtom(2, 2) += mtmp * r2;
175 >      Itmp += IAtom;
176        
177 <      s = sqrt( 1.0 + A[2][2] - A[0][0] - A[1][1] ) * 2.0;
178 <      q[0] = (A[0][1] + A[1][0]) / s;
179 <      q[1] = (A[0][2] + A[2][0]) / s;
180 <      q[2] = (A[1][2] + A[2][1]) / s;
161 <      q[3] = 0.5 / s;
177 >      //project the inertial moment of directional atoms into this rigid body
178 >      if (atoms_[i]->isDirectional()) {
179 >        Itmp += refOrients_[i].transpose() * atoms_[i]->getI() * refOrients_[i];
180 >      }
181      }
163  }
164 }
182  
183 < void RigidBody::setQ( double the_q[4] ){
183 >    //    std::cout << Itmp << std::endl;
184  
185 <  double q0Sqr, q1Sqr, q2Sqr, q3Sqr;
185 >    //diagonalize
186 >    Vector3d evals;
187 >    Mat3x3d::diagonalize(Itmp, evals, sU_);
188 >
189 >    // zero out I and then fill the diagonals with the moments of inertia:
190 >    inertiaTensor_(0, 0) = evals[0];
191 >    inertiaTensor_(1, 1) = evals[1];
192 >    inertiaTensor_(2, 2) = evals[2];
193 >        
194 >    int nLinearAxis = 0;
195 >    for (int i = 0; i < 3; i++) {    
196 >      if (fabs(evals[i]) < oopse::epsilon) {
197 >        linear_ = true;
198 >        linearAxis_ = i;
199 >        ++ nLinearAxis;
200 >      }
201 >    }
202 >
203 >    if (nLinearAxis > 1) {
204 >      sprintf( painCave.errMsg,
205 >               "RigidBody error.\n"
206 >               "\tOOPSE found more than one axis in this rigid body with a vanishing \n"
207 >               "\tmoment of inertia.  This can happen in one of three ways:\n"
208 >               "\t 1) Only one atom was specified, or \n"
209 >               "\t 2) All atoms were specified at the same location, or\n"
210 >               "\t 3) The programmers did something stupid.\n"
211 >               "\tIt is silly to use a rigid body to describe this situation.  Be smarter.\n"
212 >               );
213 >      painCave.isFatal = 1;
214 >      simError();
215 >    }
216    
217 <  q0Sqr = the_q[0] * the_q[0];
171 <  q1Sqr = the_q[1] * the_q[1];
172 <  q2Sqr = the_q[2] * the_q[2];
173 <  q3Sqr = the_q[3] * the_q[3];
174 <  
175 <  A[0][0] = q0Sqr + q1Sqr - q2Sqr - q3Sqr;
176 <  A[0][1] = 2.0 * ( the_q[1] * the_q[2] + the_q[0] * the_q[3] );
177 <  A[0][2] = 2.0 * ( the_q[1] * the_q[3] - the_q[0] * the_q[2] );
178 <  
179 <  A[1][0] = 2.0 * ( the_q[1] * the_q[2] - the_q[0] * the_q[3] );
180 <  A[1][1] = q0Sqr - q1Sqr + q2Sqr - q3Sqr;
181 <  A[1][2] = 2.0 * ( the_q[2] * the_q[3] + the_q[0] * the_q[1] );
182 <  
183 <  A[2][0] = 2.0 * ( the_q[1] * the_q[3] + the_q[0] * the_q[2] );
184 <  A[2][1] = 2.0 * ( the_q[2] * the_q[3] - the_q[0] * the_q[1] );
185 <  A[2][2] = q0Sqr - q1Sqr -q2Sqr +q3Sqr;  
217 >  }
218  
219 < }
219 >  void  RigidBody::calcForcesAndTorques() {
220 >    Vector3d afrc;
221 >    Vector3d atrq;
222 >    Vector3d apos;
223 >    Vector3d rpos;
224 >    Vector3d frc(0.0);
225 >    Vector3d trq(0.0);    
226 >    Vector3d pos = this->getPos();
227 >    for (int i = 0; i < atoms_.size(); i++) {
228  
229 < void RigidBody::getA( double the_A[3][3] ){
230 <  
231 <  for (int i = 0; i < 3; i++)
232 <    for (int j = 0; j < 3; j++)
233 <      the_A[i][j] = A[i][j];
229 >      afrc = atoms_[i]->getFrc();
230 >      apos = atoms_[i]->getPos();
231 >      rpos = apos - pos;
232 >        
233 >      frc += afrc;
234  
235 < }
235 >      trq[0] += rpos[1]*afrc[2] - rpos[2]*afrc[1];
236 >      trq[1] += rpos[2]*afrc[0] - rpos[0]*afrc[2];
237 >      trq[2] += rpos[0]*afrc[1] - rpos[1]*afrc[0];
238  
239 < void RigidBody::setA( double the_A[3][3] ){
239 >      // If the atom has a torque associated with it, then we also need to
240 >      // migrate the torques onto the center of mass:
241  
242 <  for (int i = 0; i < 3; i++)
243 <    for (int j = 0; j < 3; j++)
244 <      A[i][j] = the_A[i][j];
245 <  
246 < }
242 >      if (atoms_[i]->isDirectional()) {
243 >        atrq = atoms_[i]->getTrq();
244 >        trq += atrq;
245 >      }      
246 >    }        
247 >    addFrc(frc);
248 >    addTrq(trq);    
249 >  }
250  
251 < void RigidBody::getJ( double theJ[3] ){
252 <  
253 <  for (int i = 0; i < 3; i++)
254 <    theJ[i] = ji[i];
251 >  Mat3x3d RigidBody::calcForcesAndTorquesAndVirial() {
252 >    Vector3d afrc;
253 >    Vector3d atrq;
254 >    Vector3d apos;
255 >    Vector3d rpos;
256 >    Vector3d dfrc;
257 >    Vector3d frc(0.0);
258 >    Vector3d trq(0.0);    
259 >    Vector3d pos = this->getPos();
260 >    Mat3x3d tau_(0.0);
261  
262 < }
262 >    for (int i = 0; i < atoms_.size(); i++) {
263 >      
264 >      afrc = atoms_[i]->getFrc();
265 >      apos = atoms_[i]->getPos();
266 >      rpos = apos - pos;
267 >        
268 >      frc += afrc;
269  
270 < void RigidBody::setJ( double theJ[3] ){
271 <  
272 <  for (int i = 0; i < 3; i++)
215 <    ji[i] = theJ[i];
270 >      trq[0] += rpos[1]*afrc[2] - rpos[2]*afrc[1];
271 >      trq[1] += rpos[2]*afrc[0] - rpos[0]*afrc[2];
272 >      trq[2] += rpos[0]*afrc[1] - rpos[1]*afrc[0];
273  
274 < }
274 >      // If the atom has a torque associated with it, then we also need to
275 >      // migrate the torques onto the center of mass:
276  
277 < void RigidBody::getTrq(double theT[3]){
278 <  for (int i = 0; i < 3 ; i++)
279 <    theT[i] = trq[i];
280 < }      
277 >      if (atoms_[i]->isDirectional()) {
278 >        atrq = atoms_[i]->getTrq();
279 >        trq += atrq;
280 >      }
281 >      
282 >      tau_(0,0) -= rpos[0]*afrc[0];
283 >      tau_(0,1) -= rpos[0]*afrc[1];
284 >      tau_(0,2) -= rpos[0]*afrc[2];
285 >      tau_(1,0) -= rpos[1]*afrc[0];
286 >      tau_(1,1) -= rpos[1]*afrc[1];
287 >      tau_(1,2) -= rpos[1]*afrc[2];
288 >      tau_(2,0) -= rpos[2]*afrc[0];
289 >      tau_(2,1) -= rpos[2]*afrc[1];
290 >      tau_(2,2) -= rpos[2]*afrc[2];
291  
292 < void RigidBody::addTrq(double theT[3]){
293 <  for (int i = 0; i < 3 ; i++)
294 <    trq[i] += theT[i];
295 < }      
292 >    }
293 >    addFrc(frc);
294 >    addTrq(trq);
295 >    return tau_;
296 >  }
297  
298 < void RigidBody::getI( double the_I[3][3] ){  
298 >  void  RigidBody::updateAtoms() {
299 >    unsigned int i;
300 >    Vector3d ref;
301 >    Vector3d apos;
302 >    DirectionalAtom* dAtom;
303 >    Vector3d pos = getPos();
304 >    RotMat3x3d a = getA();
305 >    
306 >    for (i = 0; i < atoms_.size(); i++) {
307 >    
308 >      ref = body2Lab(refCoords_[i]);
309  
310 <    for (int i = 0; i < 3; i++)
232 <      for (int j = 0; j < 3; j++)
233 <        the_I[i][j] = I[i][j];
310 >      apos = pos + ref;
311  
312 < }
312 >      atoms_[i]->setPos(apos);
313  
314 < void RigidBody::lab2Body( double r[3] ){
314 >      if (atoms_[i]->isDirectional()) {
315 >          
316 >        dAtom = (DirectionalAtom *) atoms_[i];
317 >        dAtom->setA(refOrients_[i].transpose() * a);
318 >      }
319  
320 <  double rl[3]; // the lab frame vector
320 >    }
321    
322 <  rl[0] = r[0];
242 <  rl[1] = r[1];
243 <  rl[2] = r[2];
244 <  
245 <  r[0] = (A[0][0] * rl[0]) + (A[0][1] * rl[1]) + (A[0][2] * rl[2]);
246 <  r[1] = (A[1][0] * rl[0]) + (A[1][1] * rl[1]) + (A[1][2] * rl[2]);
247 <  r[2] = (A[2][0] * rl[0]) + (A[2][1] * rl[1]) + (A[2][2] * rl[2]);
322 >  }
323  
249 }
324  
325 < void RigidBody::body2Lab( double r[3] ){
325 >  void  RigidBody::updateAtoms(int frame) {
326 >    unsigned int i;
327 >    Vector3d ref;
328 >    Vector3d apos;
329 >    DirectionalAtom* dAtom;
330 >    Vector3d pos = getPos(frame);
331 >    RotMat3x3d a = getA(frame);
332 >    
333 >    for (i = 0; i < atoms_.size(); i++) {
334 >    
335 >      ref = body2Lab(refCoords_[i], frame);
336  
337 <  double rb[3]; // the body frame vector
337 >      apos = pos + ref;
338 >
339 >      atoms_[i]->setPos(apos, frame);
340 >
341 >      if (atoms_[i]->isDirectional()) {
342 >          
343 >        dAtom = (DirectionalAtom *) atoms_[i];
344 >        dAtom->setA(refOrients_[i].transpose() * a, frame);
345 >      }
346 >
347 >    }
348    
349 <  rb[0] = r[0];
256 <  rb[1] = r[1];
257 <  rb[2] = r[2];
258 <  
259 <  r[0] = (A[0][0] * rb[0]) + (A[1][0] * rb[1]) + (A[2][0] * rb[2]);
260 <  r[1] = (A[0][1] * rb[0]) + (A[1][1] * rb[1]) + (A[2][1] * rb[2]);
261 <  r[2] = (A[0][2] * rb[0]) + (A[1][2] * rb[1]) + (A[2][2] * rb[2]);
349 >  }
350  
351 < }
351 >  void RigidBody::updateAtomVel() {
352 >    Mat3x3d skewMat;;
353  
354 < double RigidBody::getZangle( ){
355 <    return zAngle;
267 < }
354 >    Vector3d ji = getJ();
355 >    Mat3x3d I =  getI();
356  
357 < void RigidBody::setZangle( double zAng ){
358 <    zAngle = zAng;
359 < }
357 >    skewMat(0, 0) =0;
358 >    skewMat(0, 1) = ji[2] /I(2, 2);
359 >    skewMat(0, 2) = -ji[1] /I(1, 1);
360  
361 < void RigidBody::addZangle( double zAng ){
362 <    zAngle += zAng;
363 < }
361 >    skewMat(1, 0) = -ji[2] /I(2, 2);
362 >    skewMat(1, 1) = 0;
363 >    skewMat(1, 2) = ji[0]/I(0, 0);
364  
365 < void RigidBody::calcRefCoords( ) {
365 >    skewMat(2, 0) =ji[1] /I(1, 1);
366 >    skewMat(2, 1) = -ji[0]/I(0, 0);
367 >    skewMat(2, 2) = 0;
368  
369 <  int i,j,k, it, n_linear_coords;
370 <  double mtmp;
281 <  vec3 apos;
282 <  double refCOM[3];
283 <  vec3 ptmp;
284 <  double Itmp[3][3];
285 <  double evals[3];
286 <  double evects[3][3];
287 <  double r, r2, len;
369 >    Mat3x3d mat = (getA() * skewMat).transpose();
370 >    Vector3d rbVel = getVel();
371  
289  // First, find the center of mass:
290  
291  mass = 0.0;
292  for (j=0; j<3; j++)
293    refCOM[j] = 0.0;
294  
295  for (i = 0; i < myAtoms.size(); i++) {
296    mtmp = myAtoms[i]->getMass();
297    mass += mtmp;
372  
373 <    apos = refCoords[i];
374 <    
375 <    for(j = 0; j < 3; j++) {
376 <      refCOM[j] += apos[j]*mtmp;    
377 <    }    
373 >    Vector3d velRot;        
374 >    for (int i =0 ; i < refCoords_.size(); ++i) {
375 >      atoms_[i]->setVel(rbVel + mat * refCoords_[i]);
376 >    }
377 >
378    }
305  
306  for(j = 0; j < 3; j++)
307    refCOM[j] /= mass;
379  
380 < // Next, move the origin of the reference coordinate system to the COM:
380 >  void RigidBody::updateAtomVel(int frame) {
381 >    Mat3x3d skewMat;;
382  
383 <  for (i = 0; i < myAtoms.size(); i++) {
384 <    apos = refCoords[i];
313 <    for (j=0; j < 3; j++) {
314 <      apos[j] = apos[j] - refCOM[j];
315 <    }
316 <    refCoords[i] = apos;
317 <  }
383 >    Vector3d ji = getJ(frame);
384 >    Mat3x3d I =  getI();
385  
386 < // Moment of Inertia calculation
386 >    skewMat(0, 0) =0;
387 >    skewMat(0, 1) = ji[2] /I(2, 2);
388 >    skewMat(0, 2) = -ji[1] /I(1, 1);
389  
390 <  for (i = 0; i < 3; i++)
391 <    for (j = 0; j < 3; j++)
392 <      Itmp[i][j] = 0.0;  
324 <  
325 <  for (it = 0; it < myAtoms.size(); it++) {
390 >    skewMat(1, 0) = -ji[2] /I(2, 2);
391 >    skewMat(1, 1) = 0;
392 >    skewMat(1, 2) = ji[0]/I(0, 0);
393  
394 <    mtmp = myAtoms[it]->getMass();
395 <    ptmp = refCoords[it];
396 <    r= norm3(ptmp.vec);
330 <    r2 = r*r;
331 <    
332 <    for (i = 0; i < 3; i++) {
333 <      for (j = 0; j < 3; j++) {
334 <        
335 <        if (i==j) Itmp[i][j] += mtmp * r2;
394 >    skewMat(2, 0) =ji[1] /I(1, 1);
395 >    skewMat(2, 1) = -ji[0]/I(0, 0);
396 >    skewMat(2, 2) = 0;
397  
398 <        Itmp[i][j] -= mtmp * ptmp.vec[i]*ptmp.vec[j];
399 <      }
339 <    }
340 <  }
341 <  
342 <  diagonalize3x3(Itmp, evals, sU);
343 <  
344 <  // zero out I and then fill the diagonals with the moments of inertia:
398 >    Mat3x3d mat = (getA(frame) * skewMat).transpose();
399 >    Vector3d rbVel = getVel(frame);
400  
346  n_linear_coords = 0;
401  
402 <  for (i = 0; i < 3; i++) {
403 <    for (j = 0; j < 3; j++) {
404 <      I[i][j] = 0.0;  
402 >    Vector3d velRot;        
403 >    for (int i =0 ; i < refCoords_.size(); ++i) {
404 >      atoms_[i]->setVel(rbVel + mat * refCoords_[i], frame);
405      }
352    I[i][i] = evals[i];
406  
354    if (fabs(evals[i]) < momIntTol) {
355      is_linear = true;
356      n_linear_coords++;
357      linear_axis = i;
358    }
407    }
408  
409 <  if (n_linear_coords > 1) {
410 <          sprintf( painCave.errMsg,
411 <               "RigidBody error.\n"
412 <               "\tOOPSE found more than one axis in this rigid body with a vanishing \n"
413 <               "\tmoment of inertia.  This can happen in one of three ways:\n"
414 <               "\t 1) Only one atom was specified, or \n"
415 <               "\t 2) All atoms were specified at the same location, or\n"
416 <               "\t 3) The programmers did something stupid.\n"
417 <               "\tIt is silly to use a rigid body to describe this situation.  Be smarter.\n"
418 <               );
419 <      painCave.isFatal = 1;
420 <      simError();
409 >        
410 >
411 >  bool RigidBody::getAtomPos(Vector3d& pos, unsigned int index) {
412 >    if (index < atoms_.size()) {
413 >
414 >      Vector3d ref = body2Lab(refCoords_[index]);
415 >      pos = getPos() + ref;
416 >      return true;
417 >    } else {
418 >      std::cerr << index << " is an invalid index, current rigid body contains "
419 >                << atoms_.size() << "atoms" << std::endl;
420 >      return false;
421 >    }    
422    }
423 <  
424 <  // renormalize column vectors:
425 <  
426 <  for (i=0; i < 3; i++) {
427 <    len = 0.0;
428 <    for (j = 0; j < 3; j++) {
429 <      len += sU[i][j]*sU[i][j];
423 >
424 >  bool RigidBody::getAtomPos(Vector3d& pos, Atom* atom) {
425 >    std::vector<Atom*>::iterator i;
426 >    i = std::find(atoms_.begin(), atoms_.end(), atom);
427 >    if (i != atoms_.end()) {
428 >      //RigidBody class makes sure refCoords_ and atoms_ match each other
429 >      Vector3d ref = body2Lab(refCoords_[i - atoms_.begin()]);
430 >      pos = getPos() + ref;
431 >      return true;
432 >    } else {
433 >      std::cerr << "Atom " << atom->getGlobalIndex()
434 >                <<" does not belong to Rigid body "<< getGlobalIndex() << std::endl;
435 >      return false;
436      }
382    len = sqrt(len);
383    for (j = 0; j < 3; j++) {
384      sU[i][j] /= len;
385    }
437    }
438 < }
438 >  bool RigidBody::getAtomVel(Vector3d& vel, unsigned int index) {
439  
440 < void RigidBody::doEulerToRotMat(vec3 &euler, mat3x3 &myA ){
440 >    //velRot = $(A\cdot skew(I^{-1}j))^{T}refCoor$
441  
442 <  double phi, theta, psi;
392 <  
393 <  phi = euler[0];
394 <  theta = euler[1];
395 <  psi = euler[2];
396 <  
397 <  myA[0][0] = (cos(phi) * cos(psi)) - (sin(phi) * cos(theta) * sin(psi));
398 <  myA[0][1] = (sin(phi) * cos(psi)) + (cos(phi) * cos(theta) * sin(psi));
399 <  myA[0][2] = sin(theta) * sin(psi);
400 <  
401 <  myA[1][0] = -(cos(phi) * sin(psi)) - (sin(phi) * cos(theta) * cos(psi));
402 <  myA[1][1] = -(sin(phi) * sin(psi)) + (cos(phi) * cos(theta) * cos(psi));
403 <  myA[1][2] = sin(theta) * cos(psi);
404 <  
405 <  myA[2][0] = sin(phi) * sin(theta);
406 <  myA[2][1] = -cos(phi) * sin(theta);
407 <  myA[2][2] = cos(theta);
442 >    if (index < atoms_.size()) {
443  
444 < }
444 >      Vector3d velRot;
445 >      Mat3x3d skewMat;;
446 >      Vector3d ref = refCoords_[index];
447 >      Vector3d ji = getJ();
448 >      Mat3x3d I =  getI();
449  
450 < void RigidBody::calcForcesAndTorques() {
450 >      skewMat(0, 0) =0;
451 >      skewMat(0, 1) = ji[2] /I(2, 2);
452 >      skewMat(0, 2) = -ji[1] /I(1, 1);
453  
454 <  // Convert Atomic forces and torques to total forces and torques:
455 <  int i, j;
456 <  double apos[3];
416 <  double afrc[3];
417 <  double atrq[3];
418 <  double rpos[3];
454 >      skewMat(1, 0) = -ji[2] /I(2, 2);
455 >      skewMat(1, 1) = 0;
456 >      skewMat(1, 2) = ji[0]/I(0, 0);
457  
458 <  zeroForces();
459 <  
460 <  for (i = 0; i < myAtoms.size(); i++) {
458 >      skewMat(2, 0) =ji[1] /I(1, 1);
459 >      skewMat(2, 1) = -ji[0]/I(0, 0);
460 >      skewMat(2, 2) = 0;
461  
462 <    myAtoms[i]->getPos(apos);
425 <    myAtoms[i]->getFrc(afrc);
462 >      velRot = (getA() * skewMat).transpose() * ref;
463  
464 <    for (j=0; j<3; j++) {
465 <      rpos[j] = apos[j] - pos[j];
466 <      frc[j] += afrc[j];
464 >      vel =getVel() + velRot;
465 >      return true;
466 >        
467 >    } else {
468 >      std::cerr << index << " is an invalid index, current rigid body contains "
469 >                << atoms_.size() << "atoms" << std::endl;
470 >      return false;
471      }
472 <    
432 <    trq[0] += rpos[1]*afrc[2] - rpos[2]*afrc[1];
433 <    trq[1] += rpos[2]*afrc[0] - rpos[0]*afrc[2];
434 <    trq[2] += rpos[0]*afrc[1] - rpos[1]*afrc[0];
472 >  }
473  
474 <    // If the atom has a torque associated with it, then we also need to
437 <    // migrate the torques onto the center of mass:
474 >  bool RigidBody::getAtomVel(Vector3d& vel, Atom* atom) {
475  
476 <    if (myAtoms[i]->isDirectional()) {
476 >    std::vector<Atom*>::iterator i;
477 >    i = std::find(atoms_.begin(), atoms_.end(), atom);
478 >    if (i != atoms_.end()) {
479 >      return getAtomVel(vel, i - atoms_.begin());
480 >    } else {
481 >      std::cerr << "Atom " << atom->getGlobalIndex()
482 >                <<" does not belong to Rigid body "<< getGlobalIndex() << std::endl;    
483 >      return false;
484 >    }    
485 >  }
486  
487 <      myAtoms[i]->getTrq(atrq);
488 <      
489 <      for (j=0; j<3; j++)
490 <        trq[j] += atrq[j];
487 >  bool RigidBody::getAtomRefCoor(Vector3d& coor, unsigned int index) {
488 >    if (index < atoms_.size()) {
489 >
490 >      coor = refCoords_[index];
491 >      return true;
492 >    } else {
493 >      std::cerr << index << " is an invalid index, current rigid body contains "
494 >                << atoms_.size() << "atoms" << std::endl;
495 >      return false;
496      }
497 +
498    }
499  
500 <  // Convert Torque to Body-fixed coordinates:
501 <  // (Actually, on second thought, don't.  Integrator does this now.)
502 <  // lab2Body(trq);
500 >  bool RigidBody::getAtomRefCoor(Vector3d& coor, Atom* atom) {
501 >    std::vector<Atom*>::iterator i;
502 >    i = std::find(atoms_.begin(), atoms_.end(), atom);
503 >    if (i != atoms_.end()) {
504 >      //RigidBody class makes sure refCoords_ and atoms_ match each other
505 >      coor = refCoords_[i - atoms_.begin()];
506 >      return true;
507 >    } else {
508 >      std::cerr << "Atom " << atom->getGlobalIndex()
509 >                <<" does not belong to Rigid body "<< getGlobalIndex() << std::endl;    
510 >      return false;
511 >    }
512  
513 < }
513 >  }
514  
454 void RigidBody::updateAtoms() {
455  int i, j;
456  vec3 ref;
457  double apos[3];
458  DirectionalAtom* dAtom;
459  
460  for (i = 0; i < myAtoms.size(); i++) {
461    
462    ref = refCoords[i];
515  
516 <    body2Lab(ref.vec);
465 <    
466 <    for (j = 0; j<3; j++)
467 <      apos[j] = pos[j] + ref.vec[j];
468 <    
469 <    myAtoms[i]->setPos(apos);
470 <    
471 <    if (myAtoms[i]->isDirectional()) {
472 <      
473 <      dAtom = (DirectionalAtom *) myAtoms[i];
474 <      dAtom->rotateBy( A );
475 <      
476 <    }
477 <  }  
478 < }
516 >  void RigidBody::addAtom(Atom* at, AtomStamp* ats) {
517  
518 < void RigidBody::getGrad( double grad[6] ) {
518 >    Vector3d coords;
519 >    Vector3d euler;
520 >  
521  
522 <  double myEuler[3];
523 <  double phi, theta, psi;
524 <  double cphi, sphi, ctheta, stheta;
525 <  double ephi[3];
526 <  double etheta[3];
527 <  double epsi[3];
522 >    atoms_.push_back(at);
523 >
524 >    if( !ats->havePosition() ){
525 >      sprintf( painCave.errMsg,
526 >               "RigidBody error.\n"
527 >               "\tAtom %s does not have a position specified.\n"
528 >               "\tThis means RigidBody cannot set up reference coordinates.\n",
529 >               ats->getType().c_str() );
530 >      painCave.isFatal = 1;
531 >      simError();
532 >    }
533    
534 <  this->getEulerAngles(myEuler);
534 >    coords[0] = ats->getPosX();
535 >    coords[1] = ats->getPosY();
536 >    coords[2] = ats->getPosZ();
537  
538 <  phi = myEuler[0];
492 <  theta = myEuler[1];
493 <  psi = myEuler[2];
538 >    refCoords_.push_back(coords);
539  
540 <  cphi = cos(phi);
496 <  sphi = sin(phi);
497 <  ctheta = cos(theta);
498 <  stheta = sin(theta);
499 <
500 <  // get unit vectors along the phi, theta and psi rotation axes
501 <
502 <  ephi[0] = 0.0;
503 <  ephi[1] = 0.0;
504 <  ephi[2] = 1.0;
505 <
506 <  etheta[0] = cphi;
507 <  etheta[1] = sphi;
508 <  etheta[2] = 0.0;
540 >    RotMat3x3d identMat = RotMat3x3d::identity();
541    
542 <  epsi[0] = stheta * cphi;
511 <  epsi[1] = stheta * sphi;
512 <  epsi[2] = ctheta;
513 <  
514 <  for (int j = 0 ; j<3; j++)
515 <    grad[j] = frc[j];
542 >    if (at->isDirectional()) {  
543  
544 <  grad[3] = 0.0;
545 <  grad[4] = 0.0;
546 <  grad[5] = 0.0;
547 <  
548 <  for (int j = 0; j < 3; j++ ) {
544 >      if( !ats->haveOrientation() ){
545 >        sprintf( painCave.errMsg,
546 >                 "RigidBody error.\n"
547 >                 "\tAtom %s does not have an orientation specified.\n"
548 >                 "\tThis means RigidBody cannot set up reference orientations.\n",
549 >                 ats->getType().c_str() );
550 >        painCave.isFatal = 1;
551 >        simError();
552 >      }    
553      
554 <    grad[3] += trq[j]*ephi[j];
555 <    grad[4] += trq[j]*etheta[j];
556 <    grad[5] += trq[j]*epsi[j];
526 <    
527 <  }
528 <  
529 < }
554 >      euler[0] = ats->getEulerPhi() * NumericConstant::PI /180.0;
555 >      euler[1] = ats->getEulerTheta() * NumericConstant::PI /180.0;
556 >      euler[2] = ats->getEulerPsi() * NumericConstant::PI /180.0;
557  
558 < /**
559 <  * getEulerAngles computes a set of Euler angle values consistent
533 <  * with an input rotation matrix.  They are returned in the following
534 <  * order:
535 <  *  myEuler[0] = phi;
536 <  *  myEuler[1] = theta;
537 <  *  myEuler[2] = psi;
538 < */
539 < void RigidBody::getEulerAngles(double myEuler[3]) {
540 <
541 <  // We use so-called "x-convention", which is the most common
542 <  // definition.  In this convention, the rotation given by Euler
543 <  // angles (phi, theta, psi), where the first rotation is by an angle
544 <  // phi about the z-axis, the second is by an angle theta (0 <= theta
545 <  // <= 180) about the x-axis, and the third is by an angle psi about
546 <  // the z-axis (again).
547 <  
548 <  
549 <  double phi,theta,psi,eps;
550 <  double pi;
551 <  double cphi,ctheta,cpsi;
552 <  double sphi,stheta,spsi;
553 <  double b[3];
554 <  int flip[3];
555 <  
556 <  // set the tolerance for Euler angles and rotation elements
557 <  
558 <  eps = 1.0e-8;
559 <
560 <  theta = acos(min(1.0,max(-1.0,A[2][2])));
561 <  ctheta = A[2][2];
562 <  stheta = sqrt(1.0 - ctheta * ctheta);
563 <
564 <  // when sin(theta) is close to 0, we need to consider the
565 <  // possibility of a singularity. In this case, we can assign an
566 <  // arbitary value to phi (or psi), and then determine the psi (or
567 <  // phi) or vice-versa.  We'll assume that phi always gets the
568 <  // rotation, and psi is 0 in cases of singularity.  we use atan2
569 <  // instead of atan, since atan2 will give us -Pi to Pi.  Since 0 <=
570 <  // theta <= 180, sin(theta) will be always non-negative. Therefore,
571 <  // it never changes the sign of both of the parameters passed to
572 <  // atan2.
573 <  
574 <  if (fabs(stheta) <= eps){
575 <    psi = 0.0;
576 <    phi = atan2(-A[1][0], A[0][0]);  
577 <  }
578 <  // we only have one unique solution
579 <  else{    
580 <    phi = atan2(A[2][0], -A[2][1]);
581 <    psi = atan2(A[0][2], A[1][2]);
582 <  }
583 <  
584 <  //wrap phi and psi, make sure they are in the range from 0 to 2*Pi
585 <  //if (phi < 0)
586 <  //  phi += M_PI;
587 <  
588 <  //if (psi < 0)
589 <  //  psi += M_PI;
590 <  
591 <  myEuler[0] = phi;
592 <  myEuler[1] = theta;
593 <  myEuler[2] = psi;
594 <  
595 <  return;
596 < }
597 <
598 < double RigidBody::max(double x, double  y) {  
599 <  return (x > y) ? x : y;
600 < }
601 <
602 < double RigidBody::min(double x, double  y) {  
603 <  return (x > y) ? y : x;
604 < }
605 <
606 < void RigidBody::findCOM() {
607 <  
608 <  size_t i;
609 <  int j;
610 <  double mtmp;
611 <  double ptmp[3];
612 <  double vtmp[3];
613 <  
614 <  for(j = 0; j < 3; j++) {
615 <    pos[j] = 0.0;
616 <    vel[j] = 0.0;
617 <  }
618 <  mass = 0.0;
619 <  
620 <  for (i = 0; i < myAtoms.size(); i++) {
558 >      RotMat3x3d Atmp(euler);
559 >      refOrients_.push_back(Atmp);
560      
561 <    mtmp = myAtoms[i]->getMass();    
562 <    myAtoms[i]->getPos(ptmp);
624 <    myAtoms[i]->getVel(vtmp);
625 <    
626 <    mass += mtmp;
627 <    
628 <    for(j = 0; j < 3; j++) {
629 <      pos[j] += ptmp[j]*mtmp;
630 <      vel[j] += vtmp[j]*mtmp;
561 >    }else {
562 >      refOrients_.push_back(identMat);
563      }
632    
633  }
564    
565 <  for(j = 0; j < 3; j++) {
636 <    pos[j] /= mass;
637 <    vel[j] /= mass;
565 >  
566    }
567  
568   }
569  
642 void RigidBody::accept(BaseVisitor* v){
643  vector<Atom*>::iterator atomIter;
644  v->visit(this);
645
646  //for(atomIter = myAtoms.begin(); atomIter != myAtoms.end(); ++atomIter)
647  //  (*atomIter)->accept(v);
648 }
649 void RigidBody::getAtomRefCoor(double pos[3], int index){
650  vec3 ref;
651
652  ref = refCoords[index];
653  pos[0] = ref[0];
654  pos[1] = ref[1];
655  pos[2] = ref[2];
656  
657 }
658
659
660 void RigidBody::getAtomPos(double theP[3], int index){
661  vec3 ref;
662
663  if (index >= myAtoms.size())
664    cerr << index << " is an invalid index, current rigid body contains " << myAtoms.size() << "atoms" << endl;
665
666  ref = refCoords[index];
667  body2Lab(ref.vec);
668  
669  theP[0] = pos[0] + ref[0];
670  theP[1] = pos[1] + ref[1];
671  theP[2] = pos[2] + ref[2];
672 }
673
674
675 void RigidBody::getAtomVel(double theV[3], int index){
676  vec3 ref;
677  double velRot[3];
678  double skewMat[3][3];
679  double aSkewMat[3][3];
680  double aSkewTransMat[3][3];
681  
682  //velRot = $(A\cdot skew(I^{-1}j))^{T}refCoor$
683
684  if (index >= myAtoms.size())
685    cerr << index << " is an invalid index, current rigid body contains " << myAtoms.size() << "atoms" << endl;
686
687  ref = refCoords[index];
688
689  skewMat[0][0] =0;
690  skewMat[0][1] = ji[2] /I[2][2];
691  skewMat[0][2] = -ji[1] /I[1][1];
692
693  skewMat[1][0] = -ji[2] /I[2][2];
694  skewMat[1][1] = 0;
695  skewMat[1][2] = ji[0]/I[0][0];
696
697  skewMat[2][0] =ji[1] /I[1][1];
698  skewMat[2][1] = -ji[0]/I[0][0];
699  skewMat[2][2] = 0;
700  
701  matMul3(A, skewMat, aSkewMat);
702
703  transposeMat3(aSkewMat, aSkewTransMat);
704
705  matVecMul3(aSkewTransMat, ref.vec, velRot);
706  theV[0] = vel[0] + velRot[0];
707  theV[1] = vel[1] + velRot[1];
708  theV[2] = vel[2] + velRot[2];
709 }
710
711

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines