Mercurial > repos > public > sbplib
view +blockmatrix/isDivision.m @ 1346:464e6f65c2c6 feature/poroelastic
Refactor computation of borrowing from C. Update to correct number of boundary points for borrowing from R.
author | Martin Almquist <martin.almquist@it.uu.se> |
---|---|
date | Tue, 30 Apr 2024 14:18:47 +0200 |
parents | a5f1b0267dba |
children |
line wrap: on
line source
function b = isDivision(div) % Make sure it is a cellarray if ~iscell(div) b = false; return end % Make sure it has the right shape if numel(div) ~= 2 b = false; return end if ~isDivisionVector(div{1}) || ~isDivisionVector(div{2}) b = false; return end b = true; end function b = isDivisionVector(v) if isempty(v) b = true; return end if any(v < 0) b = false; return end b = true; end