Changing test to check against the Haskell implementation