Sha256: 22e688c52e339f5b7bd1155f5033f4989418d81227a47fc51769a0d0160c4d51
Contents?: true
Size: 512 Bytes
Versions: 17
Compression:
Stored size: 512 Bytes
Contents
-- Type annotation (optional)
fib :: Int -> Integer
-- With self-referencing data
fib n = fibs !! n
where fibs = 0 : scanl (+) 1 fibs
-- 0,1,1,2,3,5,...
-- Same, coded directly
fib n = fibs !! n
where fibs = 0 : 1 : next fibs
next (a : t@(b:_)) = (a+b) : next t
-- Similar idea, using zipWith
fib n = fibs !! n
where fibs = 0 : 1 : zipWith (+) fibs (tail fibs)
-- Using a generator function
fib n = fibs (0,1) !! n
where fibs (a,b) = a : fibs (b,a+b)
Version data entries
17 entries across 17 versions & 1 rubygems