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

[tan2 at geodynamics.org]

Author: tan2
Date: 2006-08-21 15:42:05 -0700 (Mon, 21 Aug 2006)
New Revision: 4395

Modified:
   mc/3D/CitcomS/trunk/lib/Output_h5.c
Log:
Added two attributes to /input group
* 'scalev' : velocity scale, in cm/yr
* 'scalet' : time scale, in Myrs

Modified: mc/3D/CitcomS/trunk/lib/Output_h5.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Output_h5.c	2006-08-21 21:38:21 UTC (rev 4394)
+++ mc/3D/CitcomS/trunk/lib/Output_h5.c	2006-08-21 22:42:05 UTC (rev 4395)
@@ -1436,6 +1436,8 @@
     status = set_attribute(input, "z_cmb", H5T_NATIVE_FLOAT, &(E->viscosity.zcmb));
     status = set_attribute(input, "layer_km", H5T_NATIVE_FLOAT, &(E->data.layer_km));
     status = set_attribute(input, "radius_km", H5T_NATIVE_FLOAT, &(E->data.radius_km));
+    status = set_attribute(input, "scalev", H5T_NATIVE_FLOAT, &(E->data.scalev));
+    status = set_attribute(input, "scalet", H5T_NATIVE_FLOAT, &(E->data.scalet));
 
     /*
      * IC.inventory