function Z=mapels(f,X)
% mapels - Map a function of a scalar over one or more arrays
%
% mapels :: 
%    (A->B), 
%    [Size->A]
% -> [Size->B].

z1=f(X(1));
Z=repmat(z1,size(X));
for i=2:numel(X)
	Z(i)=f(X(i));
end
