Haskell Fibonacci with Tuples