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

tan2 at geodynamics.org tan2 at geodynamics.org
Wed Nov 15 19:04:21 PST 2006


Author: tan2
Date: 2006-11-15 19:04:21 -0800 (Wed, 15 Nov 2006)
New Revision: 5300

Modified:
   mc/3D/CitcomS/trunk/module/setProperties.c
Log:
Forgot to commit module/ directory

Modified: mc/3D/CitcomS/trunk/module/setProperties.c
===================================================================
--- mc/3D/CitcomS/trunk/module/setProperties.c	2006-11-16 03:01:59 UTC (rev 5299)
+++ mc/3D/CitcomS/trunk/module/setProperties.c	2006-11-16 03:04:21 UTC (rev 5300)
@@ -187,14 +187,15 @@
 
     PUTS(("[CitcomS.solver.const]\n"));
 
-    getFloatProperty(properties, "layerd", radius, fp);
+    getFloatProperty(properties, "radius", radius, fp);
     getFloatProperty(properties, "density", E->data.density, fp);
     getFloatProperty(properties, "thermdiff", E->data.therm_diff, fp);
     getFloatProperty(properties, "gravacc", E->data.grav_acc, fp);
     getFloatProperty(properties, "thermexp", E->data.therm_exp, fp);
     getFloatProperty(properties, "refvisc", E->data.ref_viscosity, fp);
     getFloatProperty(properties, "cp", E->data.Cp, fp);
-    getFloatProperty(properties, "wdensity", E->data.density_above, fp);
+    getFloatProperty(properties, "density_above", E->data.density_above, fp);
+    getFloatProperty(properties, "density_below", E->data.density_below, fp);
     getFloatProperty(properties, "surftemp", E->data.surf_temp, fp);
 
     E->data.therm_cond = E->data.therm_diff * E->data.density * E->data.Cp;
@@ -208,8 +209,7 @@
     getFloatProperty(properties, "z_cmb", E->viscosity.zcmb, fp); /* this is used as the D" phase change depth */
 
     /* convert meter to kilometer */
-    E->data.layer_km = radius / 1e3;
-    E->data.radius_km = E->data.layer_km;
+    E->data.radius_km = radius / 1e3;
 
     PUTS(("\n"));
 
@@ -310,6 +310,8 @@
     getStringProperty(properties, "output_format", E->output.format, fp);
     getStringProperty(properties, "output_optional", E->output.optional, fp);
 
+    getIntProperty(properties, "output_ll_max", E->output.llmax, fp);
+
     getIntProperty(properties, "cb_block_size", E->output.cb_block_size, fp);
     getIntProperty(properties, "cb_buffer_size", E->output.cb_buffer_size, fp);
 
@@ -590,11 +592,6 @@
 	E->sphere.cap[1].fi[4] = E->control.fi_max;
     }
 
-    getIntProperty(properties, "ll_max", E->sphere.llmax, fp);
-    getIntProperty(properties, "nlong", E->sphere.noy, fp);
-    getIntProperty(properties, "nlati", E->sphere.nox, fp);
-    getIntProperty(properties, "output_ll_max", E->sphere.output_llmax, fp);
-
     E->mesh.layer[1] = 1;
     E->mesh.layer[2] = 1;
     E->mesh.layer[3] = 1;
@@ -774,7 +771,7 @@
         return -1;
     if (-1 == PyString_AsStringAndSize(prop, &buffer, &length))
         return -1;
-        
+
     if (length >= (Py_ssize_t)valueSize) {
         PyErr_Format(PyExc_ValueError,
                      "value of '%s' cannot exceed %zu characters in length",



More information about the cig-commits mailing list