Mercurial > repos > public > sbplib
annotate stripeMatrix.m @ 1016:4b42999874c0 feature/advectionRV
Add lower level for boot-strapping to RungeKuttaExteriorRV
- Add a lower level to RungeKuttaExteriorRV for which bootstrapping starts, e.g start bootstrapping from time level 3 using a 3rd order BDF
- Clean up ResidualViscosity
author | Vidar Stiernström <vidar.stiernstrom@it.uu.se> |
---|---|
date | Fri, 07 Dec 2018 13:11:53 +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 |