easy 15 in haskell, file IO