[cig-commits] r6643 - mc/3D/ellipsis3d/trunk

[walter at geodynamics.org]

Author: walter
Date: 2007-04-23 23:02:26 -0700 (Mon, 23 Apr 2007)
New Revision: 6643

Modified:
   mc/3D/ellipsis3d/trunk/Gauss_seidel.c
Log:
Fix an off-by-one error

Modified: mc/3D/ellipsis3d/trunk/Gauss_seidel.c
===================================================================
--- mc/3D/ellipsis3d/trunk/Gauss_seidel.c	2007-04-24 06:01:52 UTC (rev 6642)
+++ mc/3D/ellipsis3d/trunk/Gauss_seidel.c	2007-04-24 06:02:26 UTC (rev 6643)
@@ -194,7 +194,7 @@
 	  if(count%2)
 	    i=n2 + (n1-1)*noz + (n3-1)*noz*nox; 
 	  else
-	    i=nno - (n2 + (n1-1)*noz + (n3-1)*noz*nox); 
+	    i=nno - (n2 + (n1-1)*noz + (n3-1)*noz*nox) + 1; 
 	  /*RAA: 21/08/02, end fix; so now alternately traverses back and forth
 	      during the relaxation, instead of always in one direction */