Too little time to haskell