changed language to haskell