Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
type Shrinker a = a -> [a]
class Arbitrary a where
arbitrary :: Gen a
shrink :: Shrinker a
shrink = const []
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment