--- trunk/OOPSE/libmdtools/Molecule.cpp	2003/10/28 16:03:37	829
+++ trunk/OOPSE/libmdtools/Molecule.cpp	2004/04/12 20:32:20	1097
@@ -12,6 +12,7 @@ Molecule::Molecule( void ){
   myBonds = NULL;
   myBends = NULL;
   myTorsions = NULL;
+  myRigidBodies = NULL;
 
 }
 
@@ -40,10 +41,12 @@ Molecule::~Molecule( void ){
     delete[] myTorsions;
   }
 
-  if( myExcludes != NULL ){
-    for(i=0; i<nExcludes; i++) if(myExcludes[i] != NULL ) delete myExcludes[i];
-    delete[] myExcludes;
+  if( myRigidBodies != NULL ){
+    for(i=0; i<nRigidBodies; i++) if(myRigidBodies[i] != NULL ) 
+      delete myRigidBodies[i];
+    delete[] myRigidBodies;
   }
+  
 }
 
 
@@ -54,14 +57,14 @@ void Molecule::initialize( molInit &theInit ){
   nBonds = theInit.nBonds;
   nBends = theInit.nBends;
   nTorsions = theInit.nTorsions;
-  nExcludes = theInit.nExcludes;
+  nRigidBodies = theInit.nRigidBodies;
   nOriented = theInit.nOriented;
 
   myAtoms = theInit.myAtoms;
   myBonds = theInit.myBonds;
   myBends = theInit.myBends;
   myTorsions = theInit.myTorsions;
-  myExcludes = theInit.myExcludes;
+  myRigidBodies = theInit.myRigidBodies;
     
 }
 
@@ -69,6 +72,10 @@ void Molecule::calcForces( void ){
   
   int i;
 
+  for(i=0; i<nRigidBodies; i++) {
+    myRigidBodies[i]->updateAtoms();
+  }
+
   for(i=0; i<nBonds; i++){
     myBonds[i]->calc_forces();
   }
@@ -80,6 +87,9 @@ void Molecule::calcForces( void ){
   for(i=0; i<nTorsions; i++){
     myTorsions[i]->calc_forces();
   }
+
+  // Rigid Body forces and torques are done after the fortran force loop
+
 }
 
 
@@ -118,6 +128,7 @@ void Molecule::printMe( void ){
   for(i=0; i<nTorsions; i++){
     myTorsions[i]->printMe();
   }
+
 }
 
 void Molecule::moveCOM(double delta[3]){
@@ -135,8 +146,30 @@ void Molecule::moveCOM(double delta[3]){
       myAtoms[i]->setPos( aPos );
     }
   }
+
+  for(i=0; i<nRigidBodies; i++) {
+
+    if (myRigidBodies[i] != NULL) {
+      
+      myRigidBodies[i]->getPos( aPos );
+
+      for (j=0; j< 3; j++) 
+        aPos[j] += delta[j];
+      
+      myRigidBodies[i]->setPos( aPos );
+    }
+  }  
 }
 
+void Molecule::atoms2rigidBodies( void ) {
+  int i;
+  for (i = 0; i < nRigidBodies; i++) {
+    if (myRigidBodies[i] != NULL) {
+      myRigidBodies[i]->calcForcesAndTorques();   
+    }
+  }
+}
+
 void Molecule::getCOM( double COM[3] ) {
 
   double mass, mtot;