haskell snippets