generated from tpl/purs
fix: more functor
This commit is contained in:
parent
3aa6dd1576
commit
20b8d37b4b
@ -11,6 +11,10 @@ data RangeOrExact a
|
||||
= RangeNotExact (Range a)
|
||||
| RangeExact a
|
||||
|
||||
instance Functor RangeOrExact where
|
||||
map f (RangeExact a) = RangeExact $ f a
|
||||
map f (RangeNotExact r) = RangeNotExact $ map f r
|
||||
|
||||
data Bound a
|
||||
= BoundIncluding a
|
||||
| BoundExcluding a
|
||||
|
Loading…
Reference in New Issue
Block a user