diff options
| -rw-r--r-- | tests/Properties.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/tests/Properties.hs b/tests/Properties.hs index 1240734..c8b7e05 100644 --- a/tests/Properties.hs +++ b/tests/Properties.hs @@ -292,6 +292,8 @@ instance Arbitrary Rectangle where sw <- arbitrary sh <- arbitrary return $ Rectangle sx sy sw sh + coarbitrary = undefined + instance Arbitrary Rational where arbitrary = do |