[cig-commits] r19177 - short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/faults

[brad at geodynamics.org]

Author: brad
Date: 2011-11-10 11:53:25 -0800 (Thu, 10 Nov 2011)
New Revision: 19177

Modified:
   short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/faults/FaultCohesiveDyn.cc
Log:
Fixed bug in constraining solution space. Account for non-iterating versus interating stick behavior in assert.

Modified: short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/faults/FaultCohesiveDyn.cc
===================================================================
--- short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/faults/FaultCohesiveDyn.cc	2011-11-10 18:58:29 UTC (rev 19176)
+++ short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/faults/FaultCohesiveDyn.cc	2011-11-10 19:53:25 UTC (rev 19177)
@@ -2210,7 +2210,9 @@
     } else {
       // friction exceeds value necessary to stick
       // no changes to solution
-      assert(0.0 == slipRateMag);
+      if (iterating) {
+	assert(0.0 == slipRateMag);
+      } // if
     } // if/else
   } else {
     // if in tension, then traction is zero.
@@ -2270,7 +2272,9 @@
     } else {
       // else friction exceeds value necessary, so stick
       // no changes to solution
-      assert(0.0 == slipRateMag);
+      if (iterating) {
+	assert(0.0 == slipRateMag);
+      } // if
     } // if/else
   } else {
     // if in tension, then traction is zero.