Mercurial > repos > public > sbplib
view +multiblock/local2globalPenalty.m @ 895:ba037fd21e9f bcSetupExperiment
Merge with default
author | Jonatan Werpers <jonatan@werpers.com> |
---|---|
date | Thu, 22 Nov 2018 07:31:42 +0100 |
parents | c51b3f945c65 |
children | ba10f24bf476 |
line wrap: on
line source
% Takes the local penalty for ice or water and turns it into a penalty for the whole system % local -- The local penalty % div -- block matrix division for the diffOp % I -- Index of blockmatrix block function penalty = local2globalPenalty(local, div, I) penaltyDiv = {div{1}, size(local,2)}; penalty_bm = blockmatrix.zero(penaltyDiv); penalty_bm{I,1} = local; penalty = blockmatrix.toMatrix(penalty_bm); end