[cig-commits] r7157 - in short/3D/PyLith/trunk: libsrc/faults unittests/libtests/faults

[brad at geodynamics.org]

Author: brad
Date: 2007-06-12 08:14:20 -0700 (Tue, 12 Jun 2007)
New Revision: 7157

Modified:
   short/3D/PyLith/trunk/libsrc/faults/FaultCohesive.cc
   short/3D/PyLith/trunk/unittests/libtests/faults/TestFaultCohesive.cc
Log:
Updated computing fault orientation for edge related cohesive cells using updated ordering of edge cohesive cells.

Modified: short/3D/PyLith/trunk/libsrc/faults/FaultCohesive.cc
===================================================================
--- short/3D/PyLith/trunk/libsrc/faults/FaultCohesive.cc	2007-06-12 15:01:51 UTC (rev 7156)
+++ short/3D/PyLith/trunk/libsrc/faults/FaultCohesive.cc	2007-06-12 15:14:20 UTC (rev 7157)
@@ -87,10 +87,10 @@
 
   const double j1 = jacobian[0];
   const double j2 = jacobian[1];
-  (*orientation)[0] =  j1;
-  (*orientation)[1] =  j2;
-  (*orientation)[2] = -j2;
-  (*orientation)[3] =  j1;
+  (*orientation)[0] = -j1;
+  (*orientation)[1] = -j2;
+  (*orientation)[2] =  j2;
+  (*orientation)[3] = -j1;
 } // _orient2D
 		
 // ----------------------------------------------------------------------

Modified: short/3D/PyLith/trunk/unittests/libtests/faults/TestFaultCohesive.cc
===================================================================
--- short/3D/PyLith/trunk/unittests/libtests/faults/TestFaultCohesive.cc	2007-06-12 15:01:51 UTC (rev 7156)
+++ short/3D/PyLith/trunk/unittests/libtests/faults/TestFaultCohesive.cc	2007-06-12 15:14:20 UTC (rev 7157)
@@ -340,8 +340,8 @@
     -0.5, 1.0
   };
   const double orientationE[] = {
-    -1.0, 2.0,  -2.0, -1.0,
-    -0.5, 1.0,  -1.0, -0.5
+     1.0, -2.0,  2.0, 1.0,
+     0.5, -1.0,  1.0, 0.5
   };
 
   const int jacobianSize = spaceDim*(spaceDim-1);