my haskell stuff