Mercurial > repos > public > sbplib

comparison +scheme/Beam.m @ 1041:25d0efdb0f75

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix penalty bug in Beam
author Jonatan Werpers <jonatan@werpers.com>
date Tue, 22 Jan 2019 10:46:29 +0100
parents a35ed1d124d3
children 5afc774fb7c4
comparison
equal deleted inserted replaced
1005:efa51f393fd0 1041:25d0efdb0f75
122 tau = s*a*d1; 122 tau = s*a*d1;
123 sig = -s*a*e; 123 sig = -s*a*e;
124 124
125 closure = obj.Hi*(tau*d2' + sig*d3'); 125 closure = obj.Hi*(tau*d2' + sig*d3');
126 penalty{1} = -obj.Hi*tau; 126 penalty{1} = -obj.Hi*tau;
127 penalty{1} = -obj.Hi*sig; 127 penalty{2} = -obj.Hi*sig;
128 128
129 case 'e' 129 case 'e'
130 alpha = obj.alpha; 130 alpha = obj.alpha;
131 tuning = 1.1; 131 tuning = 1.1;
132 132