Mercurial > repos > public > sbplib

view stripeMatrixPeriodic.m @ 1068:e0ecce90f8cf feature/laplace_curvilinear_test

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add variable b. Tested for interface and Dirichlet, but not Neumann yet.
author Martin Almquist <malmquist@stanford.edu>
date Tue, 22 Jan 2019 19:18:24 -0800
parents bbf303c1f0cf
children
line wrap: on
line source

% Creates a periodic discretization matrix of size n x n
%  with the values of val on the diagonals diag.
%   A = stripeMatrix(val,diags,n)
function A = stripeMatrixPeriodic(val,diags,n)

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