Mercurial > repos > public > sbplib

annotate spdiag.m @ 58:24103284e09d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed coding errors in Euler1d.
author Jonatan Werpers <jonatan@werpers.com>
date Fri, 13 Nov 2015 16:39:45 -0800
parents 0be702829bb9
children 9c0192cf099f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
45
b6cfc04e576c Changed spdiag to be more like matlabs diag.
Jonatan Werpers <jonatan@werpers.com>
parents: 27
diff changeset
1 function A = spdiag(a,i)
51
0be702829bb9 Generalized spdiag. Added function for createing a banded sparse matrix.
Jonatan Werpers <jonatan@werpers.com>
parents: 45
diff changeset
2 n = length(a)-abs(i);
45
b6cfc04e576c Changed spdiag to be more like matlabs diag.
Jonatan Werpers <jonatan@werpers.com>
parents: 27
diff changeset
3 A = spdiags(a,i,n,n);
27
97a638f91fb8 Added function spdiag(). Fixed a bunch of bugs in the Wave2dCurve scheme.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
4 end