module Data.NonNull.TestInstances
  (
  ) where

import TestImport


instance (Arbitrary a, MonoFoldable a) => Arbitrary (NonNull a) where
  arbitrary = arbitrary `suchThatMap` fromNullable