[Haskell-cafe] Generating test data in QuickCheck