diff options
Diffstat (limited to 'Instances.agda')
| -rw-r--r-- | Instances.agda | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Instances.agda b/Instances.agda index 2e4ed3e..3f69627 100644 --- a/Instances.agda +++ b/Instances.agda @@ -26,7 +26,8 @@ MaybeFunctor = record ; identity = identity ; composition = composition } } - where _<$>_ = RawFunctor._<$>_ M.functor + where _<$>_ : {α β : Set} → (α → β) → Maybe α → Maybe β + _<$>_ = RawFunctor._<$>_ M.functor cong : {α β : Set} {g h : α → β} → g ≗ h → _<$>_ g ≗ _<$>_ h cong g≗h (M.just x) = P.cong M.just (g≗h x) |