- Re-organized dictionary & set modules a bit.

36 files changed, 39 insertions, 39 deletions

diff --git a/stdlib/source/lux/control/predicate.lux b/stdlib/source/lux/control/predicate.lux
index 56c048593..d7abc4139 100644
--- a/stdlib/source/lux/control/predicate.lux
+++ b/stdlib/source/lux/control/predicate.lux
@@ -1,7 +1,7 @@
 (.module:
   lux
   (lux (control [monoid #+ Monoid])
-       (data (coll (set ["set" unordered #+ Set])))
+       (data (coll [set #+ Set]))
        [function]))
 
 (type: #export (Predicate a)
diff --git a/stdlib/source/lux/data/coll/dictionary/unordered.lux b/stdlib/source/lux/data/coll/dictionary.lux
index e971228bb..e971228bb 100644
--- a/stdlib/source/lux/data/coll/dictionary/unordered.lux
+++ b/stdlib/source/lux/data/coll/dictionary.lux
diff --git a/stdlib/source/lux/data/coll/set/unordered.lux b/stdlib/source/lux/data/coll/set.lux
index ba5b1e8eb..929040ad0 100644
--- a/stdlib/source/lux/data/coll/set/unordered.lux
+++ b/stdlib/source/lux/data/coll/set.lux
@@ -2,7 +2,7 @@
   lux
   (lux (control [equivalence #+ Equivalence]
                 [hash #+ Hash])
-       (data (coll (dictionary ["dict" unordered #+ Dictionary])
+       (data (coll ["dict" dictionary #+ Dictionary]
                    [list "list/" Fold<List>]))
        (type abstract)))
 
diff --git a/stdlib/source/lux/data/format/context.lux b/stdlib/source/lux/data/format/context.lux
index 0eee7a061..f9874f6d2 100644
--- a/stdlib/source/lux/data/format/context.lux
+++ b/stdlib/source/lux/data/format/context.lux
@@ -4,7 +4,7 @@
                 ["ex" exception #+ exception:]
                 [monad #+ do])
        (data ["E" error]
-             (coll (dictionary ["dict" unordered #+ Dictionary])))))
+             (coll ["dict" dictionary #+ Dictionary]))))
 
 (exception: #export (unknown-property {property Text})
   property)
diff --git a/stdlib/source/lux/data/format/json.lux b/stdlib/source/lux/data/format/json.lux
index af6348fef..c3069c939 100644
--- a/stdlib/source/lux/data/format/json.lux
+++ b/stdlib/source/lux/data/format/json.lux
@@ -16,7 +16,7 @@
              [product]
              (coll [list "list/" Fold<List> Monad<List>]
                    [row #+ Row row "row/" Monad<Row>]
-                   (dictionary ["dict" unordered #+ Dictionary])))
+                   ["dict" dictionary #+ Dictionary]))
        [macro #+ Monad<Meta> with-gensyms]
        (macro ["s" syntax #+ syntax:]
               [code])))
diff --git a/stdlib/source/lux/data/format/xml.lux b/stdlib/source/lux/data/format/xml.lux
index 2edae8971..dd389c55b 100644
--- a/stdlib/source/lux/data/format/xml.lux
+++ b/stdlib/source/lux/data/format/xml.lux
@@ -13,7 +13,7 @@
              [maybe "m/" Monad<Maybe>]
              [ident "ident/" Equivalence<Ident> Codec<Text,Ident>]
              (coll [list "list/" Monad<List>]
-                   (dictionary ["d" unordered])))))
+                   ["d" dictionary]))))
 
 (type: #export Tag Ident)
 (type: #export Attrs (d.Dictionary Ident Text))
diff --git a/stdlib/source/lux/lang/compiler/analysis/case/coverage.lux b/stdlib/source/lux/lang/compiler/analysis/case/coverage.lux
index 20000a8e0..c76f98091 100644
--- a/stdlib/source/lux/lang/compiler/analysis/case/coverage.lux
+++ b/stdlib/source/lux/lang/compiler/analysis/case/coverage.lux
@@ -9,7 +9,7 @@
              [maybe]
              text/format
              (coll [list "list/" Fold<List>]
-                   (dictionary ["dict" unordered #+ Dictionary]))))
+                   ["dict" dictionary #+ Dictionary])))
   [//// "operation/" Monad<Operation>]
   [/// #+ Pattern Variant Operation])
 
diff --git a/stdlib/source/lux/lang/compiler/analysis/structure.lux b/stdlib/source/lux/lang/compiler/analysis/structure.lux
index 7307d6472..dd832fe47 100644
--- a/stdlib/source/lux/lang/compiler/analysis/structure.lux
+++ b/stdlib/source/lux/lang/compiler/analysis/structure.lux
@@ -7,7 +7,7 @@
              [product]
              [maybe]
              (coll [list "list/" Functor<List>]
-                   (dictionary ["dict" unordered #+ Dictionary]))
+                   ["dict" dictionary #+ Dictionary])
              text/format)
        [macro]
        (macro [code]))
diff --git a/stdlib/source/lux/lang/compiler/extension.lux b/stdlib/source/lux/lang/compiler/extension.lux
index 19f993163..ce01c16ae 100644
--- a/stdlib/source/lux/lang/compiler/extension.lux
+++ b/stdlib/source/lux/lang/compiler/extension.lux
@@ -4,7 +4,7 @@
                 ["ex" exception #+ exception:])
        (data [error #+ Error]
              [text]
-             (coll (dictionary ["dict" unordered #+ Dictionary]))))
+             (coll ["dict" dictionary #+ Dictionary])))
   [// #+ Operation Compiler])
 
 (type: #export (Extension i)
diff --git a/stdlib/source/lux/lang/compiler/extension/analysis.lux b/stdlib/source/lux/lang/compiler/extension/analysis.lux
index 9a28ff39f..b770e2f7e 100644
--- a/stdlib/source/lux/lang/compiler/extension/analysis.lux
+++ b/stdlib/source/lux/lang/compiler/extension/analysis.lux
@@ -2,7 +2,7 @@
   lux
   (lux (data [text]
              (coll [list "list/" Functor<List>]
-                   (dictionary ["dict" unordered #+ Dictionary]))))
+                   ["dict" dictionary #+ Dictionary])))
   [///analysis #+ Analysis State]
   [///synthesis #+ Synthesis]
   [//]
diff --git a/stdlib/source/lux/lang/compiler/extension/analysis/common.lux b/stdlib/source/lux/lang/compiler/extension/analysis/common.lux
index 71df4c678..1afbc13aa 100644
--- a/stdlib/source/lux/lang/compiler/extension/analysis/common.lux
+++ b/stdlib/source/lux/lang/compiler/extension/analysis/common.lux
@@ -8,7 +8,7 @@
              text/format
              (coll [list "list/" Functor<List>]
                    [array]
-                   (dictionary ["dict" unordered #+ Dictionary])))
+                   ["dict" dictionary #+ Dictionary]))
        [lang]
        (lang (type ["tc" check]))
        [io #+ IO])
diff --git a/stdlib/source/lux/lang/compiler/extension/analysis/host.jvm.lux b/stdlib/source/lux/lang/compiler/extension/analysis/host.jvm.lux
index ead713305..4316c4a53 100644
--- a/stdlib/source/lux/lang/compiler/extension/analysis/host.jvm.lux
+++ b/stdlib/source/lux/lang/compiler/extension/analysis/host.jvm.lux
@@ -12,7 +12,7 @@
                    ["l" lexer])
              (coll [list "list/" Fold<List> Functor<List> Monoid<List>]
                    [array]
-                   (dictionary ["dict" unordered #+ Dictionary])))
+                   ["dict" dictionary #+ Dictionary]))
        [macro "macro/" Monad<Meta>]
        (macro [code]
               ["s" syntax])
diff --git a/stdlib/source/lux/lang/compiler/extension/bundle.lux b/stdlib/source/lux/lang/compiler/extension/bundle.lux
index e68c391c6..e4f918ef3 100644
--- a/stdlib/source/lux/lang/compiler/extension/bundle.lux
+++ b/stdlib/source/lux/lang/compiler/extension/bundle.lux
@@ -5,7 +5,7 @@
        (data [text]
              text/format
              (coll [list "list/" Functor<List>]
-                   (dictionary ["dict" unordered #+ Dictionary]))))
+                   ["dict" dictionary #+ Dictionary])))
   [//])
 
 (exception: #export (incorrect-arity {name Text} {arity Nat} {args Nat})
diff --git a/stdlib/source/lux/lang/compiler/extension/synthesis.lux b/stdlib/source/lux/lang/compiler/extension/synthesis.lux
index ca20b0738..d06a2b144 100644
--- a/stdlib/source/lux/lang/compiler/extension/synthesis.lux
+++ b/stdlib/source/lux/lang/compiler/extension/synthesis.lux
@@ -1,7 +1,7 @@
 (.module:
   lux
   (lux (data [text]
-             (coll (dictionary ["dict" unordered #+ Dictionary]))))
+             (coll ["dict" dictionary #+ Dictionary])))
   [//])
 
 (def: #export defaults
diff --git a/stdlib/source/lux/lang/compiler/extension/translation.lux b/stdlib/source/lux/lang/compiler/extension/translation.lux
index 2063d5fb2..367288981 100644
--- a/stdlib/source/lux/lang/compiler/extension/translation.lux
+++ b/stdlib/source/lux/lang/compiler/extension/translation.lux
@@ -1,7 +1,7 @@
 (.module:
   lux
   (lux (data [text]
-             (coll (dictionary ["dict" unordered #+ Dictionary]))))
+             (coll ["dict" dictionary #+ Dictionary])))
   [//])
 
 (def: #export defaults
diff --git a/stdlib/source/lux/lang/compiler/meta/archive.lux b/stdlib/source/lux/lang/compiler/meta/archive.lux
index 09dfa211a..4a86055e8 100644
--- a/stdlib/source/lux/lang/compiler/meta/archive.lux
+++ b/stdlib/source/lux/lang/compiler/meta/archive.lux
@@ -7,7 +7,7 @@
              [ident]
              [text]
              text/format
-             (coll (dictionary ["dict" unordered #+ Dictionary])))
+             (coll ["dict" dictionary #+ Dictionary]))
        (lang [type #+ :share])
        (type abstract)
        (world [file #+ File]))
diff --git a/stdlib/source/lux/lang/compiler/meta/cache.lux b/stdlib/source/lux/lang/compiler/meta/cache.lux
index dc5dda4a8..54919feb8 100644
--- a/stdlib/source/lux/lang/compiler/meta/cache.lux
+++ b/stdlib/source/lux/lang/compiler/meta/cache.lux
@@ -11,8 +11,8 @@
              [text]
              text/format
              (coll [list "list/" Functor<List> Fold<List>]
-                   (dictionary ["dict" unordered #+ Dictionary])
-                   (set ["set" unordered #+ Set])))
+                   ["dict" dictionary #+ Dictionary]
+                   [set #+ Set]))
        (world [file #+ File System]))
   [//io #+ Context Module]
   [//io/context]
diff --git a/stdlib/source/lux/lang/compiler/meta/cache/dependency.lux b/stdlib/source/lux/lang/compiler/meta/cache/dependency.lux
index e6d94dc65..843644887 100644
--- a/stdlib/source/lux/lang/compiler/meta/cache/dependency.lux
+++ b/stdlib/source/lux/lang/compiler/meta/cache/dependency.lux
@@ -2,7 +2,7 @@
   [lux #- Module]
   (lux (data [text]
              (coll [list "list/" Functor<List> Fold<List>]
-                   (dictionary ["dict" unordered #+ Dictionary]))))
+                   ["dict" dictionary #+ Dictionary])))
   [///io #+ Module]
   [///archive #+ Archive])
 
diff --git a/stdlib/source/lux/lang/compiler/synthesis.lux b/stdlib/source/lux/lang/compiler/synthesis.lux
index bd23523e3..46f376adf 100644
--- a/stdlib/source/lux/lang/compiler/synthesis.lux
+++ b/stdlib/source/lux/lang/compiler/synthesis.lux
@@ -2,7 +2,7 @@
   [lux #- i64 Scope]
   (lux (control [monad #+ do])
        (data [error #+ Error]
-             (coll (dictionary ["dict" unordered #+ Dictionary]))))
+             (coll ["dict" dictionary #+ Dictionary])))
   [///reference #+ Register Variable Reference]
   [// #+ Operation Compiler]
   [//analysis #+ Environment Arity Analysis])
diff --git a/stdlib/source/lux/lang/compiler/synthesis/expression.lux b/stdlib/source/lux/lang/compiler/synthesis/expression.lux
index 81cc89b08..c9e3c577a 100644
--- a/stdlib/source/lux/lang/compiler/synthesis/expression.lux
+++ b/stdlib/source/lux/lang/compiler/synthesis/expression.lux
@@ -4,7 +4,7 @@
                 ["ex" exception #+ exception:])
        (data [maybe]
              (coll [list "list/" Functor<List>]
-                   (dictionary ["dict" unordered #+ Dictionary]))))
+                   ["dict" dictionary #+ Dictionary])))
   [///reference]
   [///compiler "operation/" Monad<Operation>]
   [///analysis #+ Analysis]
diff --git a/stdlib/source/lux/lang/compiler/synthesis/function.lux b/stdlib/source/lux/lang/compiler/synthesis/function.lux
index 5d31a947b..2d2fffbf8 100644
--- a/stdlib/source/lux/lang/compiler/synthesis/function.lux
+++ b/stdlib/source/lux/lang/compiler/synthesis/function.lux
@@ -7,7 +7,7 @@
        (data [maybe "maybe/" Monad<Maybe>]
              [error]
              (coll [list "list/" Functor<List> Monoid<List> Fold<List>]
-                   (dictionary ["dict" unordered #+ Dictionary]))))
+                   ["dict" dictionary #+ Dictionary])))
   [///reference #+ Variable]
   [///compiler #+ Operation]
   [///analysis #+ Environment Arity Analysis]
diff --git a/stdlib/source/lux/lang/compiler/translation.lux b/stdlib/source/lux/lang/compiler/translation.lux
index 80c606f30..1400cb446 100644
--- a/stdlib/source/lux/lang/compiler/translation.lux
+++ b/stdlib/source/lux/lang/compiler/translation.lux
@@ -7,7 +7,7 @@
              [text]
              text/format
              (coll [row #+ Row]
-                   (dictionary ["dict" unordered #+ Dictionary])))
+                   ["dict" dictionary #+ Dictionary]))
        (world [file #+ File]))
   [// #+ Operation Compiler]
   [//synthesis #+ Synthesis])
diff --git a/stdlib/source/lux/lang/compiler/translation/scheme/case.jvm.lux b/stdlib/source/lux/lang/compiler/translation/scheme/case.jvm.lux
index 0ee52c54b..70da9d5d8 100644
--- a/stdlib/source/lux/lang/compiler/translation/scheme/case.jvm.lux
+++ b/stdlib/source/lux/lang/compiler/translation/scheme/case.jvm.lux
@@ -6,7 +6,7 @@
              [text]
              text/format
              (coll [list "list/" Functor<List> Fold<List>]
-                   (set ["set" unordered #+ Set]))))
+                   [set #+ Set])))
   (///// [reference #+ Register]
          (host ["_" scheme #+ Expression Computation Var])
          [compiler #+ "operation/" Monad<Operation>]
diff --git a/stdlib/source/lux/lang/compiler/translation/scheme/extension.jvm.lux b/stdlib/source/lux/lang/compiler/translation/scheme/extension.jvm.lux
index 7170d29b7..c894053d2 100644
--- a/stdlib/source/lux/lang/compiler/translation/scheme/extension.jvm.lux
+++ b/stdlib/source/lux/lang/compiler/translation/scheme/extension.jvm.lux
@@ -4,7 +4,7 @@
                 ["ex" exception #+ exception:])
        (data [maybe]
              text/format
-             (coll (dictionary ["dict" unordered #+ Dictionary]))))
+             (coll ["dict" dictionary #+ Dictionary])))
   (///// [reference #+ Register Variable]
          (host ["_" scheme #+ Computation])
          [compiler "operation/" Monad<Operation>]
diff --git a/stdlib/source/lux/lang/compiler/translation/scheme/extension/common.jvm.lux b/stdlib/source/lux/lang/compiler/translation/scheme/extension/common.jvm.lux
index 044b75cac..e79b11c3b 100644
--- a/stdlib/source/lux/lang/compiler/translation/scheme/extension/common.jvm.lux
+++ b/stdlib/source/lux/lang/compiler/translation/scheme/extension/common.jvm.lux
@@ -8,7 +8,7 @@
              text/format
              [number #+ hex]
              (coll [list "list/" Functor<List>]
-                   (dictionary ["dict" unordered #+ Dictionary])))
+                   ["dict" dictionary #+ Dictionary]))
        [macro #+ with-gensyms]
        (macro [code]
               ["s" syntax #+ syntax:])
diff --git a/stdlib/source/lux/lang/syntax.lux b/stdlib/source/lux/lang/syntax.lux
index 6211edf8a..2822e5e31 100644
--- a/stdlib/source/lux/lang/syntax.lux
+++ b/stdlib/source/lux/lang/syntax.lux
@@ -37,7 +37,7 @@
              (text ["l" lexer]
                    format)
              (coll [row #+ Row]
-                   (dictionary ["dict" unordered #+ Dictionary])))))
+                   ["dict" dictionary #+ Dictionary]))))
 
 (type: #export Aliases (Dictionary Text Text))
 
diff --git a/stdlib/source/lux/lang/type/check.lux b/stdlib/source/lux/lang/type/check.lux
index ab1b6be1d..fa21654b7 100644
--- a/stdlib/source/lux/lang/type/check.lux
+++ b/stdlib/source/lux/lang/type/check.lux
@@ -9,7 +9,7 @@
              [maybe]
              [product]
              (coll [list]
-                   (set ["set" unordered #+ Set]))
+                   [set #+ Set])
              ["e" error])
        (lang [type "type/" Equivalence<Type>])
        ))
diff --git a/stdlib/source/lux/macro/poly.lux b/stdlib/source/lux/macro/poly.lux
index 0ed67fdf1..429a93bde 100644
--- a/stdlib/source/lux/macro/poly.lux
+++ b/stdlib/source/lux/macro/poly.lux
@@ -7,7 +7,7 @@
        [function]
        (data [text "text/" Monoid<Text>]
              (coll [list "list/" Fold<List> Monad<List> Monoid<List>]
-                   (dictionary ["dict" unordered #+ Dictionary]))
+                   ["dict" dictionary #+ Dictionary])
              [number "nat/" Codec<Text,Nat>]
              [product]
              [bool]
diff --git a/stdlib/source/lux/macro/poly/equivalence.lux b/stdlib/source/lux/macro/poly/equivalence.lux
index 44fd60ed5..f8e178700 100644
--- a/stdlib/source/lux/macro/poly/equivalence.lux
+++ b/stdlib/source/lux/macro/poly/equivalence.lux
@@ -9,8 +9,8 @@
                    [row]
                    [array]
                    [queue]
-                   (set ["set" unordered])
-                   (dictionary ["dict" unordered #+ Dictionary])
+                   [set]
+                   ["dict" dictionary #+ Dictionary]
                    (tree [rose]))
              [number "nat/" Codec<Text,Nat>]
              [product]
diff --git a/stdlib/source/lux/macro/poly/json.lux b/stdlib/source/lux/macro/poly/json.lux
index 1c198c1fe..8f7a1170e 100644
--- a/stdlib/source/lux/macro/poly/json.lux
+++ b/stdlib/source/lux/macro/poly/json.lux
@@ -16,7 +16,7 @@
              [product]
              (coll [list "list/" Fold<List> Monad<List>]
                    [row #+ Row row "row/" Monad<Row>]
-                   (dictionary ["d" unordered]))
+                   ["d" dictionary])
              (format ["//" json #+ JSON]))
        (time ## ["i" instant]
              ["du" duration]
diff --git a/stdlib/source/lux/math/logic/fuzzy.lux b/stdlib/source/lux/math/logic/fuzzy.lux
index 57f5978f3..9ee9b1685 100644
--- a/stdlib/source/lux/math/logic/fuzzy.lux
+++ b/stdlib/source/lux/math/logic/fuzzy.lux
@@ -2,7 +2,7 @@
   lux
   (lux (data [number "Rev/" Interval<Rev>]
              (coll [list]
-                   (set ["set" unordered #+ Set]))
+                   [set #+ Set])
              text/format)
        [math])
   (// ["&" continuous]))
diff --git a/stdlib/source/lux/math/random.lux b/stdlib/source/lux/math/random.lux
index 887e53a9f..218c9131b 100644
--- a/stdlib/source/lux/math/random.lux
+++ b/stdlib/source/lux/math/random.lux
@@ -14,9 +14,9 @@
                      ["c" complex])
              (coll [list "list/" Fold<List>]
                    [array]
-                   (dictionary ["dict" unordered #+ Dictionary])
+                   ["dict" dictionary #+ Dictionary]
                    [queue #+ Queue]
-                   (set ["set" unordered #+ Set])
+                   [set #+ Set]
                    [stack #+ Stack]
                    [row #+ Row]
                    (tree [finger #+ Tree])))
diff --git a/stdlib/source/lux/type/implicit.lux b/stdlib/source/lux/type/implicit.lux
index 85ebe33c3..aa0326b93 100644
--- a/stdlib/source/lux/type/implicit.lux
+++ b/stdlib/source/lux/type/implicit.lux
@@ -7,7 +7,7 @@
              text/format
              [number]
              (coll [list "list/" Monad<List> Fold<List>]
-                   (dictionary ["dict" unordered #+ Dictionary]))
+                   ["dict" dictionary #+ Dictionary])
              [bool]
              [product]
              [maybe])
diff --git a/stdlib/source/lux/type/object/interface.lux b/stdlib/source/lux/type/object/interface.lux
index e16a89f44..c2eca52ce 100644
--- a/stdlib/source/lux/type/object/interface.lux
+++ b/stdlib/source/lux/type/object/interface.lux
@@ -8,7 +8,7 @@
              [maybe]
              [ident #+ "ident/" Equivalence<Ident>]
              (coll [list "list/" Functor<List> Fold<List> Monoid<List>]
-                   (set ["set" unordered #+ Set])))
+                   [set #+ Set]))
        [macro #+ Monad<Meta> "meta/" Monad<Meta>]
        (macro [code]
               ["s" syntax #+ syntax:]
diff --git a/stdlib/source/lux/type/resource.lux b/stdlib/source/lux/type/resource.lux
index 60eeef73b..cf2650f74 100644
--- a/stdlib/source/lux/type/resource.lux
+++ b/stdlib/source/lux/type/resource.lux
@@ -9,8 +9,8 @@
              [product]
              [number]
              text/format
-             (coll (dictionary ["dict" unordered #+ Dictionary])
-                   (set ["set" unordered])
+             (coll ["dict" dictionary #+ Dictionary]
+                   [set]
                    [row #+ Row]
                    [list "list/" Functor<List> Fold<List>]))
        (concurrency [promise #+ Promise])
diff --git a/stdlib/source/lux/world/env.jvm.lux b/stdlib/source/lux/world/env.jvm.lux
index e2511416e..39c5f9472 100644
--- a/stdlib/source/lux/world/env.jvm.lux
+++ b/stdlib/source/lux/world/env.jvm.lux
@@ -2,7 +2,7 @@
   lux
   (lux (data [text]
              (format [context #+ Context])
-             (coll (dictionary ["dict" unordered])))
+             (coll ["dict" dictionary]))
        [io #- run]
        [host]))