[cig-commits] r18881 - long/3D/SNAC/trunk/Snac/snac2restart

[echoi at geodynamics.org]

Author: echoi
Date: 2011-09-07 15:01:08 -0700 (Wed, 07 Sep 2011)
New Revision: 18881

Modified:
   long/3D/SNAC/trunk/Snac/snac2restart/snac2restart.c
Log:
Fixed a bug in processing accumulated plastic strain, which is recorded for each tet, not each element.



Modified: long/3D/SNAC/trunk/Snac/snac2restart/snac2restart.c
===================================================================
--- long/3D/SNAC/trunk/Snac/snac2restart/snac2restart.c	2011-09-07 17:48:36 UTC (rev 18880)
+++ long/3D/SNAC/trunk/Snac/snac2restart/snac2restart.c	2011-09-07 22:01:08 UTC (rev 18881)
@@ -492,7 +492,7 @@
 			exit(0);
 		}
 
-		fseek( apsIn, dumpIteration * elementLocalCount * sizeof(float), SEEK_SET );
+		fseek( apsIn, dumpIteration * elementLocalCount * Tetrahedra_Count * sizeof(float), SEEK_SET );
 		for( element_gI = 0; element_gI < elementLocalCount; element_gI++ ) {
 			for( tetra_I = 0; tetra_I < Tetrahedra_Count; tetra_I++ ) {
 				float		plstrain;