Mercurial > repos > public > sbplib

view assert_size.m @ 814:3a5e635a93fd feature/burgers1d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add scheme for 1D Burgers equation - Add scheme for discretizing the 1D burgers equation, with spatially variable coefficients.
author Vidar Stiernstrom <vidar.stiernstrom@it.uu.se>
date Mon, 03 Sep 2018 14:50:27 +0200
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