function Y=repeat(X)
% repeat - Make infinite sequence of the same given element
%
% repeat :: A -> seq A.

Y=data(size(X),'datafn',@(o)X,'nextfn',@id,'charfn',@(o)[tostring(X) '>> repeat']);

