[Haskell-beginners] Quickcheck2 - writing a modifier for test data