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

[walter at geodynamics.org]

Author: walter
Date: 2007-04-23 12:52:55 -0700 (Mon, 23 Apr 2007)
New Revision: 6637

Modified:
   mc/3D/ellipsis3d/trunk/Full_multigrid_non_linear.c
   mc/3D/ellipsis3d/trunk/Initial_conditions.c
   mc/3D/ellipsis3d/trunk/Instructions.c
   mc/3D/ellipsis3d/trunk/Material_properties_matrices.c
Log:
Get rid of some debugging statement that were making valgrind unhappy

Modified: mc/3D/ellipsis3d/trunk/Full_multigrid_non_linear.c
===================================================================
--- mc/3D/ellipsis3d/trunk/Full_multigrid_non_linear.c	2007-04-23 19:51:39 UTC (rev 6636)
+++ mc/3D/ellipsis3d/trunk/Full_multigrid_non_linear.c	2007-04-23 19:52:55 UTC (rev 6637)
@@ -54,12 +54,10 @@
   const int dofs = E->mesh.dof;
   const int neq = E->mesh.neq;
  
-  fprintf(stderr,"IN FULL_MG, PEN_BULK: %g \n",E->tracer.visc[E->tracer.property_group[436]].Pen_bulk);
 
   if(E->control.verbose)
     fprintf(stderr,"Incompressibility via CG Uzawa iteration\n");
   
-  fprintf(stderr,"IN FULL_MG (2), PEN_BULK: %g \n",E->tracer.visc[E->tracer.property_group[436]].Pen_bulk);
 
   E->monitor.elapsed_time_vsoln1 =  E->monitor.elapsed_time_vsoln;
   E->monitor.elapsed_time_vsoln = E->monitor.elapsed_time;

Modified: mc/3D/ellipsis3d/trunk/Initial_conditions.c
===================================================================
--- mc/3D/ellipsis3d/trunk/Initial_conditions.c	2007-04-23 19:51:39 UTC (rev 6636)
+++ mc/3D/ellipsis3d/trunk/Initial_conditions.c	2007-04-23 19:52:55 UTC (rev 6637)
@@ -46,9 +46,7 @@
     report(E,"Initialize velocity");
     initial_velocity(E);
     report(E,"Initialize pressure field");
-    fprintf(stderr,"Initial cons, PEN_BULK: %g \n",E->tracer.visc[E->tracer.property_group[436]].Pen_bulk);
     initial_qterm(E);
-    fprintf(stderr,"Initial cons, PEN_BULK: %g \n",E->tracer.visc[E->tracer.property_group[436]].Pen_bulk);
 
     
     return;

Modified: mc/3D/ellipsis3d/trunk/Instructions.c
===================================================================
--- mc/3D/ellipsis3d/trunk/Instructions.c	2007-04-23 19:51:39 UTC (rev 6636)
+++ mc/3D/ellipsis3d/trunk/Instructions.c	2007-04-23 19:52:55 UTC (rev 6637)
@@ -146,11 +146,9 @@
   
 #if 1 /*RAA: 10/04/02, this was #if 0 for Linux, but put it back in*/
   fprintf(stderr,"Producing initial startup picture\n");
-  fprintf(stderr,"IN INSTRUCTIONS, PEN_BULK: %g \n",E->tracer.visc[E->tracer.property_group[436]].Pen_bulk);
   sprintf(output_file,"%s.start.ppm",E->control.data_file);
    generate_2Ddata_pixmap(E,output_file); 
   fprintf(stderr,"Producing initial startup picture ... done\n");
-  fprintf(stderr,"IN VISC HERE, PEN_BULK: %g \n",E->tracer.visc[E->tracer.property_group[436]].Pen_bulk);
 #endif  
 
 

Modified: mc/3D/ellipsis3d/trunk/Material_properties_matrices.c
===================================================================
--- mc/3D/ellipsis3d/trunk/Material_properties_matrices.c	2007-04-23 19:51:39 UTC (rev 6636)
+++ mc/3D/ellipsis3d/trunk/Material_properties_matrices.c	2007-04-23 19:52:55 UTC (rev 6637)
@@ -235,7 +235,6 @@
 	  smoothing_ratio);
   }
 
-  fprintf(stderr,"HERE IS TRACER.PT (A)   %g \n",E->tracer.Pt[436]) ;	
   if(2==dims && 2==dofs) {
     for(m=1;m<=E->tracer.NUM_TRACERS;m++) {