[cig-commits] r14246 - long/3D/SNAC/trunk/Snac/snac2vtk

[cstark at geodynamics.org]

Author: cstark
Date: 2009-03-07 14:11:41 -0800 (Sat, 07 Mar 2009)
New Revision: 14246

Modified:
   long/3D/SNAC/trunk/Snac/snac2vtk/snac2vtk.c
Log:
Fixed bug in NaN handling in snac2vtk



Modified: long/3D/SNAC/trunk/Snac/snac2vtk/snac2vtk.c
===================================================================
--- long/3D/SNAC/trunk/Snac/snac2vtk/snac2vtk.c	2009-03-07 22:10:09 UTC (rev 14245)
+++ long/3D/SNAC/trunk/Snac/snac2vtk/snac2vtk.c	2009-03-07 22:11:41 UTC (rev 14246)
@@ -1017,9 +1017,9 @@
 	/*
 	 *  Report error and bail if we pick up NaNs in any of the stress components
 	 */
-	if(isnan(stressTensorArray[tetra_I][0][0]) || isnan(stressTensorArray[tetra_I][1][1]) 
-	   || isnan(stressTensorArray[tetra_I][2][2]) || isnan(stressTensorArray[tetra_I][0][1]) 
-	   || isnan(stressTensorArray[tetra_I][0][2]) || isnan(stressTensorArray[tetra_I][1][2])) 
+	if(isnan(stressTensorArray[0][0]) || isnan(stressTensorArray[1][1]) 
+	   || isnan(stressTensorArray[2][2]) || isnan(stressTensorArray[0][1]) 
+	   || isnan(stressTensorArray[0][2]) || isnan(stressTensorArray[1][2])) 
 	    fprintf(stderr,"NaN in stress tensor file\n");
 	/*
 	 *  Build average stress tensor for element by summing tetrahedral tensor components