Mercurial > hg > ishara

diff sequences/repeat.m @ 3:3f77126f7b5f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
First major revision of sequence library, now using classdef form, STILL A BIT BROKEN!
author samer
date Wed, 09 Jan 2013 22:22:21 +0000
parents 672052bd81f8
children b1280319413e
line wrap: on
line diff
--- a/sequences/repeat.m	Sat Dec 22 16:17:51 2012 +0000
+++ b/sequences/repeat.m	Wed Jan 09 22:22:21 2013 +0000
@@ -1,7 +1,1 @@
-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']);
-
+function z=repeat(x), z=seq.repeat(x); end