Mercurial > repos > public > sbplib

view assert_size.m @ 86:3c39dd714fb6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
In Curve: Added numerical FD differentiation if derivative is not supplied. Added arc length computation based on the derivative. Added arc length parameterization (but this function is very slow.). In +util: Added fzero_vec.m and integral_vec.m, which call fzero and integral but take vector arguments.
author Martin Almquist <martin.almquist@it.uu.se>
date Sun, 29 Nov 2015 14:28:53 +0100
parents 48b6fb693025
children afd20f023928
line wrap: on
line source

% Assert that array A has the size s.
function assert_size(A,s)
    errmsg = sprintf('Expected %s to have size %s, got: %s',inputname(1), format_vector(s), format_vector(size(A)));
    assert(all(size(A) == s),errmsg);
end

function str = format_vector(a)
    l = length(a);
    str = sprintf('[%d',a(1));

    for i = 2:l
        str = [str sprintf(', %d',a(i))];
    end

    str = [str ']'];
end