Mercurial > repos > public > sbplib

view stripeMatrix.m @ 536:6c6a3040a678 feature/grids

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add an abstrac class as help when defining transfinite multiblock grids
author Jonatan Werpers <jonatan@werpers.com>
date Mon, 07 Aug 2017 09:57:03 +0200
parents 5cb99f56f55e
children
line wrap: on
line source

% Creates a matrix of size n,m with the values of val on the diagonals diag.
%   A = stripeMatrix(val,diags,n,m)
function A = stripeMatrix(val,diags,n,m)
    default_arg('m',n);

    D = ones(n,1)*val;
    A = spdiags(D,diags,n,m);
end