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

[tan2 at geodynamics.org]

Author: tan2
Date: 2006-10-12 23:43:36 -0700 (Thu, 12 Oct 2006)
New Revision: 4967

Modified:
   mc/3D/CitcomS/trunk/lib/Full_geometry_cartesian.c
   mc/3D/CitcomS/trunk/lib/Regional_geometry_cartesian.c
   mc/3D/CitcomS/trunk/lib/Viscosity_structures.c
Log:
Gave default values to several parameters


Modified: mc/3D/CitcomS/trunk/lib/Full_geometry_cartesian.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Full_geometry_cartesian.c	2006-10-13 04:15:53 UTC (rev 4966)
+++ mc/3D/CitcomS/trunk/lib/Full_geometry_cartesian.c	2006-10-13 06:43:36 UTC (rev 4967)
@@ -72,8 +72,8 @@
   E->sphere.caps = 12;
   E->sphere.max_connections = 6;
 
-  input_double("radius_outer",&(E->sphere.ro),"essential",m);
-  input_double("radius_inner",&(E->sphere.ri),"essential",m);
+  input_double("radius_outer",&(E->sphere.ro),"1",m);
+  input_double("radius_inner",&(E->sphere.ri),"0.55",m);
 
   offset = 10.0/180.0*M_PI;
 

Modified: mc/3D/CitcomS/trunk/lib/Regional_geometry_cartesian.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Regional_geometry_cartesian.c	2006-10-13 04:15:53 UTC (rev 4966)
+++ mc/3D/CitcomS/trunk/lib/Regional_geometry_cartesian.c	2006-10-13 06:43:36 UTC (rev 4967)
@@ -68,8 +68,8 @@
   E->sphere.caps = 1;
   E->sphere.max_connections = 6;
 
-  input_double("radius_outer",&(E->sphere.ro),"essential",m);
-  input_double("radius_inner",&(E->sphere.ri),"essential",m);
+  input_double("radius_outer",&(E->sphere.ro),"1",m);
+  input_double("radius_inner",&(E->sphere.ri),"0.55",m);
 
   input_double("theta_min",&(E->control.theta_min),"essential",m);
   input_double("theta_max",&(E->control.theta_max),"essential",m);

Modified: mc/3D/CitcomS/trunk/lib/Viscosity_structures.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Viscosity_structures.c	2006-10-13 04:15:53 UTC (rev 4966)
+++ mc/3D/CitcomS/trunk/lib/Viscosity_structures.c	2006-10-13 06:43:36 UTC (rev 4967)
@@ -52,7 +52,7 @@
 
   /* read in information */
   input_boolean("VISC_UPDATE",&(E->viscosity.update_allowed),"on",m);
-  input_int("rheol",&(E->viscosity.RHEOL),"essential",m);
+  input_int("rheol",&(E->viscosity.RHEOL),"3",m);
   input_int("num_mat",&(E->viscosity.num_mat),"1",m);
   input_float_vector("visc0",E->viscosity.num_mat,(E->viscosity.N0),m);