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

[tan2 at geodynamics.org]

Author: tan2
Date: 2008-09-04 13:18:53 -0700 (Thu, 04 Sep 2008)
New Revision: 12804

Modified:
   mc/3D/CitcomS/trunk/lib/Regional_sphere_related.c
Log:
Fixed issue 158: incorrect E->control.fi_max with coor=1


Modified: mc/3D/CitcomS/trunk/lib/Regional_sphere_related.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Regional_sphere_related.c	2008-09-04 15:11:21 UTC (rev 12803)
+++ mc/3D/CitcomS/trunk/lib/Regional_sphere_related.c	2008-09-04 20:18:53 UTC (rev 12804)
@@ -102,7 +102,7 @@
       fscanf(fp,"%d %e",&nn,&fi1[E->mesh.gridmax][i]);
     }
     E->control.fi_min = fi1[E->mesh.gridmax][1];
-    E->control.fi_max = fi1[E->mesh.gridmax][gnox];
+    E->control.fi_max = fi1[E->mesh.gridmax][gnoy];
     
     fclose(fp);