41 haskell