[cig-commits] r19788 - short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/friction
brad at geodynamics.org
brad at geodynamics.org
Thu Mar 15 14:22:22 PDT 2012
Author: brad
Date: 2012-03-15 14:22:22 -0700 (Thu, 15 Mar 2012)
New Revision: 19788
Modified:
short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/friction/StaticFriction.cc
Log:
Improve readability of code (no real change).
Modified: short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/friction/StaticFriction.cc
===================================================================
--- short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/friction/StaticFriction.cc 2012-03-15 16:51:23 UTC (rev 19787)
+++ short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/friction/StaticFriction.cc 2012-03-15 21:22:22 UTC (rev 19788)
@@ -157,7 +157,7 @@
assert(0 == numStateVars);
const double friction = (normalTraction <= 0.0) ?
- -properties[p_coef] * normalTraction + properties[p_cohesion]:
+ properties[p_cohesion] - properties[p_coef] * normalTraction :
properties[p_cohesion];
PetscLogFlops(2);
More information about the CIG-COMMITS
mailing list