module Data.Paired.Common where
data OnDiag = OnDiag | NoDiag
deriving (OnDiag -> OnDiag -> Bool
(OnDiag -> OnDiag -> Bool)
-> (OnDiag -> OnDiag -> Bool) -> Eq OnDiag
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OnDiag -> OnDiag -> Bool
$c/= :: OnDiag -> OnDiag -> Bool
== :: OnDiag -> OnDiag -> Bool
$c== :: OnDiag -> OnDiag -> Bool
Eq)
data Enumerate
= All
| FromN Int Int
deriving (Enumerate -> Enumerate -> Bool
(Enumerate -> Enumerate -> Bool)
-> (Enumerate -> Enumerate -> Bool) -> Eq Enumerate
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Enumerate -> Enumerate -> Bool
$c/= :: Enumerate -> Enumerate -> Bool
== :: Enumerate -> Enumerate -> Bool
$c== :: Enumerate -> Enumerate -> Bool
Eq)
data SizeHint
= UnknownSize
| KnownSize Int
deriving (SizeHint -> SizeHint -> Bool
(SizeHint -> SizeHint -> Bool)
-> (SizeHint -> SizeHint -> Bool) -> Eq SizeHint
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SizeHint -> SizeHint -> Bool
$c/= :: SizeHint -> SizeHint -> Bool
== :: SizeHint -> SizeHint -> Bool
$c== :: SizeHint -> SizeHint -> Bool
Eq)