1 files changed, 11 insertions, 11 deletions

diff --git a/stdlib/source/lux/data/collection/set/multi.lux b/stdlib/source/lux/data/collection/set/multi.lux
index eb8e914e3..91fd7f675 100644
--- a/stdlib/source/lux/data/collection/set/multi.lux
+++ b/stdlib/source/lux/data/collection/set/multi.lux
@@ -25,15 +25,15 @@
 
   (def: #export size
     (All [a] (-> (Set a) Nat))
-    (|>> :representation dictionary.values (list/fold n/+ +0)))
+    (|>> :representation dictionary.values (list/fold n/+ |0)))
 
   (def: #export (add/* count elem set)
     (All [a] (-> Nat a (Set a) (Set a)))
-    (|> set :representation (dictionary.update~ elem +0 (n/+ count)) :abstraction))
+    (|> set :representation (dictionary.update~ elem |0 (n/+ count)) :abstraction))
 
   (def: #export add/1
     (All [a] (-> a (Set a) (Set a)))
-    (add/* +1))
+    (add/* |1))
 
   (def: #export (remove/* count elem set)
     (All [a] (-> Nat a (Set a) (Set a)))
@@ -53,18 +53,18 @@
 
   (def: #export remove/1
     (All [a] (-> a (Set a) (Set a)))
-    (remove/* +1))
+    (remove/* |1))
 
   (def: #export (multiplicity elem set)
     (All [a] (-> a (Set a) Nat))
-    (|> set :representation (dictionary.get elem) (maybe.default +0)))
+    (|> set :representation (dictionary.get elem) (maybe.default |0)))
 
   (def: #export to-list
     (All [a] (-> (Set a) (List a)))
     (let [append (: (All [a] (-> a Nat (List a) (List a)))
                     (function (append elem count output)
                       (case count
-                        +0 output
+                        |0 output
                         _ (|> output (#.Cons elem) (append elem (dec count))))))]
       (|>> :representation
            dictionary.entries
@@ -105,7 +105,7 @@
                        (|> reference
                            :representation
                            (dictionary.get elem)
-                           (maybe.default +0)
+                           (maybe.default |0)
                            (n/>= count))))))
 
   (def: #export (support set)
@@ -124,7 +124,7 @@
                (list.every? (function (_ [elem count])
                               (|> sample
                                   (dictionary.get elem)
-                                  (maybe.default +0)
+                                  (maybe.default |0)
                                   (n/= count))))))))
 
   (structure: #export Hash<Set> (All [a] (Hash (Set a)))
@@ -134,17 +134,17 @@
       (let [[Hash<a> _] set]
         (list/fold (function (_ [elem count] acc)
                      (|> elem (:: Hash<a> hash) (n/* count) (n/+ acc)))
-                   +0
+                   |0
                    (dictionary.entries set)))))
   )
 
 (def: #export (member? set elem)
   (All [a] (-> (Set a) a Bit))
-  (|> set (..multiplicity elem) (n/> +0)))
+  (|> set (..multiplicity elem) (n/> |0)))
 
 (def: #export empty?
   (All [a] (-> (Set a) Bit))
-  (|>> ..size (n/= +0)))
+  (|>> ..size (n/= |0)))
 
 (def: #export (from-list Hash<a> subject)
   (All [a] (-> (Hash a) (List a) (Set a)))