haskell scratch