Mercurial > repos > public > sbplib

diff +scheme/Elastic2dVariable.m @ 738:aa4ef495f1fd feature/poroelastic

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Set Dirichlet tuning as parameter in BC function in Elastic2dVariable.
author Martin Almquist <malmquist@stanford.edu>
date Tue, 01 May 2018 14:19:08 -0700
parents eebe24a636c7
children 1f6b2fb69225
line wrap: on
line diff
--- a/+scheme/Elastic2dVariable.m	Wed Apr 25 14:56:17 2018 -0700
+++ b/+scheme/Elastic2dVariable.m	Tue May 01 14:19:08 2018 -0700
@@ -273,9 +273,9 @@
         %       data                is a function returning the data that should be applied at the boundary.
         %       neighbour_scheme    is an instance of Scheme that should be interfaced to.
         %       neighbour_boundary  is a string specifying which boundary to interface to.
-        function [closure, penalty] = boundary_condition(obj, boundary, type, parameter)
+        function [closure, penalty] = boundary_condition(obj, boundary, type, tuning)
             default_arg('type',{'free','free'});
-            default_arg('parameter', []);
+            default_arg('tuning', 1.2);
 
             if ~iscell(type)
                 type = {type, type};
@@ -308,7 +308,6 @@
                 % Dirichlet boundary condition
                 case {'D','d','dirichlet','Dirichlet'}
 
-                    tuning = 1.2;
                     phi = obj.phi{j};
                     h = obj.h(j);
                     h11 = obj.H11{j}*h;