[cig-commits] r19791 - in short/3D/PyLith/branches/pylith-scecdynrup: . examples/3d/hex8 libsrc/pylith/friction libsrc/pylith/problems

brad at geodynamics.org brad at geodynamics.org
Thu Mar 15 15:20:00 PDT 2012


Author: brad
Date: 2012-03-15 15:19:59 -0700 (Thu, 15 Mar 2012)
New Revision: 19791

Modified:
   short/3D/PyLith/branches/pylith-scecdynrup/examples/3d/hex8/pylithapp.cfg
   short/3D/PyLith/branches/pylith-scecdynrup/examples/3d/hex8/step11.cfg
   short/3D/PyLith/branches/pylith-scecdynrup/libsrc/pylith/friction/StaticFriction.cc
   short/3D/PyLith/branches/pylith-scecdynrup/libsrc/pylith/problems/SolverNonlinear.cc
   short/3D/PyLith/branches/pylith-scecdynrup/merge.sh
Log:
Merge from trunk.

Modified: short/3D/PyLith/branches/pylith-scecdynrup/examples/3d/hex8/pylithapp.cfg
===================================================================
--- short/3D/PyLith/branches/pylith-scecdynrup/examples/3d/hex8/pylithapp.cfg	2012-03-15 22:17:44 UTC (rev 19790)
+++ short/3D/PyLith/branches/pylith-scecdynrup/examples/3d/hex8/pylithapp.cfg	2012-03-15 22:19:59 UTC (rev 19791)
@@ -44,7 +44,11 @@
 [pylithapp.timedependent.formulation.time_step]
 # Define the total time for the simulation and the default time step size.
 total_time = 0.0*s ; total time of simulation
+# Define an appropriat time step for simulations. Important for
+# nondimensionalization of velocities and slip rates.
+dt = 5.0*year
 
+
 # ----------------------------------------------------------------------
 # materials
 # ----------------------------------------------------------------------
@@ -75,6 +79,9 @@
 # ----------------------------------------------------------------------
 # Set the solver options.
 [pylithapp.petsc]
+#malloc = True
+#malloc_debug = True
+#malloc_dump = True
 
 # Preconditioner settings.
 pc_type = asm

Modified: short/3D/PyLith/branches/pylith-scecdynrup/examples/3d/hex8/step11.cfg
===================================================================
--- short/3D/PyLith/branches/pylith-scecdynrup/examples/3d/hex8/step11.cfg	2012-03-15 22:17:44 UTC (rev 19790)
+++ short/3D/PyLith/branches/pylith-scecdynrup/examples/3d/hex8/step11.cfg	2012-03-15 22:19:59 UTC (rev 19791)
@@ -78,7 +78,7 @@
 db_initial = spatialdata.spatialdb.UniformDB
 db_initial.label = Dirichlet BC on +x
 db_initial.values = [displacement-x,displacement-y]
-db_initial.data = [-1.0*m,2.0*m]
+db_initial.data = [-1.0*m,3.0*m]
 
 # -x face
 [pylithapp.timedependent.bc.x_neg]
@@ -87,7 +87,7 @@
 db_initial = spatialdata.spatialdb.UniformDB
 db_initial.label = Dirichlet BC on -x
 db_initial.values = [displacement-x,displacement-y]
-db_initial.data = [1.0*m,-2.0*m]
+db_initial.data = [1.0*m,-3.0*m]
 
 # -z face
 [pylithapp.timedependent.bc.z_neg]

Modified: short/3D/PyLith/branches/pylith-scecdynrup/libsrc/pylith/friction/StaticFriction.cc
===================================================================
--- short/3D/PyLith/branches/pylith-scecdynrup/libsrc/pylith/friction/StaticFriction.cc	2012-03-15 22:17:44 UTC (rev 19790)
+++ short/3D/PyLith/branches/pylith-scecdynrup/libsrc/pylith/friction/StaticFriction.cc	2012-03-15 22:19:59 UTC (rev 19791)
@@ -158,7 +158,7 @@
   assert(0 == numStateVars);
 
   const PylithScalar friction = (normalTraction <= 0.0) ?
-    -properties[p_coef] * normalTraction + properties[p_cohesion]: 
+    properties[p_cohesion] - properties[p_coef] * normalTraction :
     properties[p_cohesion];
 
   PetscLogFlops(2);

Modified: short/3D/PyLith/branches/pylith-scecdynrup/libsrc/pylith/problems/SolverNonlinear.cc
===================================================================
--- short/3D/PyLith/branches/pylith-scecdynrup/libsrc/pylith/problems/SolverNonlinear.cc	2012-03-15 22:17:44 UTC (rev 19790)
+++ short/3D/PyLith/branches/pylith-scecdynrup/libsrc/pylith/problems/SolverNonlinear.cc	2012-03-15 22:19:59 UTC (rev 19791)
@@ -189,11 +189,11 @@
 					      void *lsctx,
 					      PetscVec x,
 					      PetscVec f,
+					      PetscVec g,
 					      PetscVec y,
+					      PetscVec w,
 					      PetscReal fnorm,
 					      PetscReal xnorm,
-					      PetscVec g,
-					      PetscVec w,
 					      PetscReal *ynorm,
 					      PetscReal *gnorm,
 					      PetscBool *flag)

Modified: short/3D/PyLith/branches/pylith-scecdynrup/merge.sh
===================================================================
--- short/3D/PyLith/branches/pylith-scecdynrup/merge.sh	2012-03-15 22:17:44 UTC (rev 19790)
+++ short/3D/PyLith/branches/pylith-scecdynrup/merge.sh	2012-03-15 22:19:59 UTC (rev 19791)
@@ -1,2 +1,2 @@
 svn up
-svn merge -r 16682:HEAD svn+ssh://svn@geodynamics.org/cig/short/3D/PyLith/trunk .
+svn merge -r REV_FROM_LAST_MERGE:HEAD svn+ssh://svn@geodynamics.org/cig/short/3D/PyLith/trunk .



More information about the CIG-COMMITS mailing list