Mercurial > repos > public > sbplib

diff spdiag.m @ 802:e3d963997527 feature/poroelastic

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge with feature/grids
author Jonatan Werpers <jonatan@werpers.com>
date Thu, 26 Jul 2018 18:05:29 -0700
parents e76321b89c1e
children
line wrap: on
line diff
--- a/spdiag.m	Thu Jul 26 18:04:29 2018 -0700
+++ b/spdiag.m	Thu Jul 26 18:05:29 2018 -0700
@@ -5,6 +5,6 @@
         a = a';
     end
 
-    n = length(a)-abs(i);
+    n = length(a)+abs(i);
     A = spdiags(a,i,n,n);
 end
\ No newline at end of file