My haskell utils.