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

becker at geodynamics.org becker at geodynamics.org
Wed Apr 8 13:25:00 PDT 2009


Author: becker
Date: 2009-04-08 13:24:59 -0700 (Wed, 08 Apr 2009)
New Revision: 14629

Modified:
   mc/3D/CitcomS/trunk/lib/Ggrd_handling.c
Log:
Fixed bug in vtop assignment.



Modified: mc/3D/CitcomS/trunk/lib/Ggrd_handling.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Ggrd_handling.c	2009-04-08 19:25:24 UTC (rev 14628)
+++ mc/3D/CitcomS/trunk/lib/Ggrd_handling.c	2009-04-08 20:24:59 UTC (rev 14629)
@@ -761,12 +761,14 @@
 		  E->control.ggrd.time_hist.nvtimes,E->control.ggrd.svp->fmaxlim[0]);
     } /* end init */
     
-    /* geographic bounds */
-    theta_max = (90-E->control.ggrd.svp[i1].south)*M_PI/180-1e-5;
-    theta_min = (90-E->control.ggrd.svp[i1].north)*M_PI/180+1e-5;
+    /* 
+       geographic bounds 
+    */
+    theta_max = (90-E->control.ggrd.svp[0].south)*M_PI/180-1e-5;
+    theta_min = (90-E->control.ggrd.svp[0].north)*M_PI/180+1e-5;
     if((E->parallel.me ==0) && (is_global)){
       fprintf(stderr,"ggrd_read_vtop_from_file: determined South/North range: %g/%g\n",
-	      E->control.ggrd.svp[i1].south,E->control.ggrd.svp[i1].north);
+	      E->control.ggrd.svp[0].south,E->control.ggrd.svp[0].north);
     }
 
     if((E->control.ggrd.time_hist.nvtimes > 1)|| (!E->control.ggrd.vtop_control_init)){



More information about the CIG-COMMITS mailing list