--- trunk/OOPSE/libmdtools/SimSetup.cpp	2004/01/19 21:17:39	965
+++ trunk/OOPSE/libmdtools/SimSetup.cpp	2004/01/30 15:01:09	999
@@ -24,9 +24,10 @@
 #define NPTxyz_ENS     4
 
 
-#define FF_DUFF 0
-#define FF_LJ   1
-#define FF_EAM  2
+#define FF_DUFF  0
+#define FF_LJ    1
+#define FF_EAM   2
+#define FF_H2O 3
 
 using namespace std;
 
@@ -174,7 +175,6 @@ void SimSetup::makeMolecules(void){
   bend_set* theBends;
   torsion_set* theTorsions;
 
-
   //init the forceField paramters
 
   the_ff->readParams();
@@ -182,6 +182,9 @@ void SimSetup::makeMolecules(void){
 
   // init the atoms
 
+  double phi, theta, psi;
+  double sux, suy, suz;
+  double Axx, Axy, Axz, Ayx, Ayy, Ayz, Azx, Azy, Azz;
   double ux, uy, uz, u, uSqr;
 
   for (k = 0; k < nInfo; k++){
@@ -218,9 +221,33 @@ void SimSetup::makeMolecules(void){
           info[k].n_oriented++;
           molInfo.myAtoms[j] = dAtom;
 
-          ux = currentAtom->getOrntX();
-          uy = currentAtom->getOrntY();
-          uz = currentAtom->getOrntZ();
+          // Directional Atoms have standard unit vectors which are oriented
+          // in space using the three Euler angles.  We assume the standard
+          // unit vector was originally along the z axis below.
+
+          phi = currentAtom->getEulerPhi() * M_PI / 180.0;
+          theta = currentAtom->getEulerTheta() * M_PI / 180.0;
+          psi = currentAtom->getEulerPsi()* M_PI / 180.0;
+            
+          Axx = (cos(phi) * cos(psi)) - (sin(phi) * cos(theta) * sin(psi));
+          Axy = (sin(phi) * cos(psi)) + (cos(phi) * cos(theta) * sin(psi));
+          Axz = sin(theta) * sin(psi);
+          
+          Ayx = -(cos(phi) * sin(psi)) - (sin(phi) * cos(theta) * cos(psi));
+          Ayy = -(sin(phi) * sin(psi)) + (cos(phi) * cos(theta) * cos(psi));
+          Ayz = sin(theta) * cos(psi);
+          
+          Azx = sin(phi) * sin(theta);
+          Azy = -cos(phi) * sin(theta);
+          Azz = cos(theta);
+
+          sux = 0.0;
+          suy = 0.0;
+          suz = 1.0;
+
+          ux = (Axx * sux) + (Ayx * suy) + (Azx * suz);
+          uy = (Axy * sux) + (Ayy * suy) + (Azy * suz);
+          uz = (Axz * sux) + (Ayz * suy) + (Azz * suz);
 
           uSqr = (ux * ux) + (uy * uy) + (uz * uz);
 
@@ -609,6 +636,9 @@ void SimSetup::gatherInfo(void){
   else if (!strcasecmp(force_field, "EAM")){
     ffCase = FF_EAM;
   }
+  else if (!strcasecmp(force_field, "WATER")){
+    ffCase = FF_H2O;
+  }
   else{
     sprintf(painCave.errMsg, "SimSetup Error. Unrecognized force field -> %s\n",
             force_field);
@@ -813,7 +843,7 @@ void SimSetup::gatherInfo(void){
   }
 
 #ifdef IS_MPI
-  strcpy(checkPointMsg, "Succesfully gathered all information from Bass\n");
+  strcpy(checkPointMsg, "Successfully gathered all information from Bass\n");
   MPIcheckPoint();
 #endif // is_mpi
 }
@@ -1110,6 +1140,10 @@ void SimSetup::createFF(void){
       the_ff = new EAM_FF();
       break;
 
+    case FF_H2O:
+      the_ff = new WATER();
+      break;
+
     default:
       sprintf(painCave.errMsg,
               "SimSetup Error. Unrecognized force field in case statement.\n");