function y=map(f,x)
% map - Map function over collection
%
% map :: (A->B), collection(A) -> collection(B).
%
% collection(A) ::= seq(A) | cells(A).

if isempty(x), y=x;
else
	error(sprintf('Cannot map over objects of class %s',class(x)));
end
