diff options
Diffstat (limited to 'algebraic-structs.monad.list.base.scm')
| -rw-r--r-- | algebraic-structs.monad.list.base.scm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/algebraic-structs.monad.list.base.scm b/algebraic-structs.monad.list.base.scm new file mode 100644 index 0000000..a7305a0 --- /dev/null +++ b/algebraic-structs.monad.list.base.scm @@ -0,0 +1,7 @@ +(module (algebraic-structs monad list base) (pure map map2 >>=) + (import (except scheme map) + (algebraic-structs applicative list) + (only (srfi 1) append-map)) + + (define (>>= lst f) + (append-map f lst))) |