Mercurial > repos > public > sbplib
view +multiblock/local2globalClosure.m @ 1317:34997aced843 feature/poroelastic
Add some interface forcing penalties in ElasticCurvilinearAnisotropic
author | Martin Almquist <malmquist@stanford.edu> |
---|---|
date | Sun, 26 Jul 2020 20:06:06 -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