Added some haskell