[cig-commits] r19598 - short/3D/PyLith/trunk/libsrc/pylith/materials

brad at geodynamics.org brad at geodynamics.org
Tue Feb 7 13:16:56 PST 2012


Author: brad
Date: 2012-02-07 13:16:56 -0800 (Tue, 07 Feb 2012)
New Revision: 19598

Modified:
   short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPrager3D.cc
   short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPragerPlaneStrain.cc
Log:
Replaced double with PylithScalar.

Modified: short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPrager3D.cc
===================================================================
--- short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPrager3D.cc	2012-02-07 21:12:43 UTC (rev 19597)
+++ short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPrager3D.cc	2012-02-07 21:16:56 UTC (rev 19598)
@@ -216,7 +216,7 @@
   const PylithScalar cohesion = dbValues[db_cohesion];
   const PylithScalar dilatationAngle = dbValues[db_dilatationAngle];
  
-  const double pi = M_PI;
+  const PylithScalar pi = M_PI;
 
   if (density <= 0.0 || vs <= 0.0 || vp <= 0.0 || cohesion < 0.0 ||
       frictionAngle < 0.0 || frictionAngle > pi/2 ||

Modified: short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPragerPlaneStrain.cc
===================================================================
--- short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPragerPlaneStrain.cc	2012-02-07 21:12:43 UTC (rev 19597)
+++ short/3D/PyLith/trunk/libsrc/pylith/materials/DruckerPragerPlaneStrain.cc	2012-02-07 21:16:56 UTC (rev 19598)
@@ -223,7 +223,7 @@
   const PylithScalar cohesion = dbValues[db_cohesion];
   const PylithScalar dilatationAngle = dbValues[db_dilatationAngle];
 
-  const double pi = M_PI;
+  const PylithScalar pi = M_PI;
  
   if (density <= 0.0 || vs <= 0.0 || vp <= 0.0 || cohesion < 0.0 ||
       frictionAngle < 0.0 || frictionAngle > pi/2 ||



More information about the CIG-COMMITS mailing list