Mercurial > repos > public > sbplib

view +multiblock/local2globalClosure.m @ 1128:3a9262c045d0 feature/laplace_curvilinear_test

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Copy diracDiscr.m from feature/poroelastic
author Martin Almquist <malmquist@stanford.edu>
date Tue, 21 May 2019 17:59:30 -0700
parents ba10f24bf476
children
line wrap: on
line source

% Takes the block-local closures and turns it into a global closure
%   local -- The local closure
%   div   -- block matrix division for the diffOp
%   I     -- Index of blockmatrix block
function closure = local2globalClosure(local, div, I)
    closure_bm = blockmatrix.zero(div);
    closure_bm{I,I} = local;

    closure = blockmatrix.toMatrix(closure_bm);
end