Started Haskell implementation