Add haskell equivalent.