Mercurial > repos > public > sbplib

diff +scheme/Beam.m @ 1044:5afc774fb7c4 feature/getBoundaryOp

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge with default
author Jonatan Werpers <jonatan@werpers.com>
date Tue, 22 Jan 2019 16:50:50 +0100
parents 8d73fcdb07a5 25d0efdb0f75
children dc1bcbef2a86
line wrap: on
line diff
--- a/+scheme/Beam.m	Tue Jan 22 16:47:34 2019 +0100
+++ b/+scheme/Beam.m	Tue Jan 22 16:50:50 2019 +0100
@@ -125,7 +125,7 @@
 
                     closure = obj.Hi*(tau*d2' + sig*d3');
                     penalty{1} = -obj.Hi*tau;
-                    penalty{1} = -obj.Hi*sig;
+                    penalty{2} = -obj.Hi*sig;
 
                 case 'e'
                     alpha = obj.alpha;