Mercurial > repos > public > sbplib
changeset 269:479194747f9c operator_remake
Bug fix
| author | Martin Almquist <martin.almquist@it.uu.se> |
|---|---|
| date | Fri, 09 Sep 2016 15:51:57 +0200 |
| parents | 4b9310edcdf8 |
| children | 728fdc431212 |
| files | +sbp/D2Standard.m |
| diffstat | 1 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
diff -r 4b9310edcdf8 -r 479194747f9c +sbp/D2Standard.m --- a/+sbp/D2Standard.m Fri Sep 09 15:06:03 2016 +0200 +++ b/+sbp/D2Standard.m Fri Sep 09 15:51:57 2016 +0200 @@ -29,32 +29,32 @@ if order == 2 [obj.H, obj.HI, obj.D1, obj.D2, obj.e_l,... obj.e_r, obj.M, obj.Q, obj.d1_l, obj.d1_r] =... - sbp.implementations.ordinary2(m,obj.h); + sbp.implementations.d2_2(m,obj.h); obj.borrowing.M.S = 0.4000; elseif order == 4 [obj.H, obj.HI, obj.D1, obj.D2, obj.e_l,... obj.e_r, obj.M, obj.Q, obj.d1_l, obj.d1_r] =... - sbp.implementations.ordinary4(m,obj.h); + sbp.implementations.d2_4(m,obj.h); obj.borrowing.M.S = 0.2508; elseif order == 6 [obj.H, obj.HI, obj.D1, obj.D2, obj.e_l,... obj.e_r, obj.M, obj.Q, obj.d1_l, obj.d1_r] =... - sbp.implementations.ordinary6(m,obj.h); + sbp.implementations.d2_6(m,obj.h); obj.borrowing.M.S = 0.1878; elseif order == 8 [obj.H, obj.HI, obj.D1, obj.D2, obj.e_l,... obj.e_r, obj.M, obj.Q, obj.d1_l, obj.d1_r] =... - sbp.implementations.ordinary8(m,obj.h); + sbp.implementations.d2_8(m,obj.h); obj.borrowing.M.S = 0.0015; elseif order == 10 [obj.H, obj.HI, obj.D1, obj.D2, obj.e_l,... obj.e_r, obj.M, obj.Q, obj.d1_l, obj.d1_r] =... - sbp.implementations.ordinary10(m,obj.h); + sbp.implementations.d2_10(m,obj.h); obj.borrowing.M.S = 0.0351; elseif order == 12 [obj.H, obj.HI, obj.D1, obj.D2, obj.e_l,... obj.e_r, obj.M, obj.Q, obj.d1_l, obj.d1_r] =... - sbp.implementations.ordinary12(m,obj.h); + sbp.implementations.d2_12(m,obj.h); obj.borrowing.M.S = []; % Need to compute! warning('D2=D1*D1 (wide stencil).'); warning('The borrowing constant has not been computed.')