% allequal - Test if all elements of vector are equal
% allequal :: [[N]->A] -> bool.
function f=allequal(x), f=all(x==x(1));

