[cig-commits] r16781 - mc/3D/CitcomS/trunk/lib

[becker at geodynamics.org]

Author: becker
Date: 2010-05-24 19:47:46 -0700 (Mon, 24 May 2010)
New Revision: 16781

Modified:
   mc/3D/CitcomS/trunk/lib/BC_util.c
Log:
And a typo fix. 



Modified: mc/3D/CitcomS/trunk/lib/BC_util.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/BC_util.c	2010-05-25 01:07:47 UTC (rev 16780)
+++ mc/3D/CitcomS/trunk/lib/BC_util.c	2010-05-25 02:47:46 UTC (rev 16781)
@@ -278,7 +278,7 @@
 	  ontop    = ((k==noz) && (E->parallel.me_loc[3]==E->parallel.nprocz-1))?(1):(0);
 	  onbottom = ((k==1) && (E->parallel.me_loc[3]==0))?(1):(0);
 	  /* node number is k, assuming no dependence on x and y  */
-	  if(E->SX[lv][lv][3][k] >= E->mesh.toplayerbc_r){
+	  if(E->SX[lv][j][3][k] >= E->mesh.toplayerbc_r){
 	    lay = layers(E,j,k);
 	    if((!ontop)&&(!onbottom)&&(lv==E->mesh.gridmax))
 	      ncount++;		/* not in top or bottom */