Haskell test works! :D