Mercurial > repos > public > sbplib

view spdiag.m @ 155:cf748f33cd5b feature/grids

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Removed some extra lines, added some notes and comments. Fixed classname.
author Jonatan Werpers <jonatan@werpers.com>
date Thu, 18 Feb 2016 17:17:41 +0100
parents 9c0192cf099f
children 8e0067aef5b0
line wrap: on
line source

function A = spdiag(a,i)
    default_arg('i',0);
    n = length(a)-abs(i);
    A = spdiags(a,i,n,n);
end