summaryrefslogtreecommitdiff
path: root/Instances.agda
diff options
context:
space:
mode:
authorHelmut Grohne <grohne@cs.uni-bonn.de>2014-04-03 15:33:06 +0200
committerHelmut Grohne <grohne@cs.uni-bonn.de>2014-04-03 15:33:06 +0200
commit91db824bfa4d66f29066a381e88e6e3125e15576 (patch)
tree4780568bd65d1e68a12f02b6fd22a83acb0ed6be /Instances.agda
parent9d97d3c3cb339b3e78257d19e383df4d3f5bcc74 (diff)
downloadbidiragda-91db824bfa4d66f29066a381e88e6e3125e15576.tar.gz
fix compilation for Agda 2.3.0.1 again
It fails to infer the type of MaybeFunctor._<$>_, so give it explicitly.
Diffstat (limited to 'Instances.agda')
-rw-r--r--Instances.agda3
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)