Mercurial > repos > public > sbplib
annotate stripeMatrix.m @ 985:ad6de007e7f6 feature/timesteppers
Convert Rungekutta4SecondOrder to take F(t,v,v_t) instead of matrices
author | Jonatan Werpers <jonatan@werpers.com> |
---|---|
date | Tue, 08 Jan 2019 12:34:29 +0100 |
parents | 5cb99f56f55e |
children |
rev | line source |
---|---|
51
0be702829bb9
Generalized spdiag. Added function for createing a banded sparse matrix.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
1 % Creates a matrix of size n,m with the values of val on the diagonals diag. |
358
5cb99f56f55e
Added some utility functions. Improved some documentation.
Jonatan Werpers <jonatan@werpers.com>
parents:
51
diff
changeset
|
2 % A = stripeMatrix(val,diags,n,m) |
51
0be702829bb9
Generalized spdiag. Added function for createing a banded sparse matrix.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
3 function A = stripeMatrix(val,diags,n,m) |
0be702829bb9
Generalized spdiag. Added function for createing a banded sparse matrix.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
4 default_arg('m',n); |
0be702829bb9
Generalized spdiag. Added function for createing a banded sparse matrix.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
5 |
0be702829bb9
Generalized spdiag. Added function for createing a banded sparse matrix.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
6 D = ones(n,1)*val; |
0be702829bb9
Generalized spdiag. Added function for createing a banded sparse matrix.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
7 A = spdiags(D,diags,n,m); |
0be702829bb9
Generalized spdiag. Added function for createing a banded sparse matrix.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
8 end |