News for hackers. Stuff that matters.

A comment on Corecursion. Parent comment

Re:Corecursion by wyager on Thursday May 08, 2014 @07:35PM (#7718390)
Alternatively,

     fibonacci n = (map fst $ iterate (\(a,b) -> (b,a+b)) (0,1)) !! n
[ Parent | on HN ]
Re:Corecursion by Pitarou on Thursday May 08, 2014 @08:01PM (#7718513)
I think gamegoblin's was prettier.
[ Parent | on HN ]
Re:Corecursion by wyager on Sunday May 11, 2014 @07:21PM (#7730451)
Got a really short one!

     fib a b = a : fib b (a+b)
     fibn = (!!) (fib 0 1)
[ Parent | on HN ]