RosettaCodeData/Task/Fibonacci-sequence/Haskell/fibonacci-sequence-18.hs

4 lines
76 B
Haskell

fibs :: [Integer]
fibs = map numerator
(1/(1 : (-1) : (-1) : repeat 0))