fibs = fibs2 0 1 fibs2 x y = x:(fibs2 y (x + y)) fib i = head (drop (i-1) fibs)