8 Nov
2007
8 Nov
'07
2:40 a.m.
On Thu, Nov 08, 2007 at 12:56:46AM +0100, jerzy.karczmarczuk@info.unicaen.fr wrote:
This nasty acquaintance of mine asked the students to write down a simple procedure which generates the sequence after the infinite number of units of time. Of course, any finite prefix of it.
rabbit = let rs = 0 : [x | r <- rs, x <- if r==0 then [1] else [1,0]] in 1 : rs