diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/library/lux/data/collection/list.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/library/lux/data/collection/list.lux b/stdlib/source/library/lux/data/collection/list.lux index 92b77bdf4..e1661f1a4 100644 --- a/stdlib/source/library/lux/data/collection/list.lux +++ b/stdlib/source/library/lux/data/collection/list.lux @@ -368,7 +368,7 @@ (def: &functor ..functor) - (def: (wrap a) + (def: (in a) (#.Cons a #.Nil)) (def: join (|>> reverse (fold compose identity)))) @@ -587,7 +587,7 @@ (def: &functor (functor.compose (get@ #monad.&functor monad) ..functor)) - (def: wrap (|>> (\ ..monad wrap) (\ monad wrap))) + (def: in (|>> (\ ..monad in) (\ monad in))) (def: (join MlMla) (do {! monad} @@ -597,11 +597,11 @@ (: (($ 0) (List (List ($ 1)))) (monad.seq ! lMla))} (monad.seq ! lMla))] - (wrap (concat lla))))) + (in (concat lla))))) (def: #export (lift monad) (All [M a] (-> (Monad M) (-> (M a) (M (List a))))) - (\ monad map (\ ..monad wrap))) + (\ monad map (\ ..monad in))) (def: #export (enumeration xs) {#.doc "Pairs every element in the list with its index, starting at 0."} |