Mercurial > repos > public > sbplib

diff +sbp/+implementations/d4_lonely_8_higher_boundary_order.m @ 326:b19e142fcae1 feature/beams

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed bug in setting of boundary derivative.
author Jonatan Werpers <jonatan@werpers.com>
date Tue, 27 Sep 2016 08:44:17 +0200
parents 72468bc9b63f
children bf801c3709be
line wrap: on
line diff
--- a/+sbp/+implementations/d4_lonely_8_higher_boundary_order.m	Mon Sep 26 09:55:16 2016 +0200
+++ b/+sbp/+implementations/d4_lonely_8_higher_boundary_order.m	Tue Sep 27 08:44:17 2016 +0200
@@ -38,7 +38,7 @@
 
     d1_l = sparse(m,1);
     d1_l(1:7) = [-0.49e2/0.20e2 6 -0.15e2/0.2e1 0.20e2/0.3e1 -0.15e2/0.4e1 0.6e1/0.5e1 -0.1e1/0.6e1]/h;
-    d1_r = -rot90(d1_l);
+    d1_r = -rot90(d1_l, 2);
 
     d2_l = sparse(m,1);
     d2_l(1:7) = [0.203e3/0.45e2 -0.87e2/0.5e1 0.117e3/0.4e1 -0.254e3/0.9e1 0.33e2/0.2e1 -0.27e2/0.5e1 0.137e3/0.180e3]/h^2;