[cig-commits] r11909 - mc/3D/CitcomCU/trunk/src

[tan2 at geodynamics.org]

Author: tan2
Date: 2008-05-02 16:56:55 -0700 (Fri, 02 May 2008)
New Revision: 11909

Modified:
   mc/3D/CitcomCU/trunk/src/Advection_diffusion.c
   mc/3D/CitcomCU/trunk/src/Citcom.c
   mc/3D/CitcomCU/trunk/src/Viscosity_structures.c
Log:
nit'd variables at beginning


Modified: mc/3D/CitcomCU/trunk/src/Advection_diffusion.c
===================================================================
--- mc/3D/CitcomCU/trunk/src/Advection_diffusion.c	2008-05-02 23:56:00 UTC (rev 11908)
+++ mc/3D/CitcomCU/trunk/src/Advection_diffusion.c	2008-05-02 23:56:55 UTC (rev 11909)
@@ -65,6 +65,7 @@
 {
 	/* Set intial values, defaults & read parameters */
 
+	E->advection.fixed_timestep = 0.0;
 	E->advection.temp_iterations = 2;	/* petrov-galerkin iterations: minimum value. */
 	E->advection.total_timesteps = 1;
 	E->advection.sub_iterations = 1;
@@ -137,7 +138,6 @@
 
 	if(been_here++ == 0)
 	{
-		E->advection.timesteps = 0;
 	}
 
 
@@ -254,7 +254,6 @@
 
 	if(been_here++ == 0)
 	{
-		E->advection.timesteps = 0;
 	}
 
 	E->advection.timesteps++;
@@ -816,14 +815,13 @@
 	E->rad_heat.total = E->control.Q0;
 
 	temp1 = E->data.disptn_number / E->control.Atemp;
+	temp3 = temp4 = 0;
 
 	if(E->control.visc_heating)
 	{
 
 		strain_rate_2_inv(E, E->heating_visc, 0);
 
-		temp4 = 0;
-
 		for(e = 1; e <= E->lmesh.nel; e++)
 		{
 			ee = (e - 1) % E->lmesh.elz + 1;
@@ -841,8 +839,6 @@
 	if(E->control.adi_heating)
 	{
 
-		temp3 = 0.0;
-
 		for(e = 1; e <= E->lmesh.nel; e++)
 		{
 			ee = (e - 1) % E->lmesh.elz + 1;

Modified: mc/3D/CitcomCU/trunk/src/Citcom.c
===================================================================
--- mc/3D/CitcomCU/trunk/src/Citcom.c	2008-05-02 23:56:00 UTC (rev 11908)
+++ mc/3D/CitcomCU/trunk/src/Citcom.c	2008-05-02 23:56:55 UTC (rev 11909)
@@ -71,6 +71,9 @@
 	gethostname(E.parallel.machinename, 160);
 
 	E.monitor.solution_cycles = 0;
+	E.monitor.elapsed_time = 0;
+	E.advection.timestep = 0;
+	E.advection.timesteps = 0;
 
 	if(E.parallel.me == 0)
 	{

Modified: mc/3D/CitcomCU/trunk/src/Viscosity_structures.c
===================================================================
--- mc/3D/CitcomCU/trunk/src/Viscosity_structures.c	2008-05-02 23:56:00 UTC (rev 11908)
+++ mc/3D/CitcomCU/trunk/src/Viscosity_structures.c	2008-05-02 23:56:55 UTC (rev 11909)
@@ -55,6 +55,7 @@
 	E->viscosity.update_allowed = 0;
 	E->viscosity.SDEPV = E->viscosity.TDEPV = 0;
 	E->viscosity.EXPX = 0;
+	E->viscosity.SMOOTH = 0;
 
 
 	for(i = 0; i < 40; i++)