`4db3c08f40fef7de5297f814a7a6334ff9b707331dcb87105fa0ac5f627e1a0c`

**Created: **2023-12-19 03:40:10.302489 UTC

**Size: **445

**Preview (limited to 512 bytes)**

`"{-# OPTIONS_GHC -fno-warn-orphans #-}\nmodule Orphans () where\n\nimport Numeric.Natural (Natural)\nimport Test.QuickCheck (Arbitrary (..))\n\n-- | The QuickCheck-2.10 doesn't define the Arbitrary Natural instance\n-- We define own instance (and not use quickcheck-instance) to break\n-- the cycle in tests.\ninstance Arbitrary Natural where\n arbitrary = fmap (fromInteger . abs) arbitrary\n shrink = map (fromInteger . abs) . shrink . fromIntegral\n"`

Casa is a service provided by the Haskell Foundation â”‚Â Originally developed by FP Complete