Skip to content
Snippets Groups Projects
Commit 7228b239 authored by Elias Pipping's avatar Elias Pipping Committed by Elias Pipping
Browse files

Make b and L configurable

parent e75287b6
No related branches found
No related tags found
No related merge requests found
...@@ -169,10 +169,10 @@ assemble_nonlinearity( ...@@ -169,10 +169,10 @@ assemble_nonlinearity(
*eta = parset.get<double>("boundary.friction.eta"); *eta = parset.get<double>("boundary.friction.eta");
auto b = Dune::make_shared<SingletonVectorType>(size); auto b = Dune::make_shared<SingletonVectorType>(size);
*b = 1; // FIXME *b = parset.get<double>("boundary.friction.ruina.b");
auto L = Dune::make_shared<SingletonVectorType>(size); auto L = Dune::make_shared<SingletonVectorType>(size);
*L = 1.0 / parset.get<double>("boundary.friction.eta"); // FIXME *L = parset.get<double>("boundary.friction.ruina.L");
return Dune::make_shared< return Dune::make_shared<
Dune::GlobalRuinaNonlinearity<VectorType, MatrixType> const>( Dune::GlobalRuinaNonlinearity<VectorType, MatrixType> const>(
...@@ -435,7 +435,7 @@ int main(int argc, char *argv[]) { ...@@ -435,7 +435,7 @@ int main(int argc, char *argv[]) {
for (size_t i = 0; i < frictionalNodes.size(); ++i) { for (size_t i = 0; i < frictionalNodes.size(); ++i) {
if (frictionalNodes[i][0]) { if (frictionalNodes[i][0]) {
double const L = 1e-4; // FIXME: magic value double const L = parset.get<double>("boundary.friction.ruina.L");
double const unorm = u4_diff[i].two_norm(); double const unorm = u4_diff[i].two_norm();
double ret1 = double ret1 =
......
...@@ -89,6 +89,8 @@ initial = 10 ...@@ -89,6 +89,8 @@ initial = 10
# -- Ronaldo I. Borja and Craig D. Foster: # -- Ronaldo I. Borja and Craig D. Foster:
# Continuum mathematical modeling of slip weakening in geological systems # Continuum mathematical modeling of slip weakening in geological systems
a = 0.015 a = 0.015
b = 0.005
L = 1e-4
# The second-order a and b terms in [..] are very important in # The second-order a and b terms in [..] are very important in
# determining whether sliding is stable or unstable and (in appli- # determining whether sliding is stable or unstable and (in appli-
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment