haskell test change