aboutsummaryrefslogtreecommitdiff
path: root/algebraic-structures.monad.scm
diff options
context:
space:
mode:
Diffstat (limited to 'algebraic-structures.monad.scm')
-rw-r--r--algebraic-structures.monad.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/algebraic-structures.monad.scm b/algebraic-structures.monad.scm
index fd5ff82..06bf3cb 100644
--- a/algebraic-structures.monad.scm
+++ b/algebraic-structures.monad.scm
@@ -1,5 +1,5 @@
-(functor ((algebraic-structures monad) (M (pure map map2 >>=)))
- (pure map map2 >>= do)
+(functor ((algebraic-structures monad) (M (pure map1 map2 map apply >>=)))
+ (pure map1 map2 map apply >>= do)
(import (rename scheme (map scheme:map) (do scheme:do))
M)
(import-for-syntax matchable