[cig-commits] r19597 - short/3D/PyLith/trunk/libsrc/pylith/materials

[willic3 at geodynamics.org]

Author: willic3
Date: 2012-02-07 13:12:43 -0800 (Tue, 07 Feb 2012)
New Revision: 19597

Modified:
   short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPragerPlaneStrain.cc
Log:
Fixed indexing problem.



Modified: short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPragerPlaneStrain.cc
===================================================================
--- short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPragerPlaneStrain.cc	2012-02-07 20:46:53 UTC (rev 19596)
+++ short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPragerPlaneStrain.cc	2012-02-07 21:12:43 UTC (rev 19597)
@@ -478,7 +478,7 @@
 
   const PylithScalar e11 = totalStrain[0] - initialStrain[0];
   const PylithScalar e22 = totalStrain[1] - initialStrain[1];
-  const PylithScalar e12 = totalStrain[3] - initialStrain[3];
+  const PylithScalar e12 = totalStrain[2] - initialStrain[2];
 
   const PylithScalar s12 = lambda * (e11 + e22);