[cig-commits] r14368 - long/3D/SNAC/trunk/Snac/plugins/plastic

echoi at geodynamics.org echoi at geodynamics.org
Tue Mar 17 11:41:45 PDT 2009


Author: echoi
Date: 2009-03-17 11:41:45 -0700 (Tue, 17 Mar 2009)
New Revision: 14368

Modified:
   long/3D/SNAC/trunk/Snac/plugins/plastic/Constitutive.c
Log:
* Fixed errors in using Journal_Firewall utilities.



Modified: long/3D/SNAC/trunk/Snac/plugins/plastic/Constitutive.c
===================================================================
--- long/3D/SNAC/trunk/Snac/plugins/plastic/Constitutive.c	2009-03-17 18:34:49 UTC (rev 14367)
+++ long/3D/SNAC/trunk/Snac/plugins/plastic/Constitutive.c	2009-03-17 18:41:45 UTC (rev 14368)
@@ -124,8 +124,10 @@
 			 *  Calculate material props (friction angle, cohesion, etc) from piecewise-linear
 			 *    functions defined in terms of plastic strain.
 			 */
-			Journal_DFirewall( (material->plstrain[0]==0.0), "The initial segment should start from the plastic strain of 0.0" );
-			Journal_OFirewall( (material->plstrain[0]==0.0), "The initial segment should start from the plastic strain of 0.0" );
+			Journal_DFirewall( (material->plstrain[0]==0.0), context->snacError, "The initial segment should start from the plastic strain of 0.0" );
+			Journal_OFirewall( (material->plstrain[0]==0.0), context->snacError,  __FILE__, __func__, __LINE__,
+							   "timeStep=%u rank=%u: The initial segment should start from the plastic strain of 0.0.",
+							   context->timeStep, context->rank );
 			for( i = 0; i < material->nsegments; i++ ) {
 				const double pl1 = material->plstrain[i];
 				const double pl2 = material->plstrain[i+1];



More information about the CIG-COMMITS mailing list