[cig-commits] r7933 - mc/3D/CitcomS/trunk/module/Exchanger

[tan2 at geodynamics.org]

Author: tan2
Date: 2007-09-05 15:21:12 -0700 (Wed, 05 Sep 2007)
New Revision: 7933

Modified:
   mc/3D/CitcomS/trunk/module/Exchanger/SIUnit.cc
Log:
Forgot to update surfacee_tem

Modified: mc/3D/CitcomS/trunk/module/Exchanger/SIUnit.cc
===================================================================
--- mc/3D/CitcomS/trunk/module/Exchanger/SIUnit.cc	2007-09-05 22:20:46 UTC (rev 7932)
+++ mc/3D/CitcomS/trunk/module/Exchanger/SIUnit.cc	2007-09-05 22:21:12 UTC (rev 7933)
@@ -37,7 +37,7 @@
     length_factor = E->data.radius_km * 1000.;
     velocity_factor = E->data.therm_diff / length_factor;
     temperature_factor = E->data.ref_temperature;
-    temperature_offset = E->data.surf_temp;
+    temperature_offset = E->control.surface_temp * temperature_factor;
     time_factor = length_factor / velocity_factor;
     traction_factor = E->data.ref_viscosity * E->data.therm_diff;
     stress_factor = E->data.ref_viscosity * E->data.therm_diff / (length_factor*length_factor);