aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux/data/collection/set/ordered.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/test/lux/data/collection/set/ordered.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/test/lux/data/collection/set/ordered.lux b/stdlib/source/test/lux/data/collection/set/ordered.lux
index b753ac1af..31b8b0405 100644
--- a/stdlib/source/test/lux/data/collection/set/ordered.lux
+++ b/stdlib/source/test/lux/data/collection/set/ordered.lux
@@ -21,7 +21,7 @@
(def: size
(random.Random Nat)
- (\ random.monad map (n.% 100) random.nat))
+ (\ random.monad each (n.% 100) random.nat))
(def: .public (random size &order gen_value)
(All [a] (-> Nat (Order a) (Random a) (Random (Set a))))
@@ -47,7 +47,7 @@
non_memberL (random.only (|>> (//.member? usetL) not)
random.nat)
.let [listL (//.list usetL)]
- listR (|> (random.set n.hash sizeR random.nat) (\ ! map //.list))
+ listR (|> (random.set n.hash sizeR random.nat) (\ ! each //.list))
.let [(^open "/\.") /.equivalence
setL (/.of_list n.order listL)
setR (/.of_list n.order listR)