Exercise 6 Haskell files