Haskell adventures