Extensible import syntax [Part 6]

author: Eduardo Julian 2022-06-04 02:28:47 -0400
committer: Eduardo Julian 2022-06-04 02:28:47 -0400
commit: 56d2835d35093e2d92c5e8a4371aa322b55e037b (patch)
tree: 1c7949355baeae92e2f6e02f9104739ddb10ff73 /stdlib/source
parent: f2172051a91bbb2578918dc784a053a321849b63 (diff)
515 files changed, 1329 insertions, 1260 deletions
diff --git a/stdlib/source/documentation/lux.lux b/stdlib/source/documentation/lux.lux
index 861c20087..8969f1dcd 100644
--- a/stdlib/source/documentation/lux.lux
+++ b/stdlib/source/documentation/lux.lux
@@ -599,11 +599,11 @@
       ["M" monad (.except)]]
      [data
       maybe
-      ["[0]" name ("[1]#[0]" codec)]]
+      ["[0]" name (.open: "[1]#[0]" codec)]]
      [macro
       code]]
     [//
-     [type ("[0]" equivalence)]])])
+     [type (.open: "[0]" equivalence)]])])
 
 (documentation: /.#
   "Allows accessing the value of a implementation's member."
diff --git a/stdlib/source/documentation/lux/math/logic.lux b/stdlib/source/documentation/lux/math/logic.lux
index ea6a28f65..5b26c20b7 100644
--- a/stdlib/source/documentation/lux/math/logic.lux
+++ b/stdlib/source/documentation/lux/math/logic.lux
@@ -6,7 +6,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monoid)]]]]]
+     ["[0]" list (.open: "[1]#[0]" monoid)]]]]]
  ["[0]" /
   ["[1][0]" continuous]
   ["[1][0]" fuzzy]])
diff --git a/stdlib/source/documentation/lux/world.lux b/stdlib/source/documentation/lux/world.lux
index 051f8efff..afbd6447b 100644
--- a/stdlib/source/documentation/lux/world.lux
+++ b/stdlib/source/documentation/lux/world.lux
@@ -8,7 +8,7 @@
     ["[0]" io]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" monoid)]]]]]
+     ["[0]" list (.open: "[1]#[0]" monoid)]]]]]
  ["[0]" /
   ["[1][0]" console]
   ["[1][0]" file]
diff --git a/stdlib/source/library/lux.lux b/stdlib/source/library/lux.lux
index 633ec16ce..13ff44b45 100644
--- a/stdlib/source/library/lux.lux
+++ b/stdlib/source/library/lux.lux
@@ -2027,7 +2027,7 @@
          (-> Symbol ($' Meta Symbol))
          ({["" name]
            (do meta_monad
-             [module_name current_module_name]
+             [module_name ..current_module_name]
              (in [module_name name]))
 
            _
@@ -2559,6 +2559,40 @@
          _
          {#None}))
 
+(def:' .private (inP it tokens)
+       (All (_ a)
+         (-> a (Parser a)))
+       {#Some [tokens it]})
+
+(def:' .private (orP leftP rightP tokens)
+       (All (_ l r)
+         (-> (Parser l)
+             (Parser r)
+             (Parser (Or l r))))
+       (case (leftP tokens)
+         {#Some [tokens left]}
+         {#Some [tokens {#Left left}]}
+
+         _
+         (case (rightP tokens)
+           {#Some [tokens right]}
+           {#Some [tokens {#Right right}]}
+
+           _
+           {#None})))
+
+(def:' .private (eitherP leftP rightP tokens)
+       (All (_ a)
+         (-> (Parser a)
+             (Parser a)
+             (Parser a)))
+       (case (leftP tokens)
+         {#None}
+         (rightP tokens)
+
+         it
+         it))
+
 (def:' .private (andP leftP rightP tokens)
        (All (_ l r)
          (-> (Parser l)
@@ -2571,6 +2605,16 @@
           .let [[tokens right] right]]
          (in [tokens [left right]])))
 
+(def:' .private (afterP leftP rightP tokens)
+       (All (_ l r)
+         (-> (Parser l)
+             (Parser r)
+             (Parser r)))
+       (do maybe_monad
+         [left (leftP tokens)
+          .let [[tokens left] left]]
+         (rightP tokens)))
+
 (def:' .private (someP itP tokens)
        (All (_ a)
          (-> (Parser a)
@@ -2585,6 +2629,17 @@
          {#None}
          {#Some [tokens (list)]}))
 
+(def:' .private (manyP itP tokens)
+       (All (_ a)
+         (-> (Parser a)
+             (Parser (List a))))
+       (do maybe_monad
+         [it (itP tokens)
+          .let [[tokens head] it]
+          it (someP itP tokens)
+          .let [[tokens tail] it]]
+         (in [tokens (partial_list head tail)])))
+
 (def:' .private (maybeP itP tokens)
        (All (_ a)
          (-> (Parser a)
@@ -2600,9 +2655,21 @@
        (All (_ a)
          (-> (Parser a) (Parser a)))
        (case tokens
-         (pattern (partial_list [_ {#Tuple tuple}] tokens'))
+         (pattern (partial_list [_ {#Tuple input}] tokens'))
          (do maybe_monad
-           [it (parsed itP tuple)]
+           [it (parsed itP input)]
+           (in [tokens' it]))
+
+         _
+         {#None}))
+
+(def:' .private (formP itP tokens)
+       (All (_ a)
+         (-> (Parser a) (Parser a)))
+       (case tokens
+         (pattern (partial_list [_ {#Form input}] tokens'))
+         (do maybe_monad
+           [it (parsed itP input)]
            (in [tokens' it]))
 
          _
@@ -2618,10 +2685,10 @@
          {#None}))
 
 (def:' .private (endP tokens)
-       (-> (List Code) (Maybe Any))
+       (Parser Any)
        (case tokens
          (pattern (list))
-         {#Some []}
+         {#Some [tokens []]}
 
          _
          {#None}))
@@ -2644,6 +2711,15 @@
          _
          {#None}))
 
+(def:' .private (globalP tokens)
+       (-> (List Code) (Maybe [(List Code) Symbol]))
+       (case tokens
+         (pattern (partial_list [_ {#Symbol it}] tokens'))
+         {#Some [tokens' it]}
+
+         _
+         {#None}))
+
 (template [<parser> <item_type> <item_parser>]
   [(def:' .private (<parser> tokens)
           (-> (List Code) (Maybe (List <item_type>)))
@@ -3375,24 +3451,14 @@
     {#None}
     (failure "Wrong syntax for type:")))
 
-(type: Referrals
-  (Variant
-   {#Nothing}
-   {#Referral [Symbol (List Code)]}))
-
-(type: Openings
-  [Text (List Text)])
-
-(type: Refer
-  (Record
-   [#refer_defs Referrals
-    #refer_open (List Openings)]))
+(type: Referral
+  [Symbol (List Code)])
 
 (type: Importation
   (Record
    [#import_name Text
     #import_alias (Maybe Text)
-    #import_refer Refer]))
+    #import_referrals (List Referral)]))
 
 ... TODO: Allow asking the compiler for the name of the definition
 ... currently being defined. That name can then be fed into
@@ -3411,47 +3477,19 @@
     _
     (failure (..wrong_syntax_error [..prelude_module "symbol"]))))
 
-(def: (referrals_parser aliased? tokens)
-  (-> Bit (List Code) (Meta [Referrals (List Code)]))
-  (case tokens
-    (pattern (partial_list [_ {#Form (partial_list [_ {#Symbol macro}] defs)}] tokens'))
-    (meta#in [{#Referral [macro defs]}
-              tokens'])
-
-    (pattern (list))
-    (meta#in [(if aliased?
-                {#Referral [(symbol ..only) (list)]}
-                {#Nothing})
-              (list)])
-
-    _
-    (meta#in [{#Nothing}
-              tokens])))
+(def: referral_parser
+  (Parser Referral)
+  (formP (andP globalP (someP anyP))))
 
-(def: (openings_parser parts)
-  (-> (List Code) (Meta [(List Openings) (List Code)]))
-  (case parts
-    {#End}
-    (meta#in [{#End} {#End}])
-
-    (pattern (partial_list [_ {#Form (partial_list [_ {#Text prefix}] structs)}] parts'))
-    (do meta_monad
-      [structs' (monad#each meta_monad
-                            (function (_ struct)
-                              (case struct
-                                [_ {#Symbol ["" struct_name]}]
-                                (meta#in struct_name)
-
-                                _
-                                (failure "Expected all implementations of opening form to be symbols.")))
-                            structs)
-       next+remainder (openings_parser parts')]
-      (let [[next remainder] next+remainder]
-        (meta#in [{#Item [prefix structs'] next}
-                  remainder])))
-
-    _
-    (meta#in [{#End} parts])))
+(def: (referrals_parser aliased?)
+  (-> Bit (Parser (List Referral)))
+  (all eitherP
+       (manyP referral_parser)
+       (afterP endP
+               (inP (if aliased?
+                      (list [(symbol ..only) (list)])
+                      (list))))
+       (inP (list))))
 
 (def: (text#split_at' at x)
   (-> Nat Text [Text Text])
@@ -3582,20 +3620,22 @@
 
                                                             {#None}
                                                             (..absolute_module_name nested? relative_root module_name))
-                                     referral+extra (referrals_parser #0 extra)
-                                     .let [[referral extra] referral+extra]
-                                     openings+extra (openings_parser extra)
-                                     .let [[openings extra] openings+extra]
+                                     extra,referral (case (referrals_parser #0 extra)
+                                                      {#Some extra,referral}
+                                                      (in extra,referral)
+
+                                                      {#None}
+                                                      (failure ""))
+                                     .let [[extra referral] extra,referral]
                                      sub_imports (imports_parser #1 absolute_module_name context extra)]
-                                    (in (case [referral openings]
-                                          [{#Nothing} {#End}]
+                                    (in (case referral
+                                          {#End}
                                           sub_imports
                                           
                                           _
                                           (partial_list [#import_name absolute_module_name
                                                          #import_alias {#None}
-                                                         #import_refer [#refer_defs referral
-                                                                        #refer_open openings]]
+                                                         #import_referrals referral]
                                                         sub_imports))))
 
                                   (pattern [_ {#Tuple (partial_list [_ {#Text alias}] [_ {#Symbol ["" module_name]}] extra)}])
@@ -3606,21 +3646,23 @@
 
                                                             {#None}
                                                             (..absolute_module_name nested? relative_root module_name))
-                                     referral+extra (referrals_parser #1 extra)
-                                     .let [[referral extra] referral+extra]
-                                     openings+extra (openings_parser extra)
-                                     .let [[openings extra] openings+extra
-                                           module_alias (..module_alias {#Item module_name context} alias)]
+                                     extra,referral (case (referrals_parser #1 extra)
+                                                      {#Some extra,referral}
+                                                      (in extra,referral)
+
+                                                      {#None}
+                                                      (failure ""))
+                                     .let [[extra referral] extra,referral]
+                                     .let [module_alias (..module_alias {#Item module_name context} alias)]
                                      sub_imports (imports_parser #1 absolute_module_name {#Item module_alias context} extra)]
-                                    (in (case [referral openings]
-                                          [{#Nothing} {#End}]
+                                    (in (case referral
+                                          {#End}
                                           sub_imports
                                           
                                           _
                                           (partial_list [#import_name absolute_module_name
                                                          #import_alias {#Some module_alias}
-                                                         #import_refer [#refer_defs referral
-                                                                        #refer_open openings]]
+                                                         #import_referrals referral]
                                                         sub_imports))))
 
                                   ... Unrecognized syntax.
@@ -3724,9 +3766,10 @@
   (case (..parsed (all ..andP
                        ..textP
                        ..textP
+                       ..textP
                        (..someP ..localP))
                   tokens)
-    {.#Some [current_module imported_module actual]}
+    {.#Some [current_module imported_module import_alias actual]}
     (do meta_monad
       [expected (exported_definitions imported_module)
        _ (test_referrals current_module imported_module expected actual)]
@@ -3751,9 +3794,10 @@
   (case (..parsed (all ..andP
                        ..textP
                        ..textP
+                       ..textP
                        (..someP ..localP))
                   tokens)
-    {.#Some [current_module imported_module actual]}
+    {.#Some [current_module imported_module import_alias actual]}
     (do meta_monad
       [expected (exported_definitions imported_module)
        _ (test_referrals current_module imported_module expected actual)]
@@ -4059,8 +4103,8 @@
     _
     (failure "Wrong syntax for the")))
 
-(def: (open_declaration alias tags my_tag_index [module short] source type)
-  (-> Text (List Symbol) Nat Symbol Code Type (Meta (List Code)))
+(def: (open_declaration imported_module alias tags my_tag_index [module short] source type)
+  (-> Text Text (List Symbol) Nat Symbol Code Type (Meta (List Code)))
   (do meta_monad
     [output (record_slots type)
      g!_ (..generated_symbol "g!_")
@@ -4079,44 +4123,100 @@
         [decls' (monad#each meta_monad
                             (is (-> [Nat Symbol Type] (Meta (List Code)))
                                 (function (_ [sub_tag_index sname stype])
-                                  (open_declaration alias tags' sub_tag_index sname source+ stype)))
+                                  (open_declaration imported_module alias tags' sub_tag_index sname source+ stype)))
                             (enumeration (zipped_2 tags' members')))]
-        (meta#in (list#conjoint decls')))
+        (in (list#conjoint decls')))
 
       _
-      (meta#in (list (` ("lux def" (~ (local$ (..module_alias (list short) alias)))
-                         (~ source+)
-                         #0)))))))
+      (in (list (` ("lux def" (~ (local$ (..module_alias (list short imported_module) alias)))
+                    (~ source+)
+                    #0)))))))
 
-(macro: .public (open: tokens)
-  (case tokens
-    (pattern (list [_ {#Text alias}] struct))
-    (case struct
-      [_ {#Symbol struct_name}]
+(def: (implementation_declarations imported_module alias implementation)
+  (-> Text Text Symbol (Meta (List Code)))
+  (do meta_monad
+    [interface (type_definition implementation)
+     output (record_slots interface)]
+    (case output
+      {#Some [slots terms]}
       (do meta_monad
-        [struct_type (type_definition struct_name)
-         output (record_slots struct_type)
-         .let [source (symbol$ struct_name)]]
-        (case output
-          {#Some [tags members]}
-          (do meta_monad
-            [decls' (monad#each meta_monad (is (-> [Nat Symbol Type] (Meta (List Code)))
-                                               (function (_ [tag_index sname stype])
-                                                 (open_declaration alias tags tag_index sname source stype)))
-                                (enumeration (zipped_2 tags members)))]
-            (meta#in (list#conjoint decls')))
-
-          _
-          (failure (text#composite "Can only 'open:' structs: " (type#encoded struct_type)))))
+        [.let [g!implementation (symbol$ implementation)]
+         declarations (monad#each meta_monad (is (-> [Nat Symbol Type] (Meta (List Code)))
+                                                 (function (_ [index slot_label slot_type])
+                                                   (open_declaration imported_module alias slots index slot_label g!implementation slot_type)))
+                                  (enumeration (zipped_2 slots terms)))]
+        (in (list#conjoint declarations)))
 
       _
-      (do meta_monad
-        [g!struct (..generated_symbol "struct")]
-        (meta#in (list (` ("lux def" (~ g!struct) (~ struct) #0))
-                       (` (..open: (~ (text$ alias)) (~ g!struct)))))))
+      (failure (all text#composite
+                    "Can only 'open:' structs: " (symbol#encoded implementation)
+                    " : " (type#encoded interface))))))
+
+(def: (localized module global)
+  (-> Text Symbol Symbol)
+  (case global
+    ["" local]
+    [module local]
 
     _
-    (failure "Wrong syntax for open:")))
+    global))
+
+(macro: .public (open: tokens)
+  (case (..parsed (all ..andP
+                       (..maybeP (all ..andP
+                                      ..textP
+                                      ..textP
+                                      ..textP))
+                       ..textP
+                       (..orP (..manyP ..globalP)
+                              (..manyP ..anyP)))
+                  tokens)
+    {.#Some [current_module,imported_module,import_alias alias implementations]}
+    (let [[current_module imported_module import_alias]
+          (case current_module,imported_module,import_alias
+            {#Some [current_module imported_module import_alias]}
+            [current_module imported_module import_alias]
+            
+            {#None}
+            ["" "" ""])]
+      (case implementations
+        {#Left implementations}
+        (do meta_monad
+          [declarations (|> implementations
+                            (list#each (localized imported_module))
+                            (monad#each meta_monad (implementation_declarations import_alias alias)))]
+          (in (list#conjoint declarations)))
+        
+        {#Right implementations}
+        (do meta_monad
+          [pre_defs,implementations (is (Meta [(List Code) (List Code)])
+                                        (monad#mix meta_monad
+                                                   (function (_ it [pre_defs implementations])
+                                                     (case it
+                                                       [_ {#Symbol _}]
+                                                       (in [pre_defs
+                                                            {#Item it implementations}])
+                                                       
+                                                       _
+                                                       (do meta_monad
+                                                         [g!implementation (..generated_symbol "implementation")]
+                                                         (in [{#Item (` ("lux def" (~ g!implementation) (~ it) #0)) pre_defs}
+                                                              {#Item g!implementation implementations}]))))
+                                                   [(list) (list)]
+                                                   implementations))
+           .let [[pre_defs implementations] pre_defs,implementations]]
+          (in (|> pre_defs
+                  {#Item (` (..open:
+                              (~ (text$ current_module))
+                              (~ (text$ imported_module))
+                              (~ (text$ import_alias))
+                              (~ (text$ alias))
+                              (~+ implementations)))}
+                  list#reversed)))))
+    
+
+    {.#None}
+    (failure (..wrong_syntax_error (symbol ..open:)))))
 
 (def: (imported_by? import_name module_name)
   (-> Text Text (Meta Bit))
@@ -4125,85 +4225,45 @@
      .let [[..#module_hash _ ..#module_aliases _ ..#definitions _ ..#imports imports ..#module_state _] module]]
     (in (is_member? imports import_name))))
 
-(def: (referrals module_name options)
-  (-> Text (List Code) (Meta Refer))
+(def: (referrals module_name extra)
+  (-> Text (List Code) (Meta (List Referral)))
   (do meta_monad
-    [referral+options (referrals_parser #0 options)
-     .let [[referral options] referral+options]
-     openings+options (openings_parser options)
-     .let [[openings options] openings+options]
+    [extra,referral (case (referrals_parser #0 extra)
+                      {#Some extra,referral}
+                      (in extra,referral)
+
+                      {#None}
+                      (failure ""))
+     .let [[extra referral] extra,referral]
      current_module current_module_name]
-    (case options
+    (case extra
       {#End}
-      (in [#refer_defs referral
-           #refer_open openings])
+      (in referral)
 
       _
       (failure (all text#composite "Wrong syntax for refer @ " current_module
-                    \n (|> options
+                    \n (|> extra
                            (list#each code#encoded)
                            (list#interposed " ")
                            (list#mix text#composite "")))))))
 
-(def: (referral_definitions module_name [r_defs r_opens])
-  (-> Text Refer (Meta (List Code)))
-  (do meta_monad
-    [current_module ..current_module_name
-     .let [test_referrals (is (-> Text (List Text) (List Text) (Meta (List Any)))
-                              (function (_ module_name all_defs referred_defs)
-                                (monad#each meta_monad
-                                            (is (-> Text (Meta Any))
-                                                (function (_ _def)
-                                                  (if (is_member? all_defs _def)
-                                                    (meta#in [])
-                                                    (failure (all text#composite _def " is not defined in module " module_name " @ " current_module)))))
-                                            referred_defs)))]
-     defs (case r_defs
-            {#Nothing}
-            (in (list))
-
-            {#Referral [macro parameters]}
-            (single_expansion (` ((~ (symbol$ macro))
-                                  (~ (text$ current_module))
-                                  (~ (text$ module_name))
-                                  (~+ parameters)))))
-     .let [openings (|> r_opens
-                        (list#each (is (-> Openings (List Code))
-                                       (function (_ [alias structs])
-                                         (list#each (function (_ name)
-                                                      (` (open: (~ (text$ alias)) (~ (symbol$ [module_name name])))))
-                                                    structs))))
-                        list#conjoint)]]
-    (in (list#composite defs openings))))
-
 (macro: (refer tokens)
   (case tokens
-    (pattern (partial_list [_ {#Text module_name}] options))
+    (pattern (partial_list [_ {#Text imported_module}] [_ {#Text alias}] options))
     (do meta_monad
-      [=refer (referrals module_name options)]
-      (referral_definitions module_name =refer))
+      [referrals (..referrals imported_module options)
+       current_module ..current_module_name]
+      (in (list#each (function (_ [macro parameters])
+                       (` ((~ (symbol$ macro))
+                           (~ (text$ current_module))
+                           (~ (text$ imported_module))
+                           (~ (text$ alias))
+                           (~+ parameters))))
+                     referrals)))
 
     _
     (failure "Wrong syntax for refer")))
 
-(def: (refer_code module_name module_alias' [r_defs r_opens])
-  (-> Text (Maybe Text) Refer Code)
-  (let [module_alias (..maybe#else module_name module_alias')
-        localizations (is (List Code)
-                          (case r_defs
-                            {#Nothing}
-                            (list)
-
-                            {#Referral [macro parameters]}
-                            (list (` ((~ (symbol$ macro)) (~+ parameters))))))
-        openings (list#each (function (_ [alias structs])
-                              (form$ (partial_list (text$ (..module_alias (list (alias_stand_in 0) module_alias) alias))
-                                                   (list#each local$ structs))))
-                            r_opens)]
-    (` ((~! ..refer) (~ (text$ module_name))
-        (~+ localizations)
-        (~+ openings)))))
-
 (macro: .public (# tokens)
   (case tokens
     (pattern (list struct [_ {#Symbol member}]))
@@ -4891,6 +4951,15 @@
                         (failure (..wrong_syntax_error (symbol ..$))))))
      (these (def: .public parameter "")))
 
+(def: (refer_code imported_module alias referrals)
+  (-> Text Text (List Referral) Code)
+  (` ((~! ..refer)
+      (~ (text$ imported_module))
+      (~ (text$ alias))
+      (~+ (list#each (function (_ [macro parameters])
+                       (` ((~ (symbol$ macro)) (~+ parameters))))
+                     referrals)))))
+
 (macro: .public (using _imports)
   (do meta_monad
     [current_module ..current_module_name
@@ -4902,7 +4971,7 @@
                         tuple$)
            =refers (list#each (is (-> Importation Code)
                                   (function (_ [module_name m_alias =refer])
-                                    (refer_code module_name m_alias =refer)))
+                                    (refer_code module_name (..maybe#else "" m_alias) =refer)))
                               imports)
            =module (` ("lux def module" (~ =imports)))]
      g!_ (..generated_symbol "")]
diff --git a/stdlib/source/library/lux/abstract/comonad.lux b/stdlib/source/library/lux/abstract/comonad.lux
index 2660ba081..5bb928e6a 100644
--- a/stdlib/source/library/lux/abstract/comonad.lux
+++ b/stdlib/source/library/lux/abstract/comonad.lux
@@ -3,7 +3,7 @@
   [lux (.except)
    [data
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/library/lux/abstract/monad/indexed.lux b/stdlib/source/library/lux/abstract/monad/indexed.lux
index ad28a2649..0894b4021 100644
--- a/stdlib/source/library/lux/abstract/monad/indexed.lux
+++ b/stdlib/source/library/lux/abstract/monad/indexed.lux
@@ -6,7 +6,7 @@
      ["<[0]>" code (.only Parser)]]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
     ["[0]" code]]]]
diff --git a/stdlib/source/library/lux/control/concatenative.lux b/stdlib/source/library/lux/control/concatenative.lux
index e53790026..a10e6e906 100644
--- a/stdlib/source/library/lux/control/concatenative.lux
+++ b/stdlib/source/library/lux/control/concatenative.lux
@@ -5,12 +5,12 @@
    [abstract
     ["[0]" monad]]
    [control
-    ["[0]" maybe ("[1]#[0]" monad)]]
+    ["[0]" maybe (.open: "[1]#[0]" monad)]]
    [data
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" mix functor)]]]
+     ["[0]" list (.open: "[1]#[0]" mix functor)]]]
    ["[0]" macro (.only with_symbols)
     ["[0]" code]
     ["[0]" template]
@@ -23,7 +23,7 @@
      ["r" rev]
      ["f" frac]]]]]
  [//
-  ["<>" parser ("[1]#[0]" monad)
+  ["<>" parser (.open: "[1]#[0]" monad)
    ["<[0]>" code (.only Parser)]]])
 
 (type: Alias
diff --git a/stdlib/source/library/lux/control/concurrency/actor.lux b/stdlib/source/library/lux/control/concurrency/actor.lux
index 17d986c44..b1d80473c 100644
--- a/stdlib/source/library/lux/control/concurrency/actor.lux
+++ b/stdlib/source/library/lux/control/concurrency/actor.lux
@@ -10,7 +10,7 @@
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]
     ["[0]" io (.only IO io)]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" bit]
@@ -18,7 +18,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monoid monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid monad)]]]
    ["[0]" macro (.only with_symbols)
     ["[0]" code]
     [syntax (.only syntax:)
@@ -32,7 +32,7 @@
     ["[0]" primitive (.only primitive: representation abstraction)]]]]
  [//
   ["[0]" atom (.only Atom atom)]
-  ["[0]" async (.only Async Resolver) ("[1]#[0]" monad)]
+  ["[0]" async (.only Async Resolver) (.open: "[1]#[0]" monad)]
   ["[0]" frp (.only Channel Channel')]])
 
 (exception: .public poisoned)
diff --git a/stdlib/source/library/lux/control/concurrency/async.lux b/stdlib/source/library/lux/control/concurrency/async.lux
index 430637d8b..6fff72d48 100644
--- a/stdlib/source/library/lux/control/concurrency/async.lux
+++ b/stdlib/source/library/lux/control/concurrency/async.lux
@@ -9,7 +9,7 @@
     ["[0]" pipe]
     ["[0]" function]
     ["[0]" io (.only IO io)]
-    ["[0]" maybe ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]]
    [data
     ["[0]" product]]
    [macro
diff --git a/stdlib/source/library/lux/control/concurrency/atom.lux b/stdlib/source/library/lux/control/concurrency/atom.lux
index da13c860d..ba861725f 100644
--- a/stdlib/source/library/lux/control/concurrency/atom.lux
+++ b/stdlib/source/library/lux/control/concurrency/atom.lux
@@ -7,7 +7,7 @@
     [monad (.only do)]]
    [control
     ["[0]" function]
-    ["[0]" io (.only IO) ("[1]#[0]" functor)]]
+    ["[0]" io (.only IO) (.open: "[1]#[0]" functor)]]
    [data
     ["[0]" product]
     [collection
diff --git a/stdlib/source/library/lux/control/concurrency/frp.lux b/stdlib/source/library/lux/control/concurrency/frp.lux
index a4b99b6f4..252b8f0ce 100644
--- a/stdlib/source/library/lux/control/concurrency/frp.lux
+++ b/stdlib/source/library/lux/control/concurrency/frp.lux
@@ -7,7 +7,7 @@
     [apply (.only Apply)]
     ["[0]" monad (.only Monad do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]
     ["[0]" io (.only IO io)]]
@@ -15,7 +15,7 @@
     ["[0]" variance (.only Mutable)]]]]
  [//
   ["[0]" atom (.only Atom)]
-  ["[0]" async (.only Async Async') ("[1]#[0]" monad)]])
+  ["[0]" async (.only Async Async') (.open: "[1]#[0]" monad)]])
 
 (type: .public (Channel'' a)
   (Async (Maybe [a (Channel'' a)])))
diff --git a/stdlib/source/library/lux/control/exception.lux b/stdlib/source/library/lux/control/exception.lux
index 34bdd22c2..7aed1de63 100644
--- a/stdlib/source/library/lux/control/exception.lux
+++ b/stdlib/source/library/lux/control/exception.lux
@@ -7,13 +7,13 @@
     [monad (.only do)]]
    [control
     ["[0]" maybe]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" monoid)]
+    ["[0]" text (.open: "[1]#[0]" monoid)]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["[0]" code]
     [syntax (.only syntax:)
@@ -22,7 +22,7 @@
       ["|[1]_[0]|" variable]]]]
    [math
     [number
-     ["n" nat ("[1]#[0]" decimal)]]]]]
+     ["n" nat (.open: "[1]#[0]" decimal)]]]]]
  [//
   ["//" try (.only Try)]])
 
diff --git a/stdlib/source/library/lux/control/function/inline.lux b/stdlib/source/library/lux/control/function/inline.lux
index 38e1c795f..ac13d65df 100644
--- a/stdlib/source/library/lux/control/function/inline.lux
+++ b/stdlib/source/library/lux/control/function/inline.lux
@@ -9,7 +9,7 @@
      ["<[0]>" code (.only Parser)]]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monad)]]]
    ["[0]" macro (.only)
     ["[0]" code]
     [syntax (.only syntax:)
diff --git a/stdlib/source/library/lux/control/function/mutual.lux b/stdlib/source/library/lux/control/function/mutual.lux
index 65b8b9a6b..03ea12a04 100644
--- a/stdlib/source/library/lux/control/function/mutual.lux
+++ b/stdlib/source/library/lux/control/function/mutual.lux
@@ -7,14 +7,14 @@
    [control
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      [dictionary
       ["[0]" plist (.only PList)]]]]
    ["[0]" macro (.only)
diff --git a/stdlib/source/library/lux/control/parser.lux b/stdlib/source/library/lux/control/parser.lux
index 052f89a98..c842910c7 100644
--- a/stdlib/source/library/lux/control/parser.lux
+++ b/stdlib/source/library/lux/control/parser.lux
@@ -11,7 +11,7 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" functor monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
    [math
     [number
      ["n" nat]]]]])
diff --git a/stdlib/source/library/lux/control/parser/analysis.lux b/stdlib/source/library/lux/control/parser/analysis.lux
index d6fb20e2b..60b8edb63 100644
--- a/stdlib/source/library/lux/control/parser/analysis.lux
+++ b/stdlib/source/library/lux/control/parser/analysis.lux
@@ -11,7 +11,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
     ["[0]" template]]
    [math
diff --git a/stdlib/source/library/lux/control/parser/binary.lux b/stdlib/source/library/lux/control/parser/binary.lux
index e566a58a5..f9871b53b 100644
--- a/stdlib/source/library/lux/control/parser/binary.lux
+++ b/stdlib/source/library/lux/control/parser/binary.lux
@@ -29,7 +29,7 @@
     [number
      ["n" nat]
      ["[0]" frac]]]]]
- ["[0]" // ("[1]#[0]" monad)])
+ ["[0]" // (.open: "[1]#[0]" monad)])
 
 (type: .public Offset
   Nat)
diff --git a/stdlib/source/library/lux/control/parser/cli.lux b/stdlib/source/library/lux/control/parser/cli.lux
index 31ff5bef0..74b184d05 100644
--- a/stdlib/source/library/lux/control/parser/cli.lux
+++ b/stdlib/source/library/lux/control/parser/cli.lux
@@ -6,7 +6,7 @@
    [control
     ["[0]" try (.only Try)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]]]
  ["[0]" //])
 
diff --git a/stdlib/source/library/lux/control/parser/code.lux b/stdlib/source/library/lux/control/parser/code.lux
index 4ab009d74..8ac364a2a 100644
--- a/stdlib/source/library/lux/control/parser/code.lux
+++ b/stdlib/source/library/lux/control/parser/code.lux
@@ -7,11 +7,11 @@
     ["[0]" try (.only Try)]]
    [data
     ["[0]" bit]
-    ["[0]" text ("[1]#[0]" monoid)]
+    ["[0]" text (.open: "[1]#[0]" monoid)]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
-    ["[0]" code ("[1]#[0]" equivalence)]]
+    ["[0]" code (.open: "[1]#[0]" equivalence)]]
    [math
     [number
      ["[0]" nat]
diff --git a/stdlib/source/library/lux/control/parser/json.lux b/stdlib/source/library/lux/control/parser/json.lux
index 874833004..61bad3146 100644
--- a/stdlib/source/library/lux/control/parser/json.lux
+++ b/stdlib/source/library/lux/control/parser/json.lux
@@ -8,9 +8,9 @@
     ["[0]" exception (.only exception:)]]
    [data
     ["[0]" bit]
-    ["[0]" text ("[1]#[0]" equivalence monoid)]
+    ["[0]" text (.open: "[1]#[0]" equivalence monoid)]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" sequence]
      ["[0]" dictionary (.only Dictionary)]]
     [format
@@ -20,7 +20,7 @@
    [math
     [number
      ["[0]" frac]]]]]
- ["[0]" // ("[1]#[0]" functor)])
+ ["[0]" // (.open: "[1]#[0]" functor)])
 
 (type: .public (Parser a)
   (//.Parser (List JSON) a))
diff --git a/stdlib/source/library/lux/control/parser/text.lux b/stdlib/source/library/lux/control/parser/text.lux
index 7cc34c955..4b8ab6e24 100644
--- a/stdlib/source/library/lux/control/parser/text.lux
+++ b/stdlib/source/library/lux/control/parser/text.lux
@@ -8,17 +8,17 @@
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]]
    [data
-    ["/" text (.only Char) ("[1]#[0]" monoid)]
+    ["/" text (.only Char) (.open: "[1]#[0]" monoid)]
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [macro
     ["^" pattern]
     ["[0]" code]
     ["[0]" template]]
    [math
     [number
-     ["n" nat ("[1]#[0]" decimal)]]]]]
+     ["n" nat (.open: "[1]#[0]" decimal)]]]]]
  ["[0]" //])
 
 (type: .public Offset
diff --git a/stdlib/source/library/lux/control/parser/type.lux b/stdlib/source/library/lux/control/parser/type.lux
index cbb4884b9..944e687c7 100644
--- a/stdlib/source/library/lux/control/parser/type.lux
+++ b/stdlib/source/library/lux/control/parser/type.lux
@@ -8,18 +8,18 @@
     ["[0]" exception (.only exception:)]
     ["[0]" function]]
    [data
-    ["[0]" text ("[1]#[0]" monoid)
+    ["[0]" text (.open: "[1]#[0]" monoid)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" dictionary (.only Dictionary)]]]
    [macro
     ["^" pattern]
     ["[0]" code]]
    [math
     [number
-     ["n" nat ("[1]#[0]" decimal)]]]
-   ["[0]" type ("[1]#[0]" equivalence)
+     ["n" nat (.open: "[1]#[0]" decimal)]]]
+   ["[0]" type (.open: "[1]#[0]" equivalence)
     ["[0]" check]]]]
  ["[0]" //])
 
diff --git a/stdlib/source/library/lux/control/parser/xml.lux b/stdlib/source/library/lux/control/parser/xml.lux
index 36b62f782..6853965af 100644
--- a/stdlib/source/library/lux/control/parser/xml.lux
+++ b/stdlib/source/library/lux/control/parser/xml.lux
@@ -4,7 +4,7 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only exception:)]]
    [data
     ["[0]" text
@@ -15,7 +15,7 @@
     [format
      ["/" xml (.only Attribute Attrs Tag XML)]]]
    [meta
-    ["[0]" symbol ("[1]#[0]" equivalence codec)]]]]
+    ["[0]" symbol (.open: "[1]#[0]" equivalence codec)]]]]
  ["[0]" //])
 
 (type: .public (Parser a)
diff --git a/stdlib/source/library/lux/control/pipe.lux b/stdlib/source/library/lux/control/pipe.lux
index 4e352584c..4f5e3298c 100644
--- a/stdlib/source/library/lux/control/pipe.lux
+++ b/stdlib/source/library/lux/control/pipe.lux
@@ -10,7 +10,7 @@
    [data
     ["[0]" identity]
     [collection
-     ["[0]" list ("[1]#[0]" monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monad)]]]
    [macro (.only with_symbols)
     [syntax (.only syntax:)]
     ["[0]" code]]
diff --git a/stdlib/source/library/lux/control/region.lux b/stdlib/source/library/lux/control/region.lux
index 86bddcfac..f744c5cef 100644
--- a/stdlib/source/library/lux/control/region.lux
+++ b/stdlib/source/library/lux/control/region.lux
@@ -11,7 +11,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]]]
  [//
   ["[0]" exception (.only Exception exception:)]])
 
diff --git a/stdlib/source/library/lux/control/remember.lux b/stdlib/source/library/lux/control/remember.lux
index e19b39036..4f4bd74f2 100644
--- a/stdlib/source/library/lux/control/remember.lux
+++ b/stdlib/source/library/lux/control/remember.lux
@@ -7,14 +7,14 @@
     ["[0]" io]
     ["[0]" try]
     ["[0]" exception (.only exception:)]
-    ["<>" parser ("[1]#[0]" functor)
+    ["<>" parser (.open: "[1]#[0]" functor)
      ["<c>" code (.only Parser)]]]
    [data
     ["[0]" text
      ["%" format (.only format)]]]
    [time
     ["[0]" instant]
-    ["[0]" date (.only Date) ("[1]#[0]" order)]]
+    ["[0]" date (.only Date) (.open: "[1]#[0]" order)]]
    ["[0]" meta]
    [macro
     ["[0]" code]
diff --git a/stdlib/source/library/lux/control/security/capability.lux b/stdlib/source/library/lux/control/security/capability.lux
index 3317a8f15..82b7a9a86 100644
--- a/stdlib/source/library/lux/control/security/capability.lux
+++ b/stdlib/source/library/lux/control/security/capability.lux
@@ -13,7 +13,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [type
     [primitive (.except)]]
    ["[0]" meta]
diff --git a/stdlib/source/library/lux/data/collection/bits.lux b/stdlib/source/library/lux/data/collection/bits.lux
index b2ef8d6f2..e9b659d3a 100644
--- a/stdlib/source/library/lux/data/collection/bits.lux
+++ b/stdlib/source/library/lux/data/collection/bits.lux
@@ -8,7 +8,7 @@
     ["[0]" maybe]]
    [data
     [collection
-     ["[0]" array (.only Array) ("[1]#[0]" mix)]]]
+     ["[0]" array (.only Array) (.open: "[1]#[0]" mix)]]]
    [math
     [number
      ["n" nat]
diff --git a/stdlib/source/library/lux/data/collection/dictionary.lux b/stdlib/source/library/lux/data/collection/dictionary.lux
index 7f30db024..5fc1d3ebb 100644
--- a/stdlib/source/library/lux/data/collection/dictionary.lux
+++ b/stdlib/source/library/lux/data/collection/dictionary.lux
@@ -13,7 +13,7 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" mix functor monoid)]
+     ["[0]" list (.open: "[1]#[0]" mix functor monoid)]
      ["[0]" array
       ["[1]" \\unsafe (.only Array)]]]]
    [macro
diff --git a/stdlib/source/library/lux/data/collection/dictionary/ordered.lux b/stdlib/source/library/lux/data/collection/dictionary/ordered.lux
index 16361edf6..46889f723 100644
--- a/stdlib/source/library/lux/data/collection/dictionary/ordered.lux
+++ b/stdlib/source/library/lux/data/collection/dictionary/ordered.lux
@@ -10,7 +10,7 @@
    [data
     ["p" product]
     [collection
-     ["[0]" list ("[1]#[0]" monoid mix)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid mix)]]]
    [macro
     ["^" pattern]]
    [math
diff --git a/stdlib/source/library/lux/data/collection/dictionary/plist.lux b/stdlib/source/library/lux/data/collection/dictionary/plist.lux
index 1c5528026..1d7c385c2 100644
--- a/stdlib/source/library/lux/data/collection/dictionary/plist.lux
+++ b/stdlib/source/library/lux/data/collection/dictionary/plist.lux
@@ -5,12 +5,12 @@
     [equivalence (.only Equivalence)]
     [monoid (.only Monoid)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [math
     [number
      ["n" nat]]]]])
diff --git a/stdlib/source/library/lux/data/collection/queue.lux b/stdlib/source/library/lux/data/collection/queue.lux
index bde5d6525..103e38506 100644
--- a/stdlib/source/library/lux/data/collection/queue.lux
+++ b/stdlib/source/library/lux/data/collection/queue.lux
@@ -6,7 +6,7 @@
     [functor (.only Functor)]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" monoid functor)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid functor)]]]
    [math
     [number
      ["n" nat]]]]])
diff --git a/stdlib/source/library/lux/data/collection/queue/priority.lux b/stdlib/source/library/lux/data/collection/queue/priority.lux
index 98c9734fb..7ff7d3195 100644
--- a/stdlib/source/library/lux/data/collection/queue/priority.lux
+++ b/stdlib/source/library/lux/data/collection/queue/priority.lux
@@ -12,7 +12,7 @@
       ["[1]" finger (.only Tree)]]]]
    [math
     [number
-     ["n" nat ("[1]#[0]" interval)]]]
+     ["n" nat (.open: "[1]#[0]" interval)]]]
    [type (.only by_example)
     [primitive (.only primitive: abstraction representation)]]]])
 
diff --git a/stdlib/source/library/lux/data/collection/sequence.lux b/stdlib/source/library/lux/data/collection/sequence.lux
index 065bb8941..2c8fdadaa 100644
--- a/stdlib/source/library/lux/data/collection/sequence.lux
+++ b/stdlib/source/library/lux/data/collection/sequence.lux
@@ -14,7 +14,7 @@
     [mix (.only Mix)]
     [predicate (.only Predicate)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]
     ["<>" parser (.only)
@@ -22,7 +22,7 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" mix functor monoid)]
+     ["[0]" list (.open: "[1]#[0]" mix functor monoid)]
      ["[0]" array
       ["[1]" \\unsafe (.only Array)]]]]
    [macro
diff --git a/stdlib/source/library/lux/data/collection/set.lux b/stdlib/source/library/lux/data/collection/set.lux
index 4d9e696d9..bd82175ab 100644
--- a/stdlib/source/library/lux/data/collection/set.lux
+++ b/stdlib/source/library/lux/data/collection/set.lux
@@ -8,7 +8,7 @@
     [monoid (.only Monoid)]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [macro
     ["^" pattern]]
    [math
diff --git a/stdlib/source/library/lux/data/collection/set/multi.lux b/stdlib/source/library/lux/data/collection/set/multi.lux
index 377ee54fd..30ca10e23 100644
--- a/stdlib/source/library/lux/data/collection/set/multi.lux
+++ b/stdlib/source/library/lux/data/collection/set/multi.lux
@@ -17,7 +17,7 @@
     ["[0]" primitive (.only primitive: abstraction representation)]]]]
  ["[0]" // (.only)
   [//
-   ["[0]" list ("[1]#[0]" mix monoid)]
+   ["[0]" list (.open: "[1]#[0]" mix monoid)]
    ["[0]" dictionary (.only Dictionary)]]])
 
 (primitive: .public (Set a)
diff --git a/stdlib/source/library/lux/data/collection/set/ordered.lux b/stdlib/source/library/lux/data/collection/set/ordered.lux
index 45ab47ef6..f55418053 100644
--- a/stdlib/source/library/lux/data/collection/set/ordered.lux
+++ b/stdlib/source/library/lux/data/collection/set/ordered.lux
@@ -6,7 +6,7 @@
     [order (.only Order)]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" mix)]
+     ["[0]" list (.open: "[1]#[0]" mix)]
      [dictionary
       ["/" ordered]]]]
    [type
diff --git a/stdlib/source/library/lux/data/collection/stream.lux b/stdlib/source/library/lux/data/collection/stream.lux
index d62f1f23c..ac6a8c50e 100644
--- a/stdlib/source/library/lux/data/collection/stream.lux
+++ b/stdlib/source/library/lux/data/collection/stream.lux
@@ -11,7 +11,7 @@
    [data
     ["[0]" bit]
     [collection
-     ["[0]" list ("[1]#[0]" monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monad)]]]
    [macro (.only with_symbols)
     [syntax (.only syntax:)]
     ["[0]" code]]
diff --git a/stdlib/source/library/lux/data/collection/tree.lux b/stdlib/source/library/lux/data/collection/tree.lux
index 28d6f283b..f7dfcf617 100644
--- a/stdlib/source/library/lux/data/collection/tree.lux
+++ b/stdlib/source/library/lux/data/collection/tree.lux
@@ -11,7 +11,7 @@
      ["<[0]>" code (.only Parser)]]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" monad mix)]]]
+     ["[0]" list (.open: "[1]#[0]" monad mix)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" code]]]])
diff --git a/stdlib/source/library/lux/data/collection/tree/finger.lux b/stdlib/source/library/lux/data/collection/tree/finger.lux
index a147973fe..1e2b87d25 100644
--- a/stdlib/source/library/lux/data/collection/tree/finger.lux
+++ b/stdlib/source/library/lux/data/collection/tree/finger.lux
@@ -6,7 +6,7 @@
     ["[0]" monoid (.only Monoid)]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid)]]]
    [type
     [primitive (.only primitive: abstraction representation)]]]])
 
diff --git a/stdlib/source/library/lux/data/collection/tree/zipper.lux b/stdlib/source/library/lux/data/collection/tree/zipper.lux
index 713fa19c6..33bc9b1b6 100644
--- a/stdlib/source/library/lux/data/collection/tree/zipper.lux
+++ b/stdlib/source/library/lux/data/collection/tree/zipper.lux
@@ -8,14 +8,14 @@
     [monad (.only do)]
     [equivalence (.only Equivalence)]]
    [control
-    ["[0]" maybe ("[1]#[0]" monad)]]
+    ["[0]" maybe (.open: "[1]#[0]" monad)]]
    [data
     ["[0]" product]
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor monoid)]]]]]
- ["[0]" // (.only Tree) ("[1]#[0]" functor)])
+     ["[0]" list (.open: "[1]#[0]" functor monoid)]]]]]
+ ["[0]" // (.only Tree) (.open: "[1]#[0]" functor)])
 
 (type: (Family Zipper a)
   (Record
diff --git a/stdlib/source/library/lux/data/color.lux b/stdlib/source/library/lux/data/color.lux
index e18ee549c..ebc8f8371 100644
--- a/stdlib/source/library/lux/data/color.lux
+++ b/stdlib/source/library/lux/data/color.lux
@@ -7,13 +7,13 @@
     ["[0]" hash (.only Hash)]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number
      ["n" nat]
      ["f" frac]
      ["[0]" int]
-     ["[0]" rev ("[1]#[0]" interval)]
+     ["[0]" rev (.open: "[1]#[0]" interval)]
      ["[0]" i64]]]
    [type
     [primitive (.except)]]]])
diff --git a/stdlib/source/library/lux/data/format/binary.lux b/stdlib/source/library/lux/data/format/binary.lux
index 860448136..c1c4707cc 100644
--- a/stdlib/source/library/lux/data/format/binary.lux
+++ b/stdlib/source/library/lux/data/format/binary.lux
@@ -9,7 +9,7 @@
    [control
     ["[0]" pipe]
     ["[0]" function]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["</>" binary (.only Offset Size Parser)]]]
    [data
     ["/" binary
@@ -21,7 +21,7 @@
       ["[0]" utf8]]]
     [collection
      ["[0]" list]
-     ["[0]" sequence (.only Sequence) ("[1]#[0]" functor)]
+     ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" functor)]
      ["[0]" set (.only Set)]
      [array
       [\\unsafe (.only)]]]]
diff --git a/stdlib/source/library/lux/data/format/css.lux b/stdlib/source/library/lux/data/format/css.lux
index ee8b19f0c..093cc785f 100644
--- a/stdlib/source/library/lux/data/format/css.lux
+++ b/stdlib/source/library/lux/data/format/css.lux
@@ -8,7 +8,7 @@
      ["%" format (.only format)]
      ["[0]" encoding (.only Encoding)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number
      ["[0]" nat]]]
diff --git a/stdlib/source/library/lux/data/format/css/class.lux b/stdlib/source/library/lux/data/format/css/class.lux
index 5bb68fb2e..6a9ab5e90 100644
--- a/stdlib/source/library/lux/data/format/css/class.lux
+++ b/stdlib/source/library/lux/data/format/css/class.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]]]
    [macro
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/data/format/css/id.lux b/stdlib/source/library/lux/data/format/css/id.lux
index bc11c304d..5de67ed56 100644
--- a/stdlib/source/library/lux/data/format/css/id.lux
+++ b/stdlib/source/library/lux/data/format/css/id.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]]]
    [macro
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/data/format/css/style.lux b/stdlib/source/library/lux/data/format/css/style.lux
index 291d13dd8..4b1f26590 100644
--- a/stdlib/source/library/lux/data/format/css/style.lux
+++ b/stdlib/source/library/lux/data/format/css/style.lux
@@ -5,7 +5,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [type
     [primitive (.except)]]]]
  ["[0]" //
diff --git a/stdlib/source/library/lux/data/format/css/value.lux b/stdlib/source/library/lux/data/format/css/value.lux
index 36ee8de22..07369e1dc 100644
--- a/stdlib/source/library/lux/data/format/css/value.lux
+++ b/stdlib/source/library/lux/data/format/css/value.lux
@@ -11,7 +11,7 @@
     ["[0]" text
      ["%" format (.only Format format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" template]
diff --git a/stdlib/source/library/lux/data/format/html.lux b/stdlib/source/library/lux/data/format/html.lux
index d42afc3c4..44ff23595 100644
--- a/stdlib/source/library/lux/data/format/html.lux
+++ b/stdlib/source/library/lux/data/format/html.lux
@@ -3,13 +3,13 @@
   [lux (.except Meta Source comment and template)
    [control
     ["[0]" function]
-    ["[0]" maybe ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]]
    [data
     ["[0]" product]
     ["[0]" text
      ["%" format (.only Format format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["[0]" template]]
    [target
diff --git a/stdlib/source/library/lux/data/format/json.lux b/stdlib/source/library/lux/data/format/json.lux
index c2f8d2ef1..14127b8ef 100644
--- a/stdlib/source/library/lux/data/format/json.lux
+++ b/stdlib/source/library/lux/data/format/json.lux
@@ -11,16 +11,16 @@
     ["[0]" pipe]
     ["[0]" maybe]
     ["[0]" try (.only Try)]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" text (.only Parser)]
      ["<[0]>" code]]]
    [data
     ["[0]" bit]
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence monoid)]
+    ["[0]" text (.open: "[1]#[0]" equivalence monoid)]
     [collection
-     ["[0]" list ("[1]#[0]" mix functor)]
-     ["[0]" sequence (.only Sequence sequence) ("[1]#[0]" monad)]
+     ["[0]" list (.open: "[1]#[0]" mix functor)]
+     ["[0]" sequence (.only Sequence sequence) (.open: "[1]#[0]" monad)]
      ["[0]" dictionary (.only Dictionary)]]]
    [macro
     [syntax (.only syntax:)]
@@ -29,7 +29,7 @@
    [math
     [number
      ["n" nat]
-     ["f" frac ("[1]#[0]" decimal)]]]]])
+     ["f" frac (.open: "[1]#[0]" decimal)]]]]])
 
 (template [<name> <type>]
   [(type: .public <name>
diff --git a/stdlib/source/library/lux/data/format/markdown.lux b/stdlib/source/library/lux/data/format/markdown.lux
index db33dd5ab..4982a2b63 100644
--- a/stdlib/source/library/lux/data/format/markdown.lux
+++ b/stdlib/source/library/lux/data/format/markdown.lux
@@ -5,7 +5,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [type
     [primitive (.except)]]
    [world
diff --git a/stdlib/source/library/lux/data/format/tar.lux b/stdlib/source/library/lux/data/format/tar.lux
index e671de780..9dd84b4e8 100644
--- a/stdlib/source/library/lux/data/format/tar.lux
+++ b/stdlib/source/library/lux/data/format/tar.lux
@@ -19,10 +19,10 @@
      [encoding
       ["[0]" utf8]]]
     ["[0]" format
-     ["[1]" binary (.only Writer) ("[1]#[0]" monoid)]]
+     ["[1]" binary (.only Writer) (.open: "[1]#[0]" monoid)]]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]
-     ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)]
+     ["[0]" list (.open: "[1]#[0]" mix)]
+     ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" mix)]
      [array
       [\\unsafe (.only)]]]]
    [macro
diff --git a/stdlib/source/library/lux/data/format/xml.lux b/stdlib/source/library/lux/data/format/xml.lux
index b7877bdbe..89a8eccad 100644
--- a/stdlib/source/library/lux/data/format/xml.lux
+++ b/stdlib/source/library/lux/data/format/xml.lux
@@ -7,20 +7,20 @@
     [codec (.only Codec)]]
    [control
     [try (.only Try)]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" text (.only Parser Slice)]]]
    [data
     ["[0]" product]
-    ["[0]" text (.only \n) ("[1]#[0]" equivalence monoid)]
+    ["[0]" text (.only \n) (.open: "[1]#[0]" equivalence monoid)]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" dictionary (.only Dictionary)]]]
    [math
     [number
      ["n" nat]
      ["[0]" int]]]
    [meta
-    ["[0]" symbol ("[1]#[0]" equivalence codec)]]]])
+    ["[0]" symbol (.open: "[1]#[0]" equivalence codec)]]]])
 
 (type: .public Tag
   Symbol)
diff --git a/stdlib/source/library/lux/data/text.lux b/stdlib/source/library/lux/data/text.lux
index fde7cd9f8..ecc17837e 100644
--- a/stdlib/source/library/lux/data/text.lux
+++ b/stdlib/source/library/lux/data/text.lux
@@ -13,7 +13,7 @@
     ["[0]" maybe]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [macro
     ["^" pattern]]
    [math
diff --git a/stdlib/source/library/lux/data/text/buffer.lux b/stdlib/source/library/lux/data/text/buffer.lux
index a53e60f77..5658dcddb 100644
--- a/stdlib/source/library/lux/data/text/buffer.lux
+++ b/stdlib/source/library/lux/data/text/buffer.lux
@@ -11,7 +11,7 @@
      ["%" format (.only format)]]
     [collection
      ["[0]" array]
-     ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)]]]
+     ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" mix)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/library/lux/data/text/format.lux b/stdlib/source/library/lux/data/text/format.lux
index 87e258477..c6dac322e 100644
--- a/stdlib/source/library/lux/data/text/format.lux
+++ b/stdlib/source/library/lux/data/text/format.lux
@@ -15,7 +15,7 @@
      ["[0]" xml]
      ["[0]" json]]
     [collection
-     ["[0]" list ("[1]#[0]" monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monad)]]]
    ["[0]" time (.only)
     ["[0]" instant]
     ["[0]" duration]
diff --git a/stdlib/source/library/lux/data/text/regex.lux b/stdlib/source/library/lux/data/text/regex.lux
index f9e57e97f..af653dbdf 100644
--- a/stdlib/source/library/lux/data/text/regex.lux
+++ b/stdlib/source/library/lux/data/text/regex.lux
@@ -8,20 +8,20 @@
     ["[0]" maybe]
     ["[0]" try]
     ["[0]" exception (.only exception:)]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" text (.only Parser)]
      ["<[0]>" code]]]
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" mix monad)]]]
+     ["[0]" list (.open: "[1]#[0]" mix monad)]]]
    [macro (.only with_symbols)
     [syntax (.only syntax:)]
     ["^" pattern]
     ["[0]" code]]
    [math
     [number (.only hex)
-     ["n" nat ("[1]#[0]" decimal)]]]]]
+     ["n" nat (.open: "[1]#[0]" decimal)]]]]]
  ["[0]" // (.only)
   ["%" format (.only format)]])
 
diff --git a/stdlib/source/library/lux/data/text/unicode/block.lux b/stdlib/source/library/lux/data/text/unicode/block.lux
index f2c315dfa..45729b8ba 100644
--- a/stdlib/source/library/lux/data/text/unicode/block.lux
+++ b/stdlib/source/library/lux/data/text/unicode/block.lux
@@ -8,7 +8,7 @@
     ["[0]" interval (.only Interval)]]
    [math
     [number (.only hex)
-     ["n" nat ("[1]#[0]" interval)]
+     ["n" nat (.open: "[1]#[0]" interval)]
      ["[0]" i64]]]
    [type
     [primitive (.except)]]]]
diff --git a/stdlib/source/library/lux/data/text/unicode/set.lux b/stdlib/source/library/lux/data/text/unicode/set.lux
index aa166bb5b..58730c36f 100644
--- a/stdlib/source/library/lux/data/text/unicode/set.lux
+++ b/stdlib/source/library/lux/data/text/unicode/set.lux
@@ -5,8 +5,8 @@
     [equivalence (.only Equivalence)]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" mix functor)]
-     ["[0]" set ("[1]#[0]" equivalence)]
+     ["[0]" list (.open: "[1]#[0]" mix functor)]
+     ["[0]" set (.open: "[1]#[0]" equivalence)]
      ["[0]" tree
       ["[1]" finger (.only Tree)]]]]
    [type (.only by_example)
diff --git a/stdlib/source/library/lux/debug.lux b/stdlib/source/library/lux/debug.lux
index 3ec9155fa..765cb6079 100644
--- a/stdlib/source/library/lux/debug.lux
+++ b/stdlib/source/library/lux/debug.lux
@@ -23,7 +23,7 @@
      ["[0]" json]]
     [collection
      ["[0]" array]
-     ["[0]" list ("[1]#[0]" monad)]
+     ["[0]" list (.open: "[1]#[0]" monad)]
      ["[0]" dictionary]]]
    [macro
     ["^" pattern]
diff --git a/stdlib/source/library/lux/documentation.lux b/stdlib/source/library/lux/documentation.lux
index f39019bfd..f71f812df 100644
--- a/stdlib/source/library/lux/documentation.lux
+++ b/stdlib/source/library/lux/documentation.lux
@@ -2,21 +2,21 @@
  [library
   [lux (.except Definition Module type)
    ["[0]" meta]
-   ["[0]" type ("[1]#[0]" equivalence)]
+   ["[0]" type (.open: "[1]#[0]" equivalence)]
    [abstract
     [monad (.only do)]
     ["[0]" enum]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only exception:)]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
-    ["[0]" text (.only \n) ("[1]#[0]" order)
+    ["[0]" text (.only \n) (.open: "[1]#[0]" order)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monad mix monoid)]
+     ["[0]" list (.open: "[1]#[0]" monad mix monoid)]
      ["[0]" set (.only Set)]
      ["[0]" stream (.only Stream)]]
     [format
diff --git a/stdlib/source/library/lux/extension.lux b/stdlib/source/library/lux/extension.lux
index 5a61520e6..4ad6c5592 100644
--- a/stdlib/source/library/lux/extension.lux
+++ b/stdlib/source/library/lux/extension.lux
@@ -4,14 +4,14 @@
    [abstract
     ["[0]" monad]]
    [control
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<c>" code (.only Parser)]
      ["<a>" analysis]
      ["<s>" synthesis]]]
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro (.only with_symbols)
     [syntax (.only syntax:)]
     ["[0]" code]]
diff --git a/stdlib/source/library/lux/ffi.jvm.lux b/stdlib/source/library/lux/ffi.jvm.lux
index 5d53095cf..6f22bfb29 100644
--- a/stdlib/source/library/lux/ffi.jvm.lux
+++ b/stdlib/source/library/lux/ffi.jvm.lux
@@ -9,15 +9,15 @@
     ["[0]" maybe]
     ["[0]" try (.only Try)]
     ["[0]" exception (.only Exception exception:)]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
      ["[0]" array]
-     ["[0]" list ("[1]#[0]" monad mix monoid)]
+     ["[0]" list (.open: "[1]#[0]" monad mix monoid)]
      ["[0]" dictionary (.only Dictionary)]]]
    [macro (.only with_symbols)
     [syntax (.only syntax:)]
@@ -35,7 +35,7 @@
       ["[0]" signature]
       ["[0]" reflection]
       ["[0]" parser]]]]
-   ["[0]" type ("[1]#[0]" equivalence)
+   ["[0]" type (.open: "[1]#[0]" equivalence)
     ["[0]" check]]]])
 
 (def: internal
diff --git a/stdlib/source/library/lux/ffi.lux b/stdlib/source/library/lux/ffi.lux
index ca7616417..2ad70d784 100644
--- a/stdlib/source/library/lux/ffi.lux
+++ b/stdlib/source/library/lux/ffi.lux
@@ -7,15 +7,15 @@
     [monad (.only do)]]
    [control
     ["[0]" io]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["<>" parser ("[1]#[0]" monad)
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" monad mix)]]]
+     ["[0]" list (.open: "[1]#[0]" monad mix)]]]
    ["[0]" macro (.only with_symbols)
     [syntax (.only syntax:)]
     ["[0]" code]
diff --git a/stdlib/source/library/lux/ffi.old.lux b/stdlib/source/library/lux/ffi.old.lux
index 19f5b8a9f..596d588e2 100644
--- a/stdlib/source/library/lux/ffi.old.lux
+++ b/stdlib/source/library/lux/ffi.old.lux
@@ -1,7 +1,7 @@
 (.using
  [library
   [lux (.except is as type)
-   ["[0]" type ("[1]#[0]" equivalence)]
+   ["[0]" type (.open: "[1]#[0]" equivalence)]
    [abstract
     ["[0]" monad (.only Monad do)]
     ["[0]" enum]]
@@ -14,12 +14,12 @@
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
-    ["[0]" bit ("[1]#[0]" codec)]
-    ["[0]" text ("[1]#[0]" equivalence monoid)
+    ["[0]" bit (.open: "[1]#[0]" codec)]
+    ["[0]" text (.open: "[1]#[0]" equivalence monoid)
      ["%" format (.only format)]]
     [collection
      ["[0]" array (.only Array)]
-     ["[0]" list ("[1]#[0]" monad mix monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" monad mix monoid)]]]
    ["[0]" macro (.only with_symbols)
     [syntax (.only syntax:)]
     ["^" pattern]
diff --git a/stdlib/source/library/lux/ffi.php.lux b/stdlib/source/library/lux/ffi.php.lux
index 2bfb31b5d..2f7350849 100644
--- a/stdlib/source/library/lux/ffi.php.lux
+++ b/stdlib/source/library/lux/ffi.php.lux
@@ -8,14 +8,14 @@
    [control
     ["[0]" io]
     ["[0]" maybe]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
     ["[0]" text
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [type
     abstract]
    [macro (.only with_symbols)
diff --git a/stdlib/source/library/lux/ffi.scm.lux b/stdlib/source/library/lux/ffi.scm.lux
index 0cf11daab..6903adb4c 100644
--- a/stdlib/source/library/lux/ffi.scm.lux
+++ b/stdlib/source/library/lux/ffi.scm.lux
@@ -8,14 +8,14 @@
    [control
     ["[0]" io]
     ["[0]" maybe]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
     ["[0]" text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [type
     abstract]
    [macro (.only with_symbols)
diff --git a/stdlib/source/library/lux/ffi/export.js.lux b/stdlib/source/library/lux/ffi/export.js.lux
index e93309e39..ac23e6b6b 100644
--- a/stdlib/source/library/lux/ffi/export.js.lux
+++ b/stdlib/source/library/lux/ffi/export.js.lux
@@ -13,7 +13,7 @@
     [text
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" monad mix)]
+     ["[0]" list (.open: "[1]#[0]" monad mix)]
      ["[0]" set]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/ffi/export.jvm.lux b/stdlib/source/library/lux/ffi/export.jvm.lux
index 17750a864..fea7a2239 100644
--- a/stdlib/source/library/lux/ffi/export.jvm.lux
+++ b/stdlib/source/library/lux/ffi/export.jvm.lux
@@ -6,7 +6,7 @@
      ["<[0]>" code (.only Parser)]]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monad)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" code]]]]
diff --git a/stdlib/source/library/lux/ffi/export.lua.lux b/stdlib/source/library/lux/ffi/export.lua.lux
index f4c6fc8d8..adcb632ab 100644
--- a/stdlib/source/library/lux/ffi/export.lua.lux
+++ b/stdlib/source/library/lux/ffi/export.lua.lux
@@ -13,7 +13,7 @@
     [text
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" monad mix)]
+     ["[0]" list (.open: "[1]#[0]" monad mix)]
      ["[0]" set]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/ffi/export.py.lux b/stdlib/source/library/lux/ffi/export.py.lux
index 98399e34b..b9abc8a7a 100644
--- a/stdlib/source/library/lux/ffi/export.py.lux
+++ b/stdlib/source/library/lux/ffi/export.py.lux
@@ -13,7 +13,7 @@
     [text
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" monad mix)]
+     ["[0]" list (.open: "[1]#[0]" monad mix)]
      ["[0]" set]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/ffi/export.rb.lux b/stdlib/source/library/lux/ffi/export.rb.lux
index e82fcbdb2..b23a85dc7 100644
--- a/stdlib/source/library/lux/ffi/export.rb.lux
+++ b/stdlib/source/library/lux/ffi/export.rb.lux
@@ -15,7 +15,7 @@
     [text
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" monad mix)]
+     ["[0]" list (.open: "[1]#[0]" monad mix)]
      ["[0]" set]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/ffi/node_js.js.lux b/stdlib/source/library/lux/ffi/node_js.js.lux
index 60186306a..a31054f74 100644
--- a/stdlib/source/library/lux/ffi/node_js.js.lux
+++ b/stdlib/source/library/lux/ffi/node_js.js.lux
@@ -4,7 +4,7 @@
    ["[0]" ffi]
    [control
     ["[0]" function]
-    ["[0]" maybe ("[1]#[0]" monoid functor)]]]])
+    ["[0]" maybe (.open: "[1]#[0]" monoid functor)]]]])
 
 (template [<name> <path>]
   [(def: <name>
diff --git a/stdlib/source/library/lux/locale.lux b/stdlib/source/library/lux/locale.lux
index 63fc6f06f..0d5117c48 100644
--- a/stdlib/source/library/lux/locale.lux
+++ b/stdlib/source/library/lux/locale.lux
@@ -5,7 +5,7 @@
     [equivalence (.only Equivalence)]
     ["[0]" hash (.only Hash)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]]
    [data
     ["[0]" text (.only)
      ["%" format (.only format)]
diff --git a/stdlib/source/library/lux/macro.lux b/stdlib/source/library/lux/macro.lux
index d9a68d76e..e455b55f4 100644
--- a/stdlib/source/library/lux/macro.lux
+++ b/stdlib/source/library/lux/macro.lux
@@ -4,9 +4,9 @@
    [abstract
     ["[0]" monad (.only do)]]
    [data
-    ["[0]" text ("[1]#[0]" monoid)]
+    ["[0]" text (.open: "[1]#[0]" monoid)]
     [collection
-     ["[0]" list ("[1]#[0]" monoid monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid monad)]]]
    [math
     [number
      ["[0]" nat]
@@ -16,7 +16,7 @@
   ["[0]" //
    ["[1]" meta (.only)
     ["[0]" location]
-    ["[0]" symbol ("[1]#[0]" codec)]]]])
+    ["[0]" symbol (.open: "[1]#[0]" codec)]]]])
 
 (def: .public (single_expansion syntax)
   (-> Code (Meta (List Code)))
diff --git a/stdlib/source/library/lux/macro/code.lux b/stdlib/source/library/lux/macro/code.lux
index 2d670c70c..74cab5a40 100644
--- a/stdlib/source/library/lux/macro/code.lux
+++ b/stdlib/source/library/lux/macro/code.lux
@@ -6,9 +6,9 @@
    [data
     ["[0]" product]
     ["[0]" bit]
-    ["[0]" text ("[1]#[0]" monoid equivalence)]
+    ["[0]" text (.open: "[1]#[0]" monoid equivalence)]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["^" pattern]]
    [math
diff --git a/stdlib/source/library/lux/macro/local.lux b/stdlib/source/library/lux/macro/local.lux
index 9a317fc6f..b564df336 100644
--- a/stdlib/source/library/lux/macro/local.lux
+++ b/stdlib/source/library/lux/macro/local.lux
@@ -11,7 +11,7 @@
     ["[0]" product]
     ["[0]" text]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      [dictionary
       ["[0]" plist (.only PList)]]]]]]
  ["[0]" // (.only)
diff --git a/stdlib/source/library/lux/macro/syntax.lux b/stdlib/source/library/lux/macro/syntax.lux
index 5945290d8..baec61e09 100644
--- a/stdlib/source/library/lux/macro/syntax.lux
+++ b/stdlib/source/library/lux/macro/syntax.lux
@@ -10,7 +10,7 @@
     ["<>" parser (.only)
      ["</>" code (.only Parser)]]]
    [data
-    ["[0]" text ("[1]#[0]" monoid)]
+    ["[0]" text (.open: "[1]#[0]" monoid)]
     [collection
      ["[0]" list]]]
    [math
diff --git a/stdlib/source/library/lux/macro/syntax/declaration.lux b/stdlib/source/library/lux/macro/syntax/declaration.lux
index aef62c056..b0c23e135 100644
--- a/stdlib/source/library/lux/macro/syntax/declaration.lux
+++ b/stdlib/source/library/lux/macro/syntax/declaration.lux
@@ -4,13 +4,13 @@
    [abstract
     [equivalence (.only Equivalence)]]
    [control
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
     ["[0]" text]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
     ["[0]" code]]]])
 
diff --git a/stdlib/source/library/lux/macro/syntax/input.lux b/stdlib/source/library/lux/macro/syntax/input.lux
index 25d3db6fc..bdac8cad3 100644
--- a/stdlib/source/library/lux/macro/syntax/input.lux
+++ b/stdlib/source/library/lux/macro/syntax/input.lux
@@ -9,7 +9,7 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monad)]]]
    [macro
     ["[0]" code]]]])
 
diff --git a/stdlib/source/library/lux/macro/template.lux b/stdlib/source/library/lux/macro/template.lux
index dc3ef5884..6f4124596 100644
--- a/stdlib/source/library/lux/macro/template.lux
+++ b/stdlib/source/library/lux/macro/template.lux
@@ -7,22 +7,22 @@
    [control
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]
-    ["<>" parser ("[1]#[0]" functor)
+    ["<>" parser (.open: "[1]#[0]" functor)
      ["<[0]>" code (.only Parser)]]]
    [data
-    ["[0]" bit ("[1]#[0]" codec)]
+    ["[0]" bit (.open: "[1]#[0]" codec)]
     ["[0]" text]
     [collection
-     ["[0]" list ("[1]#[0]" monad)]
+     ["[0]" list (.open: "[1]#[0]" monad)]
      ["[0]" dictionary (.only Dictionary)]]]
    [macro
     ["^" pattern]]
    [math
     [number
-     ["[0]" nat ("[1]#[0]" decimal)]
-     ["[0]" int ("[1]#[0]" decimal)]
-     ["[0]" rev ("[1]#[0]" decimal)]
-     ["[0]" frac ("[1]#[0]" decimal)]]]]]
+     ["[0]" nat (.open: "[1]#[0]" decimal)]
+     ["[0]" int (.open: "[1]#[0]" decimal)]
+     ["[0]" rev (.open: "[1]#[0]" decimal)]
+     ["[0]" frac (.open: "[1]#[0]" decimal)]]]]]
  ["[0]" // (.only)
   [syntax (.only syntax:)]
   ["[0]" code]
diff --git a/stdlib/source/library/lux/math.lux b/stdlib/source/library/lux/math.lux
index eaffa1d8a..0a32f20b8 100644
--- a/stdlib/source/library/lux/math.lux
+++ b/stdlib/source/library/lux/math.lux
@@ -15,13 +15,13 @@
     [text
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" template]]
    [tool
     [compiler
-     ["[0]" phase ("[1]#[0]" monad)]
+     ["[0]" phase (.open: "[1]#[0]" monad)]
      [language
       [lux
        ["[0]" analysis (.only Analysis Operation Phase)
diff --git a/stdlib/source/library/lux/math/infix.lux b/stdlib/source/library/lux/math/infix.lux
index 207d38d54..8a37aa0f7 100644
--- a/stdlib/source/library/lux/math/infix.lux
+++ b/stdlib/source/library/lux/math/infix.lux
@@ -4,12 +4,12 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["<>" parser ("[1]#[0]" functor)
+    ["<>" parser (.open: "[1]#[0]" functor)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" code]]
diff --git a/stdlib/source/library/lux/math/logic/continuous.lux b/stdlib/source/library/lux/math/logic/continuous.lux
index 6640d1668..eec2d573f 100644
--- a/stdlib/source/library/lux/math/logic/continuous.lux
+++ b/stdlib/source/library/lux/math/logic/continuous.lux
@@ -6,7 +6,7 @@
     [monoid (.only Monoid)]]
    [math
     [number
-     ["/" rev ("[1]#[0]" interval)]]]]])
+     ["/" rev (.open: "[1]#[0]" interval)]]]]])
 
 (def: .public false Rev /#bottom)
 (def: .public true  Rev /#top)
diff --git a/stdlib/source/library/lux/math/modular.lux b/stdlib/source/library/lux/math/modular.lux
index e0886c02d..77f611732 100644
--- a/stdlib/source/library/lux/math/modular.lux
+++ b/stdlib/source/library/lux/math/modular.lux
@@ -15,13 +15,13 @@
      ["<[0]>" code]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" monoid)]]
+    ["[0]" text (.open: "[1]#[0]" monoid)]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" code]]
    [math
     [number
-     ["i" int ("[1]#[0]" decimal)]]]
+     ["i" int (.open: "[1]#[0]" decimal)]]]
    [type
     [primitive (.except)]]]]
  ["[0]" //
diff --git a/stdlib/source/library/lux/math/number/complex.lux b/stdlib/source/library/lux/math/number/complex.lux
index 7b341edf3..5e320c560 100644
--- a/stdlib/source/library/lux/math/number/complex.lux
+++ b/stdlib/source/library/lux/math/number/complex.lux
@@ -9,7 +9,7 @@
      ["<[0]>" code]]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
     [syntax (.only syntax:)]]
    [math
diff --git a/stdlib/source/library/lux/math/number/ratio.lux b/stdlib/source/library/lux/math/number/ratio.lux
index b7072395b..a7c1c4762 100644
--- a/stdlib/source/library/lux/math/number/ratio.lux
+++ b/stdlib/source/library/lux/math/number/ratio.lux
@@ -15,12 +15,12 @@
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" monoid)]]
+    ["[0]" text (.open: "[1]#[0]" monoid)]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" code]]]]
  [//
-  ["n" nat ("[1]#[0]" decimal)]])
+  ["n" nat (.open: "[1]#[0]" decimal)]])
 
 (type: .public Ratio
   (Record
diff --git a/stdlib/source/library/lux/math/random.lux b/stdlib/source/library/lux/math/random.lux
index 13762f8ec..d60ba29bc 100644
--- a/stdlib/source/library/lux/math/random.lux
+++ b/stdlib/source/library/lux/math/random.lux
@@ -7,11 +7,11 @@
     [apply (.only Apply)]
     ["[0]" monad (.only Monad do)]]
    [data
-    ["[0]" text (.only Char) ("[1]#[0]" monoid)
+    ["[0]" text (.only Char) (.open: "[1]#[0]" monoid)
      ["[0]" unicode
       ["[1]" set]]]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]
+     ["[0]" list (.open: "[1]#[0]" mix)]
      ["[0]" array (.only Array)]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" queue (.only Queue)]
diff --git a/stdlib/source/library/lux/meta.lux b/stdlib/source/library/lux/meta.lux
index ef6b283f0..7ceec5bcd 100644
--- a/stdlib/source/library/lux/meta.lux
+++ b/stdlib/source/library/lux/meta.lux
@@ -10,9 +10,9 @@
     ["[0]" try (.only Try)]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" monoid order)]
+    ["[0]" text (.open: "[1]#[0]" monoid order)]
     [collection
-     ["[0]" list ("[1]#[0]" monoid monad)]
+     ["[0]" list (.open: "[1]#[0]" monoid monad)]
      [dictionary
       ["[0]" plist]]]]
    [macro
@@ -23,7 +23,7 @@
      ["n" nat]
      ["i" int]]]
    [meta
-    ["[0]" symbol ("[1]#[0]" codec equivalence)]]]]
+    ["[0]" symbol (.open: "[1]#[0]" codec equivalence)]]]]
  [/
   ["[0]" location]])
 
diff --git a/stdlib/source/library/lux/meta/configuration.lux b/stdlib/source/library/lux/meta/configuration.lux
index 7271f5430..be16a5110 100644
--- a/stdlib/source/library/lux/meta/configuration.lux
+++ b/stdlib/source/library/lux/meta/configuration.lux
@@ -7,16 +7,16 @@
     [monoid (.only Monoid)]
     [monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only exception:)]
     ["<>" parser (.only)
      ["<[0]>" text (.only Parser)]
      ["<[0]>" code]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      [dictionary
       ["/" plist]]]]
    [macro
diff --git a/stdlib/source/library/lux/meta/symbol.lux b/stdlib/source/library/lux/meta/symbol.lux
index 885db4402..b5819f76a 100644
--- a/stdlib/source/library/lux/meta/symbol.lux
+++ b/stdlib/source/library/lux/meta/symbol.lux
@@ -7,7 +7,7 @@
     [order (.only Order)]
     [codec (.only Codec)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence monoid)]
+    ["[0]" text (.open: "[1]#[0]" equivalence monoid)]
     ["[0]" product]]]])
 
 ... (type: Symbol
diff --git a/stdlib/source/library/lux/meta/version.lux b/stdlib/source/library/lux/meta/version.lux
index 9987d55c1..47bc430b4 100644
--- a/stdlib/source/library/lux/meta/version.lux
+++ b/stdlib/source/library/lux/meta/version.lux
@@ -9,9 +9,9 @@
     ["<>" parser (.only)
      ["<[0]>" code]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" code]]
diff --git a/stdlib/source/library/lux/static.lux b/stdlib/source/library/lux/static.lux
index 0aec3e8c2..c9d94bd35 100644
--- a/stdlib/source/library/lux/static.lux
+++ b/stdlib/source/library/lux/static.lux
@@ -1,7 +1,7 @@
 (.using
  [library
   [lux (.except nat int rev if cond)
-   ["[0]" meta ("[1]#[0]" functor)]
+   ["[0]" meta (.open: "[1]#[0]" functor)]
    [abstract
     [monad (.only do)]]
    [control
@@ -9,7 +9,7 @@
      ["<[0]>" code]]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" code]]
diff --git a/stdlib/source/library/lux/target/common_lisp.lux b/stdlib/source/library/lux/target/common_lisp.lux
index e2094f53c..ce523f4d4 100644
--- a/stdlib/source/library/lux/target/common_lisp.lux
+++ b/stdlib/source/library/lux/target/common_lisp.lux
@@ -7,7 +7,7 @@
     ["[0]" text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monad monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" monad monoid)]]]
    [macro
     ["[0]" template]]
    [math
diff --git a/stdlib/source/library/lux/target/js.lux b/stdlib/source/library/lux/target/js.lux
index ecae74ab2..708ba4abe 100644
--- a/stdlib/source/library/lux/target/js.lux
+++ b/stdlib/source/library/lux/target/js.lux
@@ -7,7 +7,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["[0]" template]]
    [math
diff --git a/stdlib/source/library/lux/target/jvm/attribute.lux b/stdlib/source/library/lux/target/jvm/attribute.lux
index 522cb9028..4819f19ea 100644
--- a/stdlib/source/library/lux/target/jvm/attribute.lux
+++ b/stdlib/source/library/lux/target/jvm/attribute.lux
@@ -24,7 +24,7 @@
   [encoding
    ["[1][0]" unsigned (.only U2 U4)]]
   ["[1][0]" constant (.only UTF8 Class Value)
-   ["[2][0]" pool (.only Pool Resource) ("[1]#[0]" monad)]]]
+   ["[2][0]" pool (.only Pool Resource) (.open: "[1]#[0]" monad)]]]
  ["[0]" /
   ["[1][0]" constant (.only Constant)]
   ["[1][0]" code]])
diff --git a/stdlib/source/library/lux/target/jvm/attribute/code.lux b/stdlib/source/library/lux/target/jvm/attribute/code.lux
index 10d2bb92d..629fbfad6 100644
--- a/stdlib/source/library/lux/target/jvm/attribute/code.lux
+++ b/stdlib/source/library/lux/target/jvm/attribute/code.lux
@@ -7,9 +7,9 @@
     ["[0]" product]
     ["[0]" binary (.only Binary)]
     [format
-     ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]]
+     ["[0]F" binary (.only Writer) (.open: "[1]#[0]" monoid)]]
     [collection
-     ["[0]" sequence (.only Sequence) ("[1]#[0]" functor mix)]]]
+     ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" functor mix)]]]
    [math
     [number
      ["n" nat]]]]]
diff --git a/stdlib/source/library/lux/target/jvm/bytecode.lux b/stdlib/source/library/lux/target/jvm/bytecode.lux
index 1f00b97c7..4963f5151 100644
--- a/stdlib/source/library/lux/target/jvm/bytecode.lux
+++ b/stdlib/source/library/lux/target/jvm/bytecode.lux
@@ -10,14 +10,14 @@
     ["[0]" writer (.only Writer)]
     ["[0]" state (.only +State)]
     ["[0]" maybe]
-    ["[0]" try (.only Try) ("[1]#[0]" monad)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" monad)]
     ["[0]" exception (.only exception:)]]
    [data
     ["[0]" product]
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" sequence (.only Sequence)]]]
    [macro
@@ -31,7 +31,7 @@
  ["[0]" /
   ["[1][0]" address (.only Address)]
   ["[1][0]" jump (.only Jump Big_Jump)]
-  ["_" instruction (.only Primitive_Array_Type Instruction Estimator) ("[1]#[0]" monoid)]
+  ["_" instruction (.only Primitive_Array_Type Instruction Estimator) (.open: "[1]#[0]" monoid)]
   ["[1][0]" environment (.only Environment)
    [limit
     ["/[0]" registry (.only Register Registry)]
diff --git a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux
index 05772986f..a1c60d8d2 100644
--- a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux
+++ b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux
@@ -9,7 +9,7 @@
    [data
     ["[0]" product]
     ["[0]" format
-     ["[1]" binary (.only Writer) ("[1]#[0]" monoid)]]]
+     ["[1]" binary (.only Writer) (.open: "[1]#[0]" monoid)]]]
    [math
     [number
      ["n" nat]]]]]
diff --git a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux
index 950735dbb..b8ae7a3c3 100644
--- a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux
+++ b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux
@@ -4,12 +4,12 @@
    [abstract
     ["[0]" equivalence (.only Equivalence)]]
    [control
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
    [data
     [format
      [binary (.only Writer)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/library/lux/target/jvm/class.lux b/stdlib/source/library/lux/target/jvm/class.lux
index 3af3c5c7c..6c4531ed5 100644
--- a/stdlib/source/library/lux/target/jvm/class.lux
+++ b/stdlib/source/library/lux/target/jvm/class.lux
@@ -10,7 +10,7 @@
    [data
     ["[0]" product]
     [format
-     ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]]
+     ["[0]F" binary (.only Writer) (.open: "[1]#[0]" monoid)]]
     [collection
      ["[0]" sequence (.only Sequence)]]]]]
  ["[0]" //
diff --git a/stdlib/source/library/lux/target/jvm/constant.lux b/stdlib/source/library/lux/target/jvm/constant.lux
index 3e50f9758..98fb0ba60 100644
--- a/stdlib/source/library/lux/target/jvm/constant.lux
+++ b/stdlib/source/library/lux/target/jvm/constant.lux
@@ -11,7 +11,7 @@
     ["[0]" product]
     ["[0]" text]
     [format
-     ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]]]
+     ["[0]F" binary (.only Writer) (.open: "[1]#[0]" monoid)]]]
    [macro
     ["^" pattern]
     ["[0]" template]]
diff --git a/stdlib/source/library/lux/target/jvm/constant/pool.lux b/stdlib/source/library/lux/target/jvm/constant/pool.lux
index e459f5eec..2d6c1e4e5 100644
--- a/stdlib/source/library/lux/target/jvm/constant/pool.lux
+++ b/stdlib/source/library/lux/target/jvm/constant/pool.lux
@@ -14,9 +14,9 @@
     ["[0]" product]
     ["[0]" text]
     ["[0]" format
-     ["[1]" binary (.only Writer) ("specification#[0]" monoid)]]
+     ["[1]" binary (.only Writer) (.open: "specification#[0]" monoid)]]
     [collection
-     ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)]]]
+     ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" mix)]]]
    [math
     [number
      ["[0]" int]
diff --git a/stdlib/source/library/lux/target/jvm/constant/tag.lux b/stdlib/source/library/lux/target/jvm/constant/tag.lux
index e9a0569e0..7a859d75b 100644
--- a/stdlib/source/library/lux/target/jvm/constant/tag.lux
+++ b/stdlib/source/library/lux/target/jvm/constant/tag.lux
@@ -12,7 +12,7 @@
     [primitive (.except)]]]]
  ["[0]" ///
   [encoding
-   ["[1][0]" unsigned (.only U1) ("u1//[0]" equivalence)]]])
+   ["[1][0]" unsigned (.only U1) (.open: "u1//[0]" equivalence)]]])
 
 (primitive: .public Tag
   U1
diff --git a/stdlib/source/library/lux/target/jvm/field.lux b/stdlib/source/library/lux/target/jvm/field.lux
index ade45a2f0..1b8407723 100644
--- a/stdlib/source/library/lux/target/jvm/field.lux
+++ b/stdlib/source/library/lux/target/jvm/field.lux
@@ -7,7 +7,7 @@
    [data
     ["[0]" product]
     [format
-     ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]]
+     ["[0]F" binary (.only Writer) (.open: "[1]#[0]" monoid)]]
     [collection
      ["[0]" sequence (.only Sequence)]]]]]
  ["[0]" //
diff --git a/stdlib/source/library/lux/target/jvm/method.lux b/stdlib/source/library/lux/target/jvm/method.lux
index 5fcb74c45..bf2b73cdb 100644
--- a/stdlib/source/library/lux/target/jvm/method.lux
+++ b/stdlib/source/library/lux/target/jvm/method.lux
@@ -9,7 +9,7 @@
    [data
     ["[0]" product]
     ["[0]" format
-     ["[1]" binary (.only Writer) ("[1]#[0]" monoid)]]
+     ["[1]" binary (.only Writer) (.open: "[1]#[0]" monoid)]]
     [collection
      ["[0]" sequence (.only Sequence)]]]]]
  ["[0]" //
diff --git a/stdlib/source/library/lux/target/jvm/reflection.lux b/stdlib/source/library/lux/target/jvm/reflection.lux
index cdfe9e9a0..0941e09b1 100644
--- a/stdlib/source/library/lux/target/jvm/reflection.lux
+++ b/stdlib/source/library/lux/target/jvm/reflection.lux
@@ -6,15 +6,15 @@
    [abstract
     ["[0]" monad (.only do)]]
    [control
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only exception:)]
     [parser
      ["<t>" text]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" mix functor)]
+     ["[0]" list (.open: "[1]#[0]" mix functor)]
      ["[0]" array]
      ["[0]" dictionary]]]
    [macro
diff --git a/stdlib/source/library/lux/target/jvm/type.lux b/stdlib/source/library/lux/target/jvm/type.lux
index cfb14dfa9..21528b3a3 100644
--- a/stdlib/source/library/lux/target/jvm/type.lux
+++ b/stdlib/source/library/lux/target/jvm/type.lux
@@ -10,7 +10,7 @@
     ["[0]" text (.only)
      ["%" format (.only Format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/library/lux/target/jvm/type/descriptor.lux b/stdlib/source/library/lux/target/jvm/type/descriptor.lux
index e8cf0ba6b..7ded981d8 100644
--- a/stdlib/source/library/lux/target/jvm/type/descriptor.lux
+++ b/stdlib/source/library/lux/target/jvm/type/descriptor.lux
@@ -6,10 +6,10 @@
    [control
     ["[0]" maybe]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/library/lux/target/jvm/type/lux.lux b/stdlib/source/library/lux/target/jvm/type/lux.lux
index 60ca730d2..b63cafeab 100644
--- a/stdlib/source/library/lux/target/jvm/type/lux.lux
+++ b/stdlib/source/library/lux/target/jvm/type/lux.lux
@@ -6,18 +6,18 @@
    [control
     ["[0]" try]
     ["[0]" exception (.only exception:)]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" text (.only Parser)]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
      ["[0]" array]
      ["[0]" dictionary (.only Dictionary)]]]
    [type
     [primitive (.except)]
-    ["[0]" check (.only Check) ("[1]#[0]" monad)]]]]
+    ["[0]" check (.only Check) (.open: "[1]#[0]" monad)]]]]
  ["[0]" // (.only)
   [category (.only Void Value Return Method Primitive Object Class Array Var Parameter)]
   ["[1][0]" descriptor]
diff --git a/stdlib/source/library/lux/target/jvm/type/parser.lux b/stdlib/source/library/lux/target/jvm/type/parser.lux
index 4a0aa756c..a58a6d8d7 100644
--- a/stdlib/source/library/lux/target/jvm/type/parser.lux
+++ b/stdlib/source/library/lux/target/jvm/type/parser.lux
@@ -6,7 +6,7 @@
    [control
     ["[0]" try]
     ["[0]" function]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" text (.only Parser)]]]
    [data
     ["[0]" product]
diff --git a/stdlib/source/library/lux/target/jvm/type/reflection.lux b/stdlib/source/library/lux/target/jvm/type/reflection.lux
index e6f51e411..47c5d7d73 100644
--- a/stdlib/source/library/lux/target/jvm/type/reflection.lux
+++ b/stdlib/source/library/lux/target/jvm/type/reflection.lux
@@ -4,7 +4,7 @@
    [abstract
     [equivalence (.only Equivalence)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [type
     [primitive (.except)]]]]
diff --git a/stdlib/source/library/lux/target/jvm/type/signature.lux b/stdlib/source/library/lux/target/jvm/type/signature.lux
index ef9d139ea..f66989972 100644
--- a/stdlib/source/library/lux/target/jvm/type/signature.lux
+++ b/stdlib/source/library/lux/target/jvm/type/signature.lux
@@ -7,10 +7,10 @@
    [control
     ["[0]" pipe]]
    [data
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [type
     [primitive (.except)]]]]
  ["[0]" //
diff --git a/stdlib/source/library/lux/target/lua.lux b/stdlib/source/library/lux/target/lua.lux
index e0bed2c3c..f334dbc83 100644
--- a/stdlib/source/library/lux/target/lua.lux
+++ b/stdlib/source/library/lux/target/lua.lux
@@ -14,7 +14,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" template]
diff --git a/stdlib/source/library/lux/target/php.lux b/stdlib/source/library/lux/target/php.lux
index 7b9cec65a..52f872a04 100644
--- a/stdlib/source/library/lux/target/php.lux
+++ b/stdlib/source/library/lux/target/php.lux
@@ -14,7 +14,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" template]
diff --git a/stdlib/source/library/lux/target/python.lux b/stdlib/source/library/lux/target/python.lux
index ae3904333..ae5014d34 100644
--- a/stdlib/source/library/lux/target/python.lux
+++ b/stdlib/source/library/lux/target/python.lux
@@ -15,7 +15,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" template]
diff --git a/stdlib/source/library/lux/target/r.lux b/stdlib/source/library/lux/target/r.lux
index c16e07eac..0d4e813dc 100644
--- a/stdlib/source/library/lux/target/r.lux
+++ b/stdlib/source/library/lux/target/r.lux
@@ -4,14 +4,14 @@
    [control
     ["[0]" pipe]
     ["[0]" function]
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" code]]]
    [data
     ["[0]" text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" template]
diff --git a/stdlib/source/library/lux/target/ruby.lux b/stdlib/source/library/lux/target/ruby.lux
index a157e513b..356906d27 100644
--- a/stdlib/source/library/lux/target/ruby.lux
+++ b/stdlib/source/library/lux/target/ruby.lux
@@ -14,7 +14,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" template]
diff --git a/stdlib/source/library/lux/target/scheme.lux b/stdlib/source/library/lux/target/scheme.lux
index e3e6fb09b..e77a76d6d 100644
--- a/stdlib/source/library/lux/target/scheme.lux
+++ b/stdlib/source/library/lux/target/scheme.lux
@@ -11,7 +11,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
    [macro
     ["[0]" template]]
    [math
diff --git a/stdlib/source/library/lux/test.lux b/stdlib/source/library/lux/test.lux
index e72427137..71c7c1a53 100644
--- a/stdlib/source/library/lux/test.lux
+++ b/stdlib/source/library/lux/test.lux
@@ -13,7 +13,7 @@
     ["[0]" io]
     [concurrency
      ["[0]" atom (.only Atom)]
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]
     ["<>" parser (.only)
      ["<[0]>" code]]]
    [data
@@ -21,7 +21,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set (.only Set)]
      ["[0]" dictionary
       ["[1]" ordered (.only Dictionary)]]]]
@@ -29,7 +29,7 @@
     ["[0]" instant]
     ["[0]" duration (.only Duration)]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number (.only hex)
      ["n" nat]
      ["f" frac]]]
diff --git a/stdlib/source/library/lux/time.lux b/stdlib/source/library/lux/time.lux
index 79343f319..d0f07d610 100644
--- a/stdlib/source/library/lux/time.lux
+++ b/stdlib/source/library/lux/time.lux
@@ -14,10 +14,10 @@
     ["<>" parser (.only)
      ["<[0]>" text (.only Parser)]]]
    [data
-    ["[0]" text ("[1]#[0]" monoid)]]
+    ["[0]" text (.open: "[1]#[0]" monoid)]]
    [math
     [number
-     ["n" nat ("[1]#[0]" decimal)]]]
+     ["n" nat (.open: "[1]#[0]" decimal)]]]
    [type
     [primitive (.except)]]]]
  [/
diff --git a/stdlib/source/library/lux/time/date.lux b/stdlib/source/library/lux/time/date.lux
index 1d0df3aca..3327f15e8 100644
--- a/stdlib/source/library/lux/time/date.lux
+++ b/stdlib/source/library/lux/time/date.lux
@@ -14,13 +14,13 @@
     ["<>" parser (.only)
      ["<[0]>" text (.only Parser)]]]
    [data
-    ["[0]" text ("[1]#[0]" monoid)]
+    ["[0]" text (.open: "[1]#[0]" monoid)]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]
+     ["[0]" list (.open: "[1]#[0]" mix)]
      ["[0]" dictionary (.only Dictionary)]]]
    [math
     [number
-     ["n" nat ("[1]#[0]" decimal)]
+     ["n" nat (.open: "[1]#[0]" decimal)]
      ["i" int]]]
    [type
     [primitive (.except)]]]]
diff --git a/stdlib/source/library/lux/time/day.lux b/stdlib/source/library/lux/time/day.lux
index 590d850ed..a245c924b 100644
--- a/stdlib/source/library/lux/time/day.lux
+++ b/stdlib/source/library/lux/time/day.lux
@@ -11,7 +11,7 @@
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]]
    [data
-    ["[0]" text ("[1]#[0]" monoid)]]
+    ["[0]" text (.open: "[1]#[0]" monoid)]]
    [macro
     ["^" pattern]
     ["[0]" template]]
diff --git a/stdlib/source/library/lux/time/duration.lux b/stdlib/source/library/lux/time/duration.lux
index 4616890db..75fcddefd 100644
--- a/stdlib/source/library/lux/time/duration.lux
+++ b/stdlib/source/library/lux/time/duration.lux
@@ -13,11 +13,11 @@
     ["<>" parser (.only)
      ["<[0]>" text (.only Parser)]]]
    [data
-    ["[0]" text ("[1]#[0]" monoid)]]
+    ["[0]" text (.open: "[1]#[0]" monoid)]]
    [math
     [number
      ["i" int]
-     ["[0]" nat ("[1]#[0]" decimal)]]]
+     ["[0]" nat (.open: "[1]#[0]" decimal)]]]
    [type
     [primitive (.except)]]]]
  ["[0]" //
diff --git a/stdlib/source/library/lux/time/instant.lux b/stdlib/source/library/lux/time/instant.lux
index 4d36a5a7d..3a6071f59 100644
--- a/stdlib/source/library/lux/time/instant.lux
+++ b/stdlib/source/library/lux/time/instant.lux
@@ -16,7 +16,7 @@
     ["<>" parser (.only)
      ["<[0]>" text (.only Parser)]]]
    [data
-    ["[0]" text ("[1]#[0]" monoid)]]
+    ["[0]" text (.open: "[1]#[0]" monoid)]]
    [math
     [number
      ["i" int]
diff --git a/stdlib/source/library/lux/time/month.lux b/stdlib/source/library/lux/time/month.lux
index 65cc2f570..0b8d8b8a8 100644
--- a/stdlib/source/library/lux/time/month.lux
+++ b/stdlib/source/library/lux/time/month.lux
@@ -11,7 +11,7 @@
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]]
    [data
-    ["[0]" text ("[1]#[0]" monoid)]]
+    ["[0]" text (.open: "[1]#[0]" monoid)]]
    [macro
     ["^" pattern]
     ["[0]" template]]
diff --git a/stdlib/source/library/lux/time/year.lux b/stdlib/source/library/lux/time/year.lux
index aac70a1b3..d10df7456 100644
--- a/stdlib/source/library/lux/time/year.lux
+++ b/stdlib/source/library/lux/time/year.lux
@@ -12,11 +12,11 @@
     ["<>" parser (.only)
      ["<[0]>" text (.only Parser)]]]
    [data
-    ["[0]" text ("[1]#[0]" monoid)]]
+    ["[0]" text (.open: "[1]#[0]" monoid)]]
    [math
     [number
-     ["n" nat ("[1]#[0]" decimal)]
-     ["i" int ("[1]#[0]" decimal)]]]
+     ["n" nat (.open: "[1]#[0]" decimal)]
+     ["i" int (.open: "[1]#[0]" decimal)]]]
    [type
     [primitive (.except)]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/default/init.lux b/stdlib/source/library/lux/tool/compiler/default/init.lux
index 1b91c925c..6ddca02cf 100644
--- a/stdlib/source/library/lux/tool/compiler/default/init.lux
+++ b/stdlib/source/library/lux/tool/compiler/default/init.lux
@@ -11,13 +11,13 @@
    [data
     [binary (.only Binary)]
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" dictionary]
      ["[0]" set]
-     ["[0]" sequence ("[1]#[0]" functor)]]]
+     ["[0]" sequence (.open: "[1]#[0]" functor)]]]
    [meta
     ["[0]" configuration (.only Configuration)]
     ["[0]" version]]
diff --git a/stdlib/source/library/lux/tool/compiler/default/platform.lux b/stdlib/source/library/lux/tool/compiler/default/platform.lux
index 72504779c..680a6a759 100644
--- a/stdlib/source/library/lux/tool/compiler/default/platform.lux
+++ b/stdlib/source/library/lux/tool/compiler/default/platform.lux
@@ -9,22 +9,22 @@
    [control
     ["[0]" function]
     ["[0]" maybe]
-    ["[0]" try (.only Try) ("[1]#[0]" monad)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" monad)]
     ["[0]" exception (.only exception:)]
     [concurrency
-     ["[0]" async (.only Async Resolver) ("[1]#[0]" monad)]
+     ["[0]" async (.only Async Resolver) (.open: "[1]#[0]" monad)]
      ["[0]" stm (.only Var STM)]]]
    [data
     ["[0]" binary (.only Binary)]
     ["[0]" bit]
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
      ["[0]" dictionary (.only Dictionary)]
-     ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)]
+     ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" mix)]
      ["[0]" set (.only Set)]
-     ["[0]" list ("[1]#[0]" monoid functor mix)]]
+     ["[0]" list (.open: "[1]#[0]" monoid functor mix)]]
     [format
      ["_" binary (.only Writer)]]]
    ["[0]" meta (.only)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux
index d79a962ca..0c8e86526 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux
@@ -14,11 +14,11 @@
      ["<[0]>" code]]]
    [data
     ["[0]" product]
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only Format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     [syntax (.only syntax:)]]
    [math
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux
index 633d8868b..65c8db0cb 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux
@@ -5,11 +5,11 @@
     [equivalence (.only Equivalence)]
     [hash (.only Hash)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     ["[0]" text (.only)
      ["%" format (.only Format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number
      ["n" nat]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux
index 0a13c9c40..4573ad571 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux
@@ -5,23 +5,23 @@
     [equivalence (.except)]
     ["[0]" monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" monoid monad)]
+    ["[0]" maybe (.open: "[1]#[0]" monoid monad)]
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     ["[0]" text (.only)
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" dictionary (.only Dictionary)]
-     ["[0]" set (.only Set) ("[1]#[0]" equivalence)]]]
+     ["[0]" set (.only Set) (.open: "[1]#[0]" equivalence)]]]
    [macro
     ["^" pattern]
     ["[0]" template]]
    [math
     [number
-     ["n" nat ("[1]#[0]" interval)]
+     ["n" nat (.open: "[1]#[0]" interval)]
      ["i" int]
      ["r" rev]
      ["f" frac]]]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux
index 8b3ec93ca..7ac9ebff8 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux
@@ -13,7 +13,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
    [macro
     ["^" pattern]
     ["[0]" template]]
@@ -28,7 +28,7 @@
    [phase
     ["[0]" extension]]
    [///
-    ["[0]" phase ("[1]#[0]" monad)]
+    ["[0]" phase (.open: "[1]#[0]" monad)]
     [meta
      [archive (.only Archive)]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux
index 46ac4596a..9aabc7d10 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux
@@ -8,10 +8,10 @@
     ["[0]" try]
     ["[0]" exception (.only exception:)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" mix functor)]
+     ["[0]" list (.open: "[1]#[0]" mix functor)]
      [dictionary
       ["[0]" plist]]]]
    ["[0]" meta]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux
index 970c62d7c..bf221d35b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux
@@ -4,14 +4,14 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" monad)]
+    ["[0]" maybe (.open: "[1]#[0]" monad)]
     ["[0]" try]
     ["[0]" exception (.only exception:)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix monoid)]
+     ["[0]" list (.open: "[1]#[0]" functor mix monoid)]
      [dictionary
       ["[0]" plist]]]]]]
  ["/" // (.only Environment Operation Phase)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux
index ff3deb58d..4907be964 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux
@@ -4,8 +4,8 @@
    [abstract
     [equivalence (.only Equivalence)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only Format)]]]
    [macro
     ["^" pattern]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux
index 39e1fae5d..7f1c5d418 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux
@@ -7,7 +7,7 @@
     ["[0]" try]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" monoid)]]]]]
+     ["[0]" list (.open: "[1]#[0]" monoid)]]]]]
  [//
   ["[0]" analysis]
   ["[0]" synthesis]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux b/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux
index 829cbb4a4..1499d8081 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux
@@ -10,11 +10,11 @@
    [data
     [binary (.only Binary)]
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
      ["[0]" sequence (.only Sequence)]
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set (.only Set)]]]
    [macro
     ["^" pattern]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux
index 7fd1b74a9..70dd51a99 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux
@@ -13,7 +13,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" mix monoid monad)]]]
+     ["[0]" list (.open: "[1]#[0]" mix monoid monad)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux
index 411440e41..eeb30664f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux
@@ -11,10 +11,10 @@
     ["[0]" state]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monad)]
+     ["[0]" list (.open: "[1]#[0]" monad)]
      ["[0]" dictionary (.only Dictionary)]]]
    [macro
     ["[0]" code]]
@@ -35,7 +35,7 @@
      ["[1][0]" type]
      ["[1][0]" inference]]
     [///
-     ["[1]" phase ("[1]#[0]" monad)]
+     ["[1]" phase (.open: "[1]#[0]" monad)]
      [meta
       [archive (.only Archive)]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux
index 57dfe4a2f..19e415b29 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux
@@ -13,7 +13,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monoid monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid monad)]]]
    [math
     [number
      ["n" nat]]]
@@ -27,7 +27,7 @@
     ["[1][0]" inference]
     ["[1][0]" scope]]
    [///
-    ["[1]" phase ("[1]#[0]" functor)]
+    ["[1]" phase (.open: "[1]#[0]" functor)]
     [reference (.only)
      [variable (.only)]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux
index 0bbb089ce..cea38091d 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux
@@ -7,7 +7,7 @@
    [control
     ["[0]" exception (.only exception:)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [macro
     ["^" pattern]]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux
index a007bdb45..be4a0fd6f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux
@@ -11,7 +11,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" mix monoid)]]]]]
+     ["[0]" list (.open: "[1]#[0]" mix monoid)]]]]]
  ["[0]" //
   ["[1][0]" extension]
   ["[1][0]" analysis]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux
index ed854b3cb..493776886 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux
@@ -11,7 +11,7 @@
     ["[0]" exception (.only exception:)]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" order)
+    ["[0]" text (.open: "[1]#[0]" order)
      ["%" format (.only Format format)]]
     [collection
      ["[0]" list]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux
index 49ac7d0fd..b7feef155 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux
@@ -8,8 +8,8 @@
     ["[0]" predicate]]
    [control
     ["[0]" pipe]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try (.only Try) ("[1]#[0]" monad)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" monad)]
     ["[0]" exception (.only exception:)]
     ["<>" parser (.only)
      ["<[0]>" code (.only Parser)]
@@ -17,10 +17,10 @@
    [data
     [binary (.only Binary)]
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" mix monad monoid)]
+     ["[0]" list (.open: "[1]#[0]" mix monad monoid)]
      ["[0]" array]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" sequence]]
@@ -36,8 +36,8 @@
    [target
     ["[0]" jvm
      ["[0]!" reflection]
-     ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)]
-     ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+     ["_" bytecode (.only Bytecode) (.open: "[1]#[0]" monad)]
+     ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
      ["[0]" attribute]
      ["[0]" field]
      ["[0]" version]
@@ -47,7 +47,7 @@
       ["[0]" pool (.only Resource)]]
      [encoding
       ["[0]" name (.only External)]]
-     ["[1]" type (.only Type Argument Typed) ("[1]#[0]" equivalence)
+     ["[1]" type (.only Type Argument Typed) (.open: "[1]#[0]" equivalence)
       ["[0]" category (.only Void Value' Value Return' Return Primitive Object Class Array Var Parameter Method)]
       ["[0]" box]
       ["[0]" reflection]
@@ -57,7 +57,7 @@
       ["[0]" alias (.only Aliasing)]
       ["[0]T" lux (.only Mapping)]]]]
    ["[0]" type (.only)
-    ["[0]" check (.only Check) ("[1]#[0]" monad)]]]]
+    ["[0]" check (.only Check) (.open: "[1]#[0]" monad)]]]]
  ["[0]" //
   ["[1][0]" lux (.only custom)]
   ["/[1]" // (.only)
@@ -78,7 +78,7 @@
       ["[0]A" type]
       ["[0]" scope]]
      [///
-      ["[0]" phase ("[1]#[0]" monad)]
+      ["[0]" phase (.open: "[1]#[0]" monad)]
       [meta
        [archive (.only Archive)
         [module
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
index 3f973aadb..76f36e336 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
@@ -13,7 +13,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" dictionary (.only Dictionary)]]]
    [macro
     ["^" pattern]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux
index 7929f2f83..b770c31cc 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux
@@ -7,7 +7,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" dictionary (.only Dictionary)]]]]]
  [// (.only Handler Bundle)])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux
index 4bf7e260c..025e863d3 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux
@@ -6,9 +6,9 @@
     ["[0]" monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]
      ["<[0]>" text]
      ["<[0]>" synthesis]]]
@@ -18,7 +18,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" dictionary]
      ["[0]" sequence]
      ["[0]" set (.only Set)]]
@@ -33,8 +33,8 @@
      ["[0]" i32]]]
    [target
     [jvm
-     ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)]
-     ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+     ["_" bytecode (.only Bytecode) (.open: "[1]#[0]" monad)]
+     ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
      ["[0]" attribute]
      ["[0]" field]
      ["[0]" version]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux
index b8302f85c..b66e2cc05 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux
@@ -7,7 +7,7 @@
     ["[0]" monad (.only do)]]
    [control
     [io (.only IO)]
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" try]
     ["[0]" exception (.only exception:)]
     ["<>" parser (.only)
@@ -20,7 +20,7 @@
     [collection
      ["[0]" dictionary]
      ["[0]" array]
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set (.only Set)]]]
    [macro
     ["^" pattern]
@@ -28,7 +28,7 @@
    [math
     [number
      ["n" nat]]]
-   ["[0]" type (.only sharing) ("[1]#[0]" equivalence)
+   ["[0]" type (.only sharing) (.open: "[1]#[0]" equivalence)
     ["[0]" check]]]]
  ["[0]" /// (.only Extender)
   ["[1][0]" bundle]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux
index 49681e787..355dd5182 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux
@@ -15,7 +15,7 @@
     [collection
      ["[0]" dictionary]
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [math
     [number
      ["f" frac]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux
index b12fc2949..f9ad9a81e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux
@@ -10,7 +10,7 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" dictionary]]]
    [macro
     ["^" pattern]]
@@ -37,7 +37,7 @@
    [//
     ["[0]" synthesis (.only %synthesis)]
     [///
-     ["[1]" phase ("[1]#[0]" monad)]]]]])
+     ["[1]" phase (.open: "[1]#[0]" monad)]]]]])
 
 (def: .public (custom [parser handler])
   (All (_ s)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux
index 2da6d5756..cbae57e3c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux
@@ -11,7 +11,7 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" monad)]
+     ["[0]" list (.open: "[1]#[0]" monad)]
      ["[0]" dictionary]]]
    [math
     [number
@@ -19,7 +19,7 @@
      ["[0]" i32]]]
    [target
     [jvm
-     ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad)]
+     ["_" bytecode (.only Label Bytecode) (.open: "[1]#[0]" monad)]
      [encoding
       ["[0]" signed (.only S4)]]
      ["[0]" type (.only Type)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux
index eaf40a8ee..4e60e6693 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux
@@ -4,17 +4,17 @@
    [abstract
     ["[0]" monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only exception:)]
     ["<>" parser (.only)
      ["<[0]>" text]
      ["<[0]>" synthesis (.only Parser)]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" monad mix monoid)]
+     ["[0]" list (.open: "[1]#[0]" monad mix monoid)]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" set (.only Set)]
      ["[0]" sequence]]
@@ -30,14 +30,14 @@
    [target
     [jvm
      ["[0]" version]
-     ["[0]" modifier ("[1]#[0]" monoid)]
+     ["[0]" modifier (.open: "[1]#[0]" monoid)]
      ["[0]" method (.only Method)]
      ["[0]" class (.only Class)]
      [constant
       [pool (.only Resource)]]
      [encoding
       ["[0]" name]]
-     ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)
+     ["_" bytecode (.only Bytecode) (.open: "[1]#[0]" monad)
       ["__" instruction (.only Primitive_Array_Type)]]
      ["[0]" type (.only Type Typed Argument)
       ["[0]" category (.only Void Value' Value Return' Return Primitive Object Array Var Parameter)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux
index f06cab2c6..834d3448c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux
@@ -14,7 +14,7 @@
      ["%" format (.only format)]]
     [collection
      ["[0]" dictionary]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["^" pattern]]
    [math
@@ -41,7 +41,7 @@
     ["[0]" synthesis (.only %synthesis)]
     ["[0]" generation]
     [///
-     ["[1]" phase ("[1]#[0]" monad)]]]]])
+     ["[1]" phase (.open: "[1]#[0]" monad)]]]]])
 
 (def: .public (custom [parser handler])
   (All (_ s)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux
index 25eeba0bc..ef05fe70f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux
@@ -15,7 +15,7 @@
     [collection
      ["[0]" dictionary]
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [math
     [number
      ["f" frac]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux
index b7219747b..22ffda36e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux
@@ -14,7 +14,7 @@
      ["%" format (.only format)]]
     [collection
      ["[0]" dictionary]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["^" pattern]]
    [math
@@ -43,7 +43,7 @@
     ["[0]" synthesis (.only %synthesis)]
     ["[0]" generation]
     [///
-     ["[1]" phase ("[1]#[0]" monad)]]]]])
+     ["[1]" phase (.open: "[1]#[0]" monad)]]]]])
 
 (def: .public (statement expression archive synthesis)
   Phase!
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux
index afd160be3..35e433e8e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux
@@ -15,7 +15,7 @@
     [collection
      ["[0]" dictionary]
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [math
     [number
      ["f" frac]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux
index c0bfdf7ed..e7395899b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux
@@ -14,7 +14,7 @@
      ["%" format (.only format)]]
     [collection
      ["[0]" dictionary]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["^" pattern]]
    [math
@@ -41,7 +41,7 @@
     ["[0]" synthesis (.only %synthesis)]
     ["[0]" generation]
     [///
-     ["[1]" phase ("[1]#[0]" monad)]]]]])
+     ["[1]" phase (.open: "[1]#[0]" monad)]]]]])
 
 (def: .public (custom [parser handler])
   (All (_ s)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux
index 8d445eb3c..9dbea2892 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux
@@ -15,7 +15,7 @@
     [collection
      ["[0]" dictionary]
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [math
     [number
      ["f" frac]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux
index f88c04f0a..33572414f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux
@@ -21,7 +21,7 @@
      [analysis (.only)]
      ["[1][0]" synthesis]
      ["//[1]" ///
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [reference (.only)
        [variable (.only)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux
index 6f93eb386..7a5c774c4 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux
@@ -9,7 +9,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix monoid)]
+     ["[0]" list (.open: "[1]#[0]" functor mix monoid)]
      ["[0]" set]]]
    [macro
     ["^" pattern]]
@@ -33,7 +33,7 @@
      ["//[1]" ///
       [reference
        ["[1][0]" variable (.only Register)]]
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [meta
        [archive (.only Archive)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux
index 412bf27b7..77569b17e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux
@@ -10,7 +10,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [target
     ["_" common_lisp (.only Expression Var/1)]]]]
  ["[0]" //
@@ -25,7 +25,7 @@
     ["[1][0]" generation (.only Context)]
     ["//[1]" ///
      [arity (.only Arity)]
-     ["[1][0]" phase ("[1]#[0]" monad)]
+     ["[1][0]" phase (.open: "[1]#[0]" monad)]
      [reference
       [variable (.only Register Variable)]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux
index d80a015e6..287d9a6c3 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux
@@ -8,7 +8,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux
index efbf5c321..e9bbd9a5c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux
@@ -10,11 +10,11 @@
      ["<[0]>" code]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]
      ["[0]" encoding]]
     [collection
-     ["[0]" list ("[1]#[0]" functor monoid)]
+     ["[0]" list (.open: "[1]#[0]" functor monoid)]
      ["[0]" sequence]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux
index 4498fdb1f..b14e852b1 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux
@@ -12,7 +12,7 @@
    [analysis (.only Variant Tuple)]
    ["[1][0]" synthesis (.only Synthesis)]
    ["//[1]" ///
-    ["[1][0]" phase ("[1]#[0]" monad)]]]])
+    ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
 
 (def: .public (tuple expression archive elemsS+)
   (Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux
index 5bfe69fea..317114afc 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux
@@ -8,7 +8,7 @@
      ["<[0]>" code]]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    ["[0]" meta]
    ["[0]" macro (.only with_symbols)
     ["[0]" code]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux
index dde4dcea2..02540a965 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux
@@ -28,7 +28,7 @@
      [analysis (.only)]
      ["[0]" synthesis]
      ["//[1]" ///
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [reference (.only)
        [variable (.only)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux
index 13d1ed400..9afe42e0c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux
@@ -8,7 +8,7 @@
    [data
     ["[0]" text]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["^" pattern]]
    [math
@@ -32,7 +32,7 @@
      ["//[1]" ///
       [reference
        [variable (.only Register)]]
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [meta
        [archive (.only Archive)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux
index 69db5cdd4..69b575162 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux
@@ -8,7 +8,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [target
     ["_" js (.only Expression Computation Var Statement)]]]]
  ["[0]" //
@@ -23,7 +23,7 @@
     ["[1][0]" generation]
     ["//[1]" ///
      [arity (.only Arity)]
-     ["[1][0]" phase ("[1]#[0]" monad)]
+     ["[1][0]" phase (.open: "[1]#[0]" monad)]
      [reference
       [variable (.only Register Variable)]]
      [meta
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux
index 32823cd17..9849f3981 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux
@@ -8,7 +8,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux
index 5605d56ee..12359b713 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux
@@ -10,12 +10,12 @@
      ["<[0]>" code]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" sequence]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux
index b57b4b344..14e911912 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux
@@ -13,7 +13,7 @@
    [analysis
     [complex (.only Variant Tuple)]]
    ["//[1]" /// (.only)
-    ["[1][0]" phase ("[1]#[0]" monad)]]]])
+    ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
 
 (def: .public (tuple generate archive elemsS+)
   (Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux
index 73c286f0c..c4b026541 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux
@@ -19,7 +19,7 @@
     ["[0]" synthesis]
     [///
      ["[0]" reference]
-     ["[1]" phase ("[1]#[0]" monad)]]]]])
+     ["[1]" phase (.open: "[1]#[0]" monad)]]]]])
 
 (def: .public (generate archive synthesis)
   Phase
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux
index e718b504d..8fb2dcd0c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux
@@ -7,8 +7,8 @@
     ["[0]" function]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]
-    ["[0]" text ("[1]#[0]" equivalence)
+     ["[0]" list (.open: "[1]#[0]" mix)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [macro
     ["^" pattern]]
@@ -18,7 +18,7 @@
      ["[0]" i32]]]
    [target
     [jvm
-     ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad)
+     ["_" bytecode (.only Label Bytecode) (.open: "[1]#[0]" monad)
       [environment
        [limit
         ["[0]" stack]]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux
index b89b43d67..28e90a032 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux
@@ -6,7 +6,7 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" monoid functor)]
+     ["[0]" list (.open: "[1]#[0]" monoid functor)]
      ["[0]" sequence]]
     ["[0]" format
      ["[1]" binary]]]
@@ -17,10 +17,10 @@
    [target
     [jvm
      ["[0]" version]
-     ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+     ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
      ["[0]" field (.only Field)]
      ["[0]" method (.only Method)]
-     ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad)]
+     ["_" bytecode (.only Label Bytecode) (.open: "[1]#[0]" monad)]
      ["[0]" class (.only Class)]
      ["[0]" type (.only Type)
       [category (.only Return' Value')]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux
index 7d2ad1f85..4aea4dc4f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux
@@ -7,7 +7,7 @@
    [target
     [jvm
      ["[0]" field (.only Field)]
-     ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+     ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
      [type (.only Type)
       [category (.only Value)]]
      [constant
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux
index 2a0bc8cd9..737c6ac4b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux
@@ -3,11 +3,11 @@
   [lux (.except Type type)
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" sequence]]]
    [target
     [jvm
-     ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+     ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
      ["[0]" field (.only Field)]
      ["_" bytecode (.only Bytecode)]
      [type (.only Type)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux
index 810ce179e..1684e6f8c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux
@@ -5,14 +5,14 @@
     ["[0]" monad]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number
      ["n" nat]]]
    [target
     [jvm
      ["[0]" field (.only Field)]
-     ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)]
+     ["_" bytecode (.only Bytecode) (.open: "[1]#[0]" monad)]
      [type (.only Type)
       [category (.only Class)]]
      [constant
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux
index 83a14abc9..1301e055c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux
@@ -3,7 +3,7 @@
   [lux (.except)
    [target
     [jvm
-     ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+     ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
      ["[0]" method (.only Method)]]]]])
 
 (def: .public modifier
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux
index 19f568571..69e7d5332 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux
@@ -7,7 +7,7 @@
     ["[0]" try]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" monoid functor)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid functor)]]]
    [math
     [number
      ["n" nat]
@@ -15,7 +15,7 @@
      ["[0]" i32]]]
    [target
     [jvm
-     ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad)]
+     ["_" bytecode (.only Label Bytecode) (.open: "[1]#[0]" monad)]
      ["[0]" method (.only Method)]
      [constant
       [pool (.only Resource)]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux
index 53f43707d..e7e970d87 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux
@@ -9,7 +9,7 @@
      ["n" nat]]]
    [target
     [jvm
-     ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+     ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
      ["[0]" method (.only Method)]
      ["_" bytecode (.only Label Bytecode)]
      [constant
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux
index da0d00cb2..32a1e4de8 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux
@@ -7,7 +7,7 @@
     ["[0]" try]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" monoid functor)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid functor)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux
index f52b7d682..51ceaf844 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux
@@ -3,7 +3,7 @@
   [lux (.except Type type)
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [target
     [jvm
      ["[0]" method (.only Method)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux
index dc28346dc..ebd1008a1 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux
@@ -14,7 +14,7 @@
    [data
     [binary (.only Binary)]
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]]
     [collection
      ["[0]" array]
@@ -26,7 +26,7 @@
     [jvm
      ["_" bytecode (.only Bytecode)]
      ["[0]" loader (.only Library)]
-     ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+     ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
      ["[0]" field (.only Field)]
      ["[0]" method (.only Method)]
      ["[0]" version]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux
index a0d7cffbc..f06d37da3 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux
@@ -8,13 +8,13 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number
      ["n" nat]]]
    [target
     [jvm
-     ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)]]]]]
+     ["_" bytecode (.only Bytecode) (.open: "[1]#[0]" monad)]]]]]
  ["[0]" //
   ["[1][0]" runtime (.only Operation Phase Generator)]
   ["[1][0]" value]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux
index 94df434f2..6f9aa8aa3 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux
@@ -13,7 +13,7 @@
    [target
     [jvm
      ["_" bytecode (.only Bytecode)]
-     ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+     ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
      ["[0]" method (.only Method)]
      ["[0]" version]
      ["[0]" class (.only Class)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux
index 9ff51ff95..d923ea65d 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux
@@ -10,7 +10,7 @@
     [binary (.only Binary)]
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" sequence]]
     ["[0]" format
      ["[1]" binary]]
@@ -26,7 +26,7 @@
    [target
     ["[0]" jvm
      ["_" bytecode (.only Label Bytecode)]
-     ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+     ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
      ["[0]" field (.only Field)]
      ["[0]" method (.only Method)]
      ["[1]/[0]" version]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux
index d2fdbb1cc..a415f60fa 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux
@@ -4,7 +4,7 @@
    [target
     [jvm
      ["_" bytecode (.only Bytecode)]
-     ["[0]" type (.only Type) ("[1]#[0]" equivalence)
+     ["[0]" type (.only Type) (.open: "[1]#[0]" equivalence)
       [category (.only Primitive)]
       ["[0]" box]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux
index 859c60b50..8d861e382 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux
@@ -28,7 +28,7 @@
      [analysis (.only)]
      ["[0]" synthesis]
      ["//[1]" ///
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [reference (.only)
        [variable (.only)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux
index 59d0fa42d..c65093838 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux
@@ -7,7 +7,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set]]]
    [macro
     ["^" pattern]]
@@ -30,7 +30,7 @@
      ["//[1]" ///
       [reference
        ["[1][0]" variable (.only Register)]]
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [meta
        [archive (.only Archive)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux
index d2907e282..a8757090a 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux
@@ -8,7 +8,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [target
     ["_" lua (.only Var Expression Label Statement)]]]]
  ["[0]" //
@@ -23,7 +23,7 @@
     ["[1][0]" generation]
     ["//[1]" ///
      [arity (.only Arity)]
-     ["[1][0]" phase ("[1]#[0]" monad)]
+     ["[1][0]" phase (.open: "[1]#[0]" monad)]
      [meta
       [archive
        ["[0]" unit]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux
index 66b05a97e..c79123870 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux
@@ -8,7 +8,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" set]]]
    [math
     [number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux
index 4f31dd592..9b72bdf74 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux
@@ -10,12 +10,12 @@
      ["<[0]>" code]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" sequence]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux
index 1b8610f2b..65ed33699 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux
@@ -13,7 +13,7 @@
    [analysis
     [complex (.only Variant Tuple)]]
    ["//[1]" ///
-    ["[1][0]" phase ("[1]#[0]" monad)]]]])
+    ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
 
 (def: .public (tuple phase archive elemsS+)
   (Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux
index 38c06a8c2..3d2107867 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux
@@ -25,7 +25,7 @@
      [analysis (.only)]
      ["[1][0]" synthesis]
      ["//[1]" ///
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [reference (.only)
        [variable (.only)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux
index 03c82f322..9815d9e3e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux
@@ -8,7 +8,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set]]]
    [macro
     ["^" pattern]]
@@ -32,7 +32,7 @@
      ["//[1]" ///
       [reference
        ["[1][0]" variable (.only Register)]]
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [meta
        [archive (.only Archive)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux
index e304677d2..b6c9d1ab2 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux
@@ -10,7 +10,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [target
     ["_" php (.only Var Global Expression Argument Label Statement)]]]]
  ["[0]" //
@@ -25,7 +25,7 @@
     ["[1][0]" generation (.only Context)]
     ["//[1]" ///
      [arity (.only Arity)]
-     ["[1][0]" phase ("[1]#[0]" monad)]
+     ["[1][0]" phase (.open: "[1]#[0]" monad)]
      [reference
       [variable (.only Register Variable)]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux
index 5fab85e16..633b2c724 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux
@@ -8,7 +8,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set (.only Set)]]]
    [math
     [number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux
index 68b9671b1..649463554 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux
@@ -10,12 +10,12 @@
      ["<[0]>" code]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" sequence]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux
index e843e0676..d7a945e58 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux
@@ -15,7 +15,7 @@
    [analysis (.only Variant Tuple)]
    ["[1][0]" synthesis (.only Synthesis)]
    ["//[1]" ///
-    ["[1][0]" phase ("[1]#[0]" monad)]]]])
+    ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
 
 (def: .public (tuple expression archive elemsS+)
   (Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux
index 96a5ebc4e..f3e8d85b8 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux
@@ -28,7 +28,7 @@
      [analysis (.only)]
      ["[1][0]" synthesis]
      ["//[1]" ///
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [reference (.only)
        [variable (.only)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux
index cbf957e34..dbb669dd8 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux
@@ -7,7 +7,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set]]]
    [macro
     ["^" pattern]]
@@ -34,7 +34,7 @@
      ["//[1]" ///
       [reference
        ["[1][0]" variable (.only Register)]]
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [meta
        [archive (.only Archive)]
        ["[0]" cache
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux
index ee09d8060..feb8d0c26 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux
@@ -8,7 +8,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [target
     ["_" python (.only SVar Expression Statement)]]]]
  ["[0]" //
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux
index d48bad978..d4e202ffc 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux
@@ -8,7 +8,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set]]]
    [math
     [number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux
index 135f8db40..bc10a524b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux
@@ -9,12 +9,12 @@
      ["<[0]>" code]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" sequence]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux
index d8e397694..560fb1c49 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux
@@ -13,7 +13,7 @@
     [complex (.only Variant Tuple)]]
    ["[1][0]" synthesis (.only Synthesis)]
    ["//[1]" ///
-    ["[1][0]" phase ("[1]#[0]" monad)]]]])
+    ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
 
 (def: .public (tuple generate archive elemsS+)
   (Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux
index 8c8ec4fea..3e4cf4f0e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux
@@ -23,7 +23,7 @@
      [analysis (.only)]
      ["[1][0]" synthesis]
      ["//[1]" ///
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [reference (.only)
        [variable (.only)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux
index 60f553909..1ad75fe08 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux
@@ -8,7 +8,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set]]]
    [macro
     ["^" pattern]
@@ -33,7 +33,7 @@
      ["//[1]" ///
       [reference
        ["[1][0]" variable (.only Register)]]
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [meta
        [archive (.only Archive)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux
index a523fc621..59b92e776 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux
@@ -10,7 +10,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [target
     ["_" r (.only Expression SVar)]]]]
  ["[0]" //
@@ -25,7 +25,7 @@
     ["[1][0]" generation (.only Context)]
     ["//[1]" ///
      [arity (.only Arity)]
-     ["[1][0]" phase ("[1]#[0]" monad)]
+     ["[1][0]" phase (.open: "[1]#[0]" monad)]
      [reference
       [variable (.only Register Variable)]]
      [meta
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux
index c71e536d2..f3756aad8 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux
@@ -8,7 +8,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" set (.only Set)]]]
    [math
     [number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux
index 9bee4f953..e430bfaff 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux
@@ -10,12 +10,12 @@
      ["<[0]>" code]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" sequence]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
@@ -23,7 +23,7 @@
    [math
     [number (.only hex)
      ["n" nat]
-     ["i" int ("[1]#[0]" interval)]
+     ["i" int (.open: "[1]#[0]" interval)]
      ["[0]" i64]]]
    ["@" target (.only)
     ["_" r (.only SVar Expression)]]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux
index 82dc15ca4..f41b3268d 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux
@@ -15,7 +15,7 @@
    [analysis (.only Variant Tuple)]
    ["[1][0]" synthesis (.only Synthesis)]
    ["//[1]" ///
-    ["[1][0]" phase ("[1]#[0]" monad)]]]])
+    ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
 
 (def: .public (tuple expression archive elemsS+)
   (Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux
index 0c7d531b9..f93648d04 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux
@@ -10,7 +10,7 @@
  ["[0]" ////
   ["[1][0]" generation]
   ["//[1]" ///
-   ["[0]" phase ("[1]#[0]" monad)]
+   ["[0]" phase (.open: "[1]#[0]" monad)]
    ["[0]" reference (.only Reference)
     ["[0]" variable (.only Register Variable)]]
    [meta
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux
index 218c8f226..f0e8638e4 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux
@@ -28,7 +28,7 @@
      [analysis (.only)]
      ["[1][0]" synthesis]
      ["//[1]" ///
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [reference (.only)
        [variable (.only)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux
index bf7a4bc42..0f805e277 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux
@@ -9,7 +9,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set]]]
    [macro
     ["^" pattern]]
@@ -36,7 +36,7 @@
      ["//[1]" ///
       [reference
        ["[1][0]" variable (.only Register)]]
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [meta
        [archive (.only Archive)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux
index c32ea1cc3..d0ff811b2 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux
@@ -8,7 +8,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [target
     ["_" ruby (.only LVar GVar Expression Statement)]]]]
  ["[0]" //
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux
index e5acb087a..3686ad6d9 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux
@@ -8,7 +8,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set]]]
    [math
     [number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux
index bb811fc61..e309396f2 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux
@@ -10,12 +10,12 @@
      ["<[0]>" code]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" sequence]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
@@ -23,7 +23,7 @@
    [math
     [number (.only hex)
      ["[0]" i64]
-     ["[0]" int ("[1]#[0]" interval)]]]
+     ["[0]" int (.open: "[1]#[0]" interval)]]]
    ["@" target (.only)
     ["_" ruby (.only Expression LVar Computation Literal Statement)]]]]
  ["[0]" ///
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux
index 4ebe22359..791f06d76 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux
@@ -13,7 +13,7 @@
     [complex (.only Variant Tuple)]]
    ["[1][0]" synthesis (.only Synthesis)]
    ["//[1]" ///
-    ["[1][0]" phase ("[1]#[0]" monad)]]]])
+    ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
 
 (def: .public (tuple generate archive elemsS+)
   (Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux
index 3e9b76aa3..061a5c26c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux
@@ -23,7 +23,7 @@
      [analysis (.only)]
      ["[1][0]" synthesis]
      ["//[1]" ///
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [reference (.only)
        [variable (.only)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux
index d111d7349..0c5465e96 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux
@@ -8,7 +8,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set]]]
    [macro
     ["^" pattern]
@@ -33,7 +33,7 @@
      ["//[1]" ///
       [reference
        ["[1][0]" variable (.only Register)]]
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [meta
        [archive (.only Archive)]]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux
index fe13c1aa2..f74911bc3 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux
@@ -13,7 +13,7 @@
     [number (.only hex)
      ["f" frac]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["dict" dictionary (.only Dictionary)]]]
    ["[0]" macro (.only with_symbols)
     ["[0]" code]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux
index baf83633b..c937c11e7 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux
@@ -10,7 +10,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [target
     ["_" scheme (.only Expression Computation Var)]]]]
  ["[0]" //
@@ -25,7 +25,7 @@
     ["[1][0]" generation (.only Context)]
     ["//[1]" ///
      [arity (.only Arity)]
-     ["[1][0]" phase ("[1]#[0]" monad)]
+     ["[1][0]" phase (.open: "[1]#[0]" monad)]
      [reference
       [variable (.only Register Variable)]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux
index 0f7a9c50a..6796a3944 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux
@@ -8,7 +8,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" set (.only Set)]]]
    [math
     [number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux
index c60d67bd1..94b77f919 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux
@@ -10,12 +10,12 @@
      ["<[0]>" code]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" sequence]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux
index 2c90b2010..ec1611ddf 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux
@@ -15,7 +15,7 @@
    [analysis (.only Variant Tuple)]
    ["[1][0]" synthesis (.only Synthesis)]
    ["//[1]" ///
-    ["[1][0]" phase ("[1]#[0]" monad)]]]])
+    ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
 
 (def: .public (tuple expression archive elemsS+)
   (Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux
index 0600ba9c0..99db4589b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux
@@ -8,7 +8,7 @@
     ["[0]" try]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" dictionary (.only Dictionary)]]]
    [macro
     ["^" pattern]]]]
@@ -25,7 +25,7 @@
      ["[2][0]" simple]
      ["[2][0]" complex]]
     [///
-     ["[0]" phase ("[1]#[0]" monad)]
+     ["[0]" phase (.open: "[1]#[0]" monad)]
      [reference (.only)
       [variable (.only)]]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux
index 5890ab241..bdbcdeb02 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux
@@ -8,10 +8,10 @@
     ["[0]" pipe]]
    [data
     ["[0]" product]
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix monoid)]
+     ["[0]" list (.open: "[1]#[0]" functor mix monoid)]
      ["[0]" set (.only Set)]]]
    [macro
     ["^" pattern]]
@@ -31,7 +31,7 @@
      ["[2][0]" side]
      ["[2][0]" member (.only Member)]]]
    [///
-    ["[1]" phase ("[1]#[0]" monad)]
+    ["[1]" phase (.open: "[1]#[0]" monad)]
     ["[1][0]" reference (.only)
      ["[1]/[0]" variable (.only Register Variable)]]
     [meta
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux
index f1e08702f..dec9a0177 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux
@@ -6,13 +6,13 @@
     ["[0]" enum]]
    [control
     ["[0]" pipe]
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only exception:)]]
    [data
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
    [macro
     ["^" pattern]]
    [math
@@ -26,7 +26,7 @@
    ["/" synthesis (.only Path Abstraction Synthesis Operation Phase)]
    [///
     [arity (.only Arity)]
-    ["[0]" phase ("[1]#[0]" monad)]
+    ["[0]" phase (.open: "[1]#[0]" monad)]
     ["[1][0]" reference (.only)
      ["[1]/[0]" variable (.only Register Variable)]]]]])
 
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
index e8388ed17..b3cb4d704 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
@@ -4,7 +4,7 @@
    [abstract
     ["[0]" monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" monad)]]
+    ["[0]" maybe (.open: "[1]#[0]" monad)]]
    [data
     [collection
      ["[0]" list]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
index f774ddb6d..584612bbb 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
@@ -4,7 +4,7 @@
    [abstract
     ["[0]" monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]]
    [data
@@ -13,7 +13,7 @@
      ["%" format]]
     [collection
      ["[0]" dictionary (.only Dictionary)]
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" set]]]
    [macro
     ["^" pattern]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/program.lux b/stdlib/source/library/lux/tool/compiler/language/lux/program.lux
index 30276425b..11d63955b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/program.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/program.lux
@@ -12,7 +12,7 @@
     [text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]]]
  [////
   [meta
    ["[0]" archive (.only Archive)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux
index fbc202680..d1cad0503 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux
@@ -11,11 +11,11 @@
    [data
     ["[0]" sum]
     ["[0]" product]
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only Format format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" dictionary (.only Dictionary)]]]
    [macro
     ["^" pattern]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux
index f925aa95c..17419d58f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux
@@ -7,14 +7,14 @@
    [control
     ["[0]" pipe]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format]]]
    [macro
     ["^" pattern]]
    [math
     [number
-     ["[0]" i64 ("[1]#[0]" equivalence)]
+     ["[0]" i64 (.open: "[1]#[0]" equivalence)]
      ["n" nat]
      ["i" int]
      ["f" frac]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive.lux b/stdlib/source/library/lux/tool/compiler/meta/archive.lux
index 41d12fdc2..b88b57053 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/archive.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/archive.lux
@@ -19,13 +19,13 @@
     [format
      ["[0]" binary (.only Writer)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" set]
      ["[0]" sequence (.only Sequence)]]]
    [math
     [number
-     ["n" nat ("[1]#[0]" equivalence)]]]
+     ["n" nat (.open: "[1]#[0]" equivalence)]]]
    [type
     [primitive (.except)]]]]
  [/
diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux
index 085e3d001..146b2d12d 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux
@@ -7,7 +7,7 @@
     ["[0]" maybe]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [macro
     ["^" pattern]]
    [math
diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux
index 7daff5d95..7f0f4faeb 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux
@@ -16,7 +16,7 @@
    [type (.only sharing)
     [primitive (.except)]]]]
  [///
-  ["[0]" signature (.only Signature) ("[1]#[0]" equivalence)]
+  ["[0]" signature (.only Signature) (.open: "[1]#[0]" equivalence)]
   ["[0]" key (.only Key)]])
 
 (exception: .public (invalid_signature [expected Signature
diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux
index 56586bd2e..3b849a479 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux
@@ -5,7 +5,7 @@
     [monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only exception:)]
     ["<>" parser (.only)
      ["<[0]>" binary (.only Parser)]]]
@@ -16,7 +16,7 @@
     [collection
      [set (.only Set)]
      ["[0]" list]
-     ["[0]" sequence (.only Sequence) ("[1]#[0]" functor mix)]
+     ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" functor mix)]
      ["[0]" dictionary (.only Dictionary)]]
     [format
      ["[0]" binary (.only Writer)]]]
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux
index 18a6165f6..8008fe5a6 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux
@@ -8,7 +8,7 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" monoid mix monad)]
+     ["[0]" list (.open: "[1]#[0]" monoid mix monad)]
      ["[0]" set (.only Set)]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" sequence]]]
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux
index fb2fa3ab8..b1d64ebb5 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux
@@ -4,7 +4,7 @@
    [abstract
     ["[0]" monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" try (.only Try)]
     ["[0]" state]
     [function
@@ -13,7 +13,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" set (.only Set)]]]]]
  [////
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux
index 35cb42cac..9a4ed2e1b 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux
@@ -11,10 +11,10 @@
    [data
     [binary (.only Binary)]
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" dictionary (.only Dictionary)]]]
    [world
     ["[0]" file]]]]
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux
index 8cb425843..6ccdcdd56 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux
@@ -5,13 +5,13 @@
     [predicate (.only Predicate)]
     ["[0]" monad (.only Monad do)]]
    [control
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     [concurrency
      ["[0]" async (.only Async)]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
-     ["[0]" list ("[1]#[0]" mix functor)]
+     ["[0]" list (.open: "[1]#[0]" mix functor)]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" set]]]
    [math
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cli.lux b/stdlib/source/library/lux/tool/compiler/meta/cli.lux
index a3e631d17..d611dde33 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cli.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cli.lux
@@ -14,7 +14,7 @@
     ["[0]" text (.only)
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
     ["^" pattern]]
    [math
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux b/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux
index bdd1e8714..1d37314b6 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux
@@ -12,7 +12,7 @@
     ["[0]" text (.only)
      ["%" format]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number (.only hex)]]
    [meta
diff --git a/stdlib/source/library/lux/tool/compiler/meta/export.lux b/stdlib/source/library/lux/tool/compiler/meta/export.lux
index e5391b566..21c75e46c 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/export.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/export.lux
@@ -4,9 +4,9 @@
    [abstract
     ["[0]" monad (.only do)]]
    [control
-    ["[0]" try (.only Try) ("[1]#[0]" monad)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" monad)]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" functor)]]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" functor)]]]
    [data
     ["[0]" text (.only)
      ["%" format (.only format)]]
diff --git a/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux b/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux
index d5aadcdd9..435a8d3fb 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux
@@ -7,17 +7,17 @@
    [control
     ["[0]" try (.only Try)]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]
     ["<>" parser (.only)
      ["<[0]>" binary (.only Parser)]]]
    [data
     [binary (.only Binary)]
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
      [set (.only Set)]
-     ["[0]" list ("[1]#[0]" mix)]
+     ["[0]" list (.open: "[1]#[0]" mix)]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" sequence (.only Sequence)]]]
    [macro
diff --git a/stdlib/source/library/lux/tool/compiler/meta/io/context.lux b/stdlib/source/library/lux/tool/compiler/meta/io/context.lux
index 06c7fb4f8..96e91fbd6 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/io/context.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/io/context.lux
@@ -10,10 +10,10 @@
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
    [data
     [binary (.only Binary)]
-    ["[0]" text ("[1]#[0]" hash)
+    ["[0]" text (.open: "[1]#[0]" hash)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager.lux b/stdlib/source/library/lux/tool/compiler/meta/packager.lux
index a45d43772..1543e082f 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager.lux
@@ -9,7 +9,7 @@
     [collection
      [dictionary (.only Dictionary)]
      ["[0]" sequence]
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [world
     ["[0]" file]]]]
  [//
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux
index 197d404b8..63df754f0 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux
@@ -5,7 +5,7 @@
    [abstract
     ["[0]" monad (.only Monad do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" try (.only Try)]]
    [data
     ["[0]" binary (.only Binary)]
@@ -13,7 +13,7 @@
      ["%" format (.only format)]]
     [collection
      ["[0]" sequence]
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" dictionary]
      ["[0]" set (.only Set)]]]
    [math
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux
index a1b7bb6a3..1fbd7ddc9 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux
@@ -15,7 +15,7 @@
       ["[0]" utf8]]]
     [collection
      ["[0]" sequence]
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" set (.only Set)]]]
    [math
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
index 5c6ba160e..d99635b00 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
@@ -14,7 +14,7 @@
      ["[0]" encoding]]
     [collection
      ["[0]" sequence]
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" set]]
     [format
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux
index 4503723f9..9c140909d 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux
@@ -16,7 +16,7 @@
     [collection
      ["[0]" sequence]
      ["[0]" set (.only Set)]
-     ["[0]" list ("[1]#[0]" functor)]]]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]]]
  ["[0]" // (.only Packager)
   [//
    ["[0]" archive (.only Output)
diff --git a/stdlib/source/library/lux/tool/compiler/phase.lux b/stdlib/source/library/lux/tool/compiler/phase.lux
index 35e8215f6..213d40339 100644
--- a/stdlib/source/library/lux/tool/compiler/phase.lux
+++ b/stdlib/source/library/lux/tool/compiler/phase.lux
@@ -6,7 +6,7 @@
     [monad (.only Monad do)]]
    [control
     ["[0]" state]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only Exception)]
     ["[0]" io]]
    [data
diff --git a/stdlib/source/library/lux/tool/interpreter.lux b/stdlib/source/library/lux/tool/interpreter.lux
index 74d9a49f1..07405ea54 100644
--- a/stdlib/source/library/lux/tool/interpreter.lux
+++ b/stdlib/source/library/lux/tool/interpreter.lux
@@ -6,7 +6,7 @@
     ["[0]" try (.only Try)]
     ["ex" exception (.only exception:)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [type (.only sharing)
     ["[0]" check]]
diff --git a/stdlib/source/library/lux/type.lux b/stdlib/source/library/lux/type.lux
index 879334883..6976a1df0 100644
--- a/stdlib/source/library/lux/type.lux
+++ b/stdlib/source/library/lux/type.lux
@@ -13,20 +13,20 @@
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" monoid equivalence)]
+    ["[0]" text (.open: "[1]#[0]" monoid equivalence)]
     [collection
      ["[0]" array]
-     ["[0]" list ("[1]#[0]" monad monoid mix)]]]
+     ["[0]" list (.open: "[1]#[0]" monad monoid mix)]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
     ["^" pattern]
     ["[0]" code]]
    [math
     [number
-     ["n" nat ("[1]#[0]" decimal)]]]
+     ["n" nat (.open: "[1]#[0]" decimal)]]]
    ["[0]" meta (.only)
     ["[0]" location]
-    ["[0]" symbol ("[1]#[0]" equivalence codec)]]]])
+    ["[0]" symbol (.open: "[1]#[0]" equivalence codec)]]]])
 
 (template [<name> <tag>]
   [(def: .public (<name> type)
diff --git a/stdlib/source/library/lux/type/check.lux b/stdlib/source/library/lux/type/check.lux
index e61b0fb11..a98b54932 100644
--- a/stdlib/source/library/lux/type/check.lux
+++ b/stdlib/source/library/lux/type/check.lux
@@ -12,16 +12,16 @@
     ["[0]" exception (.only Exception exception:)]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" monoid equivalence)]
+    ["[0]" text (.open: "[1]#[0]" monoid equivalence)]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]
+     ["[0]" list (.open: "[1]#[0]" mix)]
      ["[0]" set (.only Set)]]]
    [macro
     ["^" pattern]]
    [math
     [number
-     ["n" nat ("[1]#[0]" decimal)]]]]]
- ["[0]" // ("[1]#[0]" equivalence)])
+     ["n" nat (.open: "[1]#[0]" decimal)]]]]]
+ ["[0]" // (.open: "[1]#[0]" equivalence)])
 
 (template: (!n#= reference subject)
   [("lux i64 =" reference subject)])
diff --git a/stdlib/source/library/lux/type/implicit.lux b/stdlib/source/library/lux/type/implicit.lux
index e4fb1cac1..622e308ed 100644
--- a/stdlib/source/library/lux/type/implicit.lux
+++ b/stdlib/source/library/lux/type/implicit.lux
@@ -11,10 +11,10 @@
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monad mix)]
+     ["[0]" list (.open: "[1]#[0]" monad mix)]
      ["[0]" dictionary (.only Dictionary)]]]
    ["[0]" macro (.only)
     ["[0]" code]
@@ -23,7 +23,7 @@
     ["[0]" number (.only)
      ["n" nat]]]
    ["[0]" meta]
-   ["[0]" type ("[1]#[0]" equivalence)
+   ["[0]" type (.open: "[1]#[0]" equivalence)
     ["[0]" check (.only Check)]]]])
 
 (def: (type_var id env)
diff --git a/stdlib/source/library/lux/type/poly.lux b/stdlib/source/library/lux/type/poly.lux
index a888e8e7e..cb18f9967 100644
--- a/stdlib/source/library/lux/type/poly.lux
+++ b/stdlib/source/library/lux/type/poly.lux
@@ -7,14 +7,14 @@
     ["[0]" monad (.only do)]]
    [control
     ["[0]" maybe]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" type (.only Env)]
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" product]
     ["[0]" text]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" dictionary]]]
    [macro (.only with_symbols)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/type/primitive.lux b/stdlib/source/library/lux/type/primitive.lux
index e45876b69..7486a56fc 100644
--- a/stdlib/source/library/lux/type/primitive.lux
+++ b/stdlib/source/library/lux/type/primitive.lux
@@ -6,19 +6,19 @@
     [monad (.only Monad do)]]
    [control
     ["[0]" exception (.only exception:)]
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence monoid)]
+    ["[0]" text (.open: "[1]#[0]" equivalence monoid)]
     [collection
-     ["[0]" list ("[1]#[0]" functor monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
    [macro
     ["^" pattern]
     ["[0]" code]
     [syntax (.only syntax:)
      ["|[0]|" export]]]
    [meta
-    ["[0]" symbol ("[1]#[0]" codec)]]]]
+    ["[0]" symbol (.open: "[1]#[0]" codec)]]]]
  ["[0]" //])
 
 (type: Stack
diff --git a/stdlib/source/library/lux/type/resource.lux b/stdlib/source/library/lux/type/resource.lux
index 57d52c9a8..f2365d0cf 100644
--- a/stdlib/source/library/lux/type/resource.lux
+++ b/stdlib/source/library/lux/type/resource.lux
@@ -16,7 +16,7 @@
     [collection
      ["[0]" set]
      ["[0]" sequence (.only Sequence)]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]]
    [math
diff --git a/stdlib/source/library/lux/type/unit.lux b/stdlib/source/library/lux/type/unit.lux
index 91942f05c..317dc1848 100644
--- a/stdlib/source/library/lux/type/unit.lux
+++ b/stdlib/source/library/lux/type/unit.lux
@@ -8,7 +8,7 @@
     [order (.only Order)]
     [enum (.only Enum)]]
    [control
-    ["<>" parser ("[1]#[0]" monad)
+    ["<>" parser (.open: "[1]#[0]" monad)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" text (.only)
diff --git a/stdlib/source/library/lux/world/console.lux b/stdlib/source/library/lux/world/console.lux
index a6b0d4668..b1d7dac13 100644
--- a/stdlib/source/library/lux/world/console.lux
+++ b/stdlib/source/library/lux/world/console.lux
@@ -7,11 +7,11 @@
     [monad (.only do)]]
    [control
     ["[0]" maybe]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only exception:)]
-    ["[0]" io (.only IO io) ("[1]#[0]" functor)]
+    ["[0]" io (.only IO io) (.open: "[1]#[0]" functor)]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]
      ["[0]" atom]]]
    [data
     ["[0]" text (.only Char)
diff --git a/stdlib/source/library/lux/world/db/jdbc.lux b/stdlib/source/library/lux/world/db/jdbc.lux
index 6942f788a..c8d453d53 100644
--- a/stdlib/source/library/lux/world/db/jdbc.lux
+++ b/stdlib/source/library/lux/world/db/jdbc.lux
@@ -8,7 +8,7 @@
     ["[0]" try (.only Try)]
     ["ex" exception]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]
     [security
      ["!" capability (.only capability:)]]]
    [data
diff --git a/stdlib/source/library/lux/world/db/sql.lux b/stdlib/source/library/lux/world/db/sql.lux
index 2706dd6a4..084ef671f 100644
--- a/stdlib/source/library/lux/world/db/sql.lux
+++ b/stdlib/source/library/lux/world/db/sql.lux
@@ -6,10 +6,10 @@
    [data
     [number
      ["i" int]]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
     ["[0]" template]]
    [type
diff --git a/stdlib/source/library/lux/world/file.lux b/stdlib/source/library/lux/world/file.lux
index 93a3879ac..f03256f14 100644
--- a/stdlib/source/library/lux/world/file.lux
+++ b/stdlib/source/library/lux/world/file.lux
@@ -6,23 +6,23 @@
               ["[0]" monad (.only Monad do)]]
              [control
               ["[0]" pipe]
-              ["[0]" maybe ("[1]#[0]" functor)]
-              ["[0]" try (.only Try) ("[1]#[0]" functor)]
+              ["[0]" maybe (.open: "[1]#[0]" functor)]
+              ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
               ["[0]" exception (.only exception:)]
-              ["[0]" io (.only IO) ("[1]#[0]" functor)]
+              ["[0]" io (.only IO) (.open: "[1]#[0]" functor)]
               ["[0]" function]
               [concurrency
                ["[0]" async (.only Async)]
                ["[0]" stm (.only Var STM)]]]
              [data
-              ["[0]" bit ("[1]#[0]" equivalence)]
+              ["[0]" bit (.open: "[1]#[0]" equivalence)]
               ["[0]" product]
               ["[0]" binary (.only Binary)]
-              ["[0]" text ("[1]#[0]" equivalence)
+              ["[0]" text (.open: "[1]#[0]" equivalence)
                ["%" format (.only format)]]
               [collection
                ["[0]" array (.only Array)]
-               ["[0]" list ("[1]#[0]" functor)]
+               ["[0]" list (.open: "[1]#[0]" functor)]
                ["[0]" dictionary (.only Dictionary)]]]
              ["[0]" ffi
               (~~ (.for "JavaScript" (~~ (.these ["[0]" node_js]))
diff --git a/stdlib/source/library/lux/world/file/watch.lux b/stdlib/source/library/lux/world/file/watch.lux
index 60e01ebc6..a3026e8e8 100644
--- a/stdlib/source/library/lux/world/file/watch.lux
+++ b/stdlib/source/library/lux/world/file/watch.lux
@@ -20,14 +20,14 @@
      ["%" format (.only format)]]
     [collection
      ["[0]" dictionary (.only Dictionary)]
-     ["[0]" list ("[1]#[0]" functor monoid mix)]
+     ["[0]" list (.open: "[1]#[0]" functor monoid mix)]
      ["[0]" set]
      ["[0]" array]]]
    [math
     [number
      ["n" nat]]]
    [time
-    ["[0]" instant (.only Instant) ("[1]#[0]" equivalence)]]
+    ["[0]" instant (.only Instant) (.open: "[1]#[0]" equivalence)]]
    [type
     [primitive (.only primitive: representation abstraction)]]]]
  ["[0]" //])
diff --git a/stdlib/source/library/lux/world/net/http/client.lux b/stdlib/source/library/lux/world/net/http/client.lux
index 49ead2fd3..7f0a1588f 100644
--- a/stdlib/source/library/lux/world/net/http/client.lux
+++ b/stdlib/source/library/lux/world/net/http/client.lux
@@ -8,7 +8,7 @@
    [control
     ["[0]" pipe]
     ["[0]" io (.only IO)]
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" try (.only Try)]
     [concurrency
      ["[0]" async (.only Async)]]
diff --git a/stdlib/source/library/lux/world/net/http/cookie.lux b/stdlib/source/library/lux/world/net/http/cookie.lux
index 60fe0989a..bb09b61ee 100644
--- a/stdlib/source/library/lux/world/net/http/cookie.lux
+++ b/stdlib/source/library/lux/world/net/http/cookie.lux
@@ -4,7 +4,7 @@
    [control
     [monad (.only do)]
     ["[0]" try (.only Try)]
-    ["p" parser ("[1]#[0]" monad)
+    ["p" parser (.open: "[1]#[0]" monad)
      ["l" text (.only Parser)]]]
    [data
     [number
diff --git a/stdlib/source/library/lux/world/net/http/request.lux b/stdlib/source/library/lux/world/net/http/request.lux
index 6c6325eb6..86d74217d 100644
--- a/stdlib/source/library/lux/world/net/http/request.lux
+++ b/stdlib/source/library/lux/world/net/http/request.lux
@@ -20,7 +20,7 @@
      ["[0]" json (.only JSON)]
      ["[0]" context (.only Context Property)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" dictionary]]]
    [macro
     ["^" pattern]]
diff --git a/stdlib/source/library/lux/world/net/http/response.lux b/stdlib/source/library/lux/world/net/http/response.lux
index ed50b5f08..4e4542dde 100644
--- a/stdlib/source/library/lux/world/net/http/response.lux
+++ b/stdlib/source/library/lux/world/net/http/response.lux
@@ -4,7 +4,7 @@
    [control
     [concurrency
      ["[0]" async]
-     ["[0]" frp ("[1]#[0]" monad)]]]
+     ["[0]" frp (.open: "[1]#[0]" monad)]]]
    [data
     ["[0]" text
      ["[0]" encoding]]
@@ -12,7 +12,7 @@
      ["[0]" html]
      ["[0]" css (.only CSS)]
      ["[0]" context]
-     ["[0]" json (.only JSON) ("[1]#[0]" codec)]]]
+     ["[0]" json (.only JSON) (.open: "[1]#[0]" codec)]]]
    ["[0]" io]
    [world
     ["[0]" binary (.only Binary)]]]]
diff --git a/stdlib/source/library/lux/world/program.lux b/stdlib/source/library/lux/world/program.lux
index 90000b855..c78116cbe 100644
--- a/stdlib/source/library/lux/world/program.lux
+++ b/stdlib/source/library/lux/world/program.lux
@@ -7,7 +7,7 @@
              [control
               ["[0]" function]
               ["[0]" io (.only IO)]
-              ["[0]" maybe ("[1]#[0]" functor)]
+              ["[0]" maybe (.open: "[1]#[0]" functor)]
               ["[0]" try (.only Try)]
               ["[0]" exception (.only exception:)]
               [concurrency
@@ -16,13 +16,13 @@
               [parser
                ["[0]" environment (.only Environment)]]]
              [data
-              ["[0]" bit ("[1]#[0]" equivalence)]
+              ["[0]" bit (.open: "[1]#[0]" equivalence)]
               ["[0]" text (.only)
                ["%" format (.only format)]]
               [collection
                ["[0]" array (.only Array)]
                ["[0]" dictionary (.only Dictionary)]
-               ["[0]" list ("[1]#[0]" functor)]]]
+               ["[0]" list (.open: "[1]#[0]" functor)]]]
              ["[0]" ffi (.only import:)
               (~~ (.for "JavaScript" (~~ (.these ["[0]" node_js]))
                         "{old}" (~~ (.these ["node_js" //math]))
diff --git a/stdlib/source/library/lux/world/shell.lux b/stdlib/source/library/lux/world/shell.lux
index be59e7b65..e52d4e0f3 100644
--- a/stdlib/source/library/lux/world/shell.lux
+++ b/stdlib/source/library/lux/world/shell.lux
@@ -25,7 +25,7 @@
       ["[0]" utf8]]]
     [collection
      ["[0]" array (.only Array)]
-     ["[0]" list ("[1]#[0]" mix functor)]
+     ["[0]" list (.open: "[1]#[0]" mix functor)]
      ["[0]" dictionary]]]
    [math
     [number (.only hex)
diff --git a/stdlib/source/poly/lux/abstract/equivalence.lux b/stdlib/source/poly/lux/abstract/equivalence.lux
index b13c38453..63a88058e 100644
--- a/stdlib/source/poly/lux/abstract/equivalence.lux
+++ b/stdlib/source/poly/lux/abstract/equivalence.lux
@@ -10,10 +10,10 @@
    [data
     ["[0]" product]
     ["[0]" bit]
-    ["[0]" text ("[1]#[0]" monoid)
+    ["[0]" text (.open: "[1]#[0]" monoid)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monad)]
+     ["[0]" list (.open: "[1]#[0]" monad)]
      ["[0]" sequence]
      ["[0]" array]
      ["[0]" queue]
@@ -25,7 +25,7 @@
     ["[0]" code]]
    [math
     [number
-     ["[0]" nat ("[1]#[0]" decimal)]
+     ["[0]" nat (.open: "[1]#[0]" decimal)]
      ["[0]" int]
      ["[0]" rev]
      ["[0]" frac]]]
diff --git a/stdlib/source/poly/lux/abstract/functor.lux b/stdlib/source/poly/lux/abstract/functor.lux
index 78a11f2fd..f7a4a6d7d 100644
--- a/stdlib/source/poly/lux/abstract/functor.lux
+++ b/stdlib/source/poly/lux/abstract/functor.lux
@@ -12,7 +12,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monad monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" monad monoid)]]]
    [macro
     [syntax (.only syntax:)]
     ["[0]" code]]
diff --git a/stdlib/source/poly/lux/data/format/json.lux b/stdlib/source/poly/lux/data/format/json.lux
index 09b65efea..2bf11cdc7 100644
--- a/stdlib/source/poly/lux/data/format/json.lux
+++ b/stdlib/source/poly/lux/data/format/json.lux
@@ -15,7 +15,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monad)]
+     ["[0]" list (.open: "[1]#[0]" monad)]
      ["[0]" sequence (.only sequence)]
      ["[0]" dictionary]]]
    [macro
@@ -23,7 +23,7 @@
     ["[0]" code]]
    [math
     [number
-     ["n" nat ("[1]#[0]" decimal)]
+     ["n" nat (.open: "[1]#[0]" decimal)]
      ["[0]" i64]
      ["[0]" int]
      ["[0]" frac]]]
diff --git a/stdlib/source/program/aedifex.lux b/stdlib/source/program/aedifex.lux
index e753fbed6..d14e5ba74 100644
--- a/stdlib/source/program/aedifex.lux
+++ b/stdlib/source/program/aedifex.lux
@@ -8,12 +8,12 @@
    [control
     ["[0]" io (.only IO)]
     ["[0]" maybe]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only exception:)]
     [parser
      [environment (.only Environment)]]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
    [data
     [binary (.only Binary)]
     ["[0]" text (.only)
@@ -25,7 +25,7 @@
     [collection
      ["[0]" set]
      ["[0]" dictionary (.only Dictionary)]
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [tool
     [compiler
      [language
diff --git a/stdlib/source/program/aedifex/artifact.lux b/stdlib/source/program/aedifex/artifact.lux
index 0b7a03d9c..247e4a5d0 100644
--- a/stdlib/source/program/aedifex/artifact.lux
+++ b/stdlib/source/program/aedifex/artifact.lux
@@ -7,10 +7,10 @@
     [hash (.only Hash)]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" order)
+    ["[0]" text (.open: "[1]#[0]" order)
      ["%" format (.only Format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid)]]]
    [world
     ["[0]" file (.only Path)]
     [net
diff --git a/stdlib/source/program/aedifex/artifact/time/date.lux b/stdlib/source/program/aedifex/artifact/time/date.lux
index 4f364d651..31a2f0f2a 100644
--- a/stdlib/source/program/aedifex/artifact/time/date.lux
+++ b/stdlib/source/program/aedifex/artifact/time/date.lux
@@ -17,7 +17,7 @@
      ["n" nat]
      ["i" int]]]
    [time
-    ["[0]" date ("[1]#[0]" equivalence)]
+    ["[0]" date (.open: "[1]#[0]" equivalence)]
     ["[0]" year]
     ["[0]" month]]
    [type
diff --git a/stdlib/source/program/aedifex/artifact/versioning.lux b/stdlib/source/program/aedifex/artifact/versioning.lux
index b9c158c6b..9c7dab3c6 100644
--- a/stdlib/source/program/aedifex/artifact/versioning.lux
+++ b/stdlib/source/program/aedifex/artifact/versioning.lux
@@ -16,7 +16,7 @@
     [format
      ["[0]" xml (.only XML)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/program/aedifex/command/build.lux b/stdlib/source/program/aedifex/command/build.lux
index 3e175f2d7..d08f7f7b1 100644
--- a/stdlib/source/program/aedifex/command/build.lux
+++ b/stdlib/source/program/aedifex/command/build.lux
@@ -6,17 +6,17 @@
     [order (.only Order)]
     [monad (.only do)]]
    [control
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only exception:)]
     ["[0]" io (.only IO)]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" order)
+    ["[0]" text (.open: "[1]#[0]" order)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" set]]]
    [macro
diff --git a/stdlib/source/program/aedifex/command/deps.lux b/stdlib/source/program/aedifex/command/deps.lux
index 379217a18..915ac8db0 100644
--- a/stdlib/source/program/aedifex/command/deps.lux
+++ b/stdlib/source/program/aedifex/command/deps.lux
@@ -10,7 +10,7 @@
    [data
     [collection
      ["[0]" set (.only Set)]
-     ["[0]" list ("[1]#[0]" mix)]
+     ["[0]" list (.open: "[1]#[0]" mix)]
      ["[0]" dictionary]]
     [text
      ["%" format]]]
diff --git a/stdlib/source/program/aedifex/command/pom.lux b/stdlib/source/program/aedifex/command/pom.lux
index 478f77946..784a07d9a 100644
--- a/stdlib/source/program/aedifex/command/pom.lux
+++ b/stdlib/source/program/aedifex/command/pom.lux
@@ -4,9 +4,9 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
    [data
     [text
      ["%" format (.only format)]
diff --git a/stdlib/source/program/aedifex/command/test.lux b/stdlib/source/program/aedifex/command/test.lux
index 994bf7967..fa3d55d1d 100644
--- a/stdlib/source/program/aedifex/command/test.lux
+++ b/stdlib/source/program/aedifex/command/test.lux
@@ -6,7 +6,7 @@
    [control
     [try (.only Try)]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
    [data
     [collection
      ["[0]" dictionary]]]
diff --git a/stdlib/source/program/aedifex/dependency.lux b/stdlib/source/program/aedifex/dependency.lux
index 3a8a69d81..9e522fa94 100644
--- a/stdlib/source/program/aedifex/dependency.lux
+++ b/stdlib/source/program/aedifex/dependency.lux
@@ -7,10 +7,10 @@
     [hash (.only Hash)]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" order)
+    ["[0]" text (.open: "[1]#[0]" order)
      ["%" format (.only format)]]]]]
  ["[0]" //
-  ["[1]" artifact (.only Artifact) ("[1]#[0]" order)
+  ["[1]" artifact (.only Artifact) (.open: "[1]#[0]" order)
    [type (.only Type)]]])
 
 (type: .public Dependency
diff --git a/stdlib/source/program/aedifex/dependency/deployment.lux b/stdlib/source/program/aedifex/dependency/deployment.lux
index a904e9f6c..69d85ef9a 100644
--- a/stdlib/source/program/aedifex/dependency/deployment.lux
+++ b/stdlib/source/program/aedifex/dependency/deployment.lux
@@ -18,7 +18,7 @@
     [collection
      ["[0]" dictionary]
      ["[0]" set (.only Set)]
-     ["[0]" list ("[1]#[0]" monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid)]]]
    [time
     ["[0]" instant (.only Instant)]]]]
  ["[0]" ///
diff --git a/stdlib/source/program/aedifex/dependency/resolution.lux b/stdlib/source/program/aedifex/dependency/resolution.lux
index f535dd186..568973c47 100644
--- a/stdlib/source/program/aedifex/dependency/resolution.lux
+++ b/stdlib/source/program/aedifex/dependency/resolution.lux
@@ -11,7 +11,7 @@
     ["[0]" predicate (.only Predicate)]]
    [control
     ["[0]" maybe]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only Exception exception:)]
     ["<>" parsernone
      ["<[0]>" xml (.only Parser)]]
@@ -28,7 +28,7 @@
     [collection
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" functor monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
    [math
     [number
      ["n" nat]
diff --git a/stdlib/source/program/aedifex/format.lux b/stdlib/source/program/aedifex/format.lux
index af0521b85..456f621e7 100644
--- a/stdlib/source/program/aedifex/format.lux
+++ b/stdlib/source/program/aedifex/format.lux
@@ -2,10 +2,10 @@
  [library
   [lux (.except)
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" dictionary (.only Dictionary)]
-     ["[0]" list ("[1]#[0]" monad)]
+     ["[0]" list (.open: "[1]#[0]" monad)]
      ["[0]" set (.only Set)]]]
    [macro
     ["[0]" code]
diff --git a/stdlib/source/program/aedifex/metadata/artifact.lux b/stdlib/source/program/aedifex/metadata/artifact.lux
index 113db629d..0ba7371b8 100644
--- a/stdlib/source/program/aedifex/metadata/artifact.lux
+++ b/stdlib/source/program/aedifex/metadata/artifact.lux
@@ -21,7 +21,7 @@
     [format
      ["[0]" xml (.only XML)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/program/aedifex/metadata/snapshot.lux b/stdlib/source/program/aedifex/metadata/snapshot.lux
index 1e0879467..eb2f48c76 100644
--- a/stdlib/source/program/aedifex/metadata/snapshot.lux
+++ b/stdlib/source/program/aedifex/metadata/snapshot.lux
@@ -22,7 +22,7 @@
     [format
      ["[0]" xml (.only XML)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     [number
      ["n" nat]]]
diff --git a/stdlib/source/program/aedifex/package.lux b/stdlib/source/program/aedifex/package.lux
index f8f140b40..4706c50ce 100644
--- a/stdlib/source/program/aedifex/package.lux
+++ b/stdlib/source/program/aedifex/package.lux
@@ -4,7 +4,7 @@
    [abstract
     [equivalence (.only Equivalence)]]
    [control
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" xml]]]
    [data
diff --git a/stdlib/source/program/aedifex/parser.lux b/stdlib/source/program/aedifex/parser.lux
index b4014f06a..7f184b2eb 100644
--- a/stdlib/source/program/aedifex/parser.lux
+++ b/stdlib/source/program/aedifex/parser.lux
@@ -5,7 +5,7 @@
     [monad (.only do)]]
    [control
     ["[0]" maybe]
-    ["<>" parser ("[1]#[0]" functor)
+    ["<>" parser (.open: "[1]#[0]" functor)
      ["<[0]>" code (.only Parser)]]]
    [data
     ["[0]" text]
diff --git a/stdlib/source/program/aedifex/pom.lux b/stdlib/source/program/aedifex/pom.lux
index 76be72b40..537fde5e7 100644
--- a/stdlib/source/program/aedifex/pom.lux
+++ b/stdlib/source/program/aedifex/pom.lux
@@ -5,7 +5,7 @@
     [monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" try (.only Try)]
     ["[0]" exception]
     ["<>" parser (.only)
@@ -15,7 +15,7 @@
     [format
      ["_" xml (.only Tag XML)]]
     [collection
-     ["[0]" list ("[1]#[0]" monoid functor mix)]
+     ["[0]" list (.open: "[1]#[0]" monoid functor mix)]
      ["[0]" set]
      ["[0]" dictionary]]]
    [meta
diff --git a/stdlib/source/program/aedifex/profile.lux b/stdlib/source/program/aedifex/profile.lux
index 622cd3f9b..5ed623591 100644
--- a/stdlib/source/program/aedifex/profile.lux
+++ b/stdlib/source/program/aedifex/profile.lux
@@ -5,16 +5,16 @@
     [monoid (.only Monoid)]
     [equivalence (.only Equivalence)]]
    [control
-    ["[0]" maybe ("[1]#[0]" monoid)]
+    ["[0]" maybe (.open: "[1]#[0]" monoid)]
     ["[0]" exception (.only exception:)]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
-     ["[0]" list ("[1]#[0]" monoid)]
+     ["[0]" list (.open: "[1]#[0]" monoid)]
      ["[0]" set (.only Set)]
      ["[0]" dictionary (.only Dictionary)
-      ["[0]" plist (.only PList) ("[1]#[0]" monoid)]]]]
+      ["[0]" plist (.only PList) (.open: "[1]#[0]" monoid)]]]]
    [macro
     ["^" pattern]
     ["[0]" template]]
@@ -32,8 +32,8 @@
        [module
         [descriptor (.only Module)]]]]]]]]
  [//
-  ["[0]" runtime (.only Runtime) ("[1]#[0]" equivalence)]
-  ["[0]" dependency (.only Dependency) ("[1]#[0]" equivalence)]
+  ["[0]" runtime (.only Runtime) (.open: "[1]#[0]" equivalence)]
+  ["[0]" dependency (.only Dependency) (.open: "[1]#[0]" equivalence)]
   ["[0]" artifact (.only Artifact)
    ["[0]" type]]
   [repository
diff --git a/stdlib/source/program/aedifex/project.lux b/stdlib/source/program/aedifex/project.lux
index 811e89d0c..e4ab5be29 100644
--- a/stdlib/source/program/aedifex/project.lux
+++ b/stdlib/source/program/aedifex/project.lux
@@ -14,7 +14,7 @@
     [collection
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" set (.only Set)]
-     ["[0]" list ("[1]#[0]" mix)]]]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]]]
  ["[0]" //
   ["[1]" profile (.only Name Profile)]])
 
diff --git a/stdlib/source/program/aedifex/runtime.lux b/stdlib/source/program/aedifex/runtime.lux
index 21046fca2..7d49725df 100644
--- a/stdlib/source/program/aedifex/runtime.lux
+++ b/stdlib/source/program/aedifex/runtime.lux
@@ -8,7 +8,7 @@
     ["[0]" text
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monoid)]
+     ["[0]" list (.open: "[1]#[0]" monoid)]
      ["[0]" dictionary (.only Dictionary)]]]
    [macro
     ["[0]" template]]
diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux
index bcc771965..543900782 100644
--- a/stdlib/source/program/compositor.lux
+++ b/stdlib/source/program/compositor.lux
@@ -11,7 +11,7 @@
     ["[0]" maybe]
     ["[0]" try (.only Try)]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
    [data
     [binary (.only Binary)]
     ["[0]" product]
diff --git a/stdlib/source/specification/compositor/generation/case.lux b/stdlib/source/specification/compositor/generation/case.lux
index c0909a558..1fbde2917 100644
--- a/stdlib/source/specification/compositor/generation/case.lux
+++ b/stdlib/source/specification/compositor/generation/case.lux
@@ -7,13 +7,13 @@
    ["[0]" pipe]
    ["[0]" try (.only Try)]]
   [data
-   ["[0]" text ("[1]#[0]" equivalence)
+   ["[0]" text (.open: "[1]#[0]" equivalence)
     ["%" format (.only format)]]
    [number
     ["n" nat]
     ["f" frac]]
    [collection
-    ["[0]" list ("[1]#[0]" mix)]]]
+    ["[0]" list (.open: "[1]#[0]" mix)]]]
   [math
    ["r" random (.only Random)]]
   [tool
diff --git a/stdlib/source/specification/compositor/generation/common.lux b/stdlib/source/specification/compositor/generation/common.lux
index 334ce7012..e8d5e6ab4 100644
--- a/stdlib/source/specification/compositor/generation/common.lux
+++ b/stdlib/source/specification/compositor/generation/common.lux
@@ -7,13 +7,13 @@
    ["[0]" pipe]
    ["[0]" try (.only Try)]]
   [data
-   ["[0]" bit ("[1]#[0]" equivalence)]
+   ["[0]" bit (.open: "[1]#[0]" equivalence)]
    [number
     ["[0]" i64]
     ["n" nat]
     ["i" int]
     ["f" frac]]
-   ["[0]" text ("[1]#[0]" equivalence)
+   ["[0]" text (.open: "[1]#[0]" equivalence)
     ["%" format (.only format)]]
    [collection
     ["[0]" list]]]
diff --git a/stdlib/source/specification/compositor/generation/function.lux b/stdlib/source/specification/compositor/generation/function.lux
index d1ab6e87a..7e2c6d66f 100644
--- a/stdlib/source/specification/compositor/generation/function.lux
+++ b/stdlib/source/specification/compositor/generation/function.lux
@@ -10,9 +10,9 @@
    [number
     ["n" nat]]
    [collection
-    ["[0]" list ("[1]#[0]" functor)]]]
+    ["[0]" list (.open: "[1]#[0]" functor)]]]
   [math
-   ["r" random (.only Random) ("[1]#[0]" monad)]]
+   ["r" random (.only Random) (.open: "[1]#[0]" monad)]]
   [tool
    [compiler
     [analysis (.only Arity)]
diff --git a/stdlib/source/specification/compositor/generation/primitive.lux b/stdlib/source/specification/compositor/generation/primitive.lux
index 375cdf94c..d76f98f0a 100644
--- a/stdlib/source/specification/compositor/generation/primitive.lux
+++ b/stdlib/source/specification/compositor/generation/primitive.lux
@@ -7,10 +7,10 @@
    ["[0]" pipe]
    ["[0]" try]]
   [data
-   ["[0]" bit ("[1]#[0]" equivalence)]
+   ["[0]" bit (.open: "[1]#[0]" equivalence)]
    [number
     ["f" frac]]
-   ["[0]" text ("[1]#[0]" equivalence)
+   ["[0]" text (.open: "[1]#[0]" equivalence)
     ["%" format (.only format)]]]
   [math
    ["r" random]]
diff --git a/stdlib/source/specification/compositor/generation/structure.lux b/stdlib/source/specification/compositor/generation/structure.lux
index e43533acb..d914c309f 100644
--- a/stdlib/source/specification/compositor/generation/structure.lux
+++ b/stdlib/source/specification/compositor/generation/structure.lux
@@ -11,11 +11,11 @@
    [number
     ["n" nat]
     ["i" int]]
-   ["[0]" text ("[1]#[0]" equivalence)
+   ["[0]" text (.open: "[1]#[0]" equivalence)
     ["%" format (.only format)]]
    [collection
     ["[0]" array (.only Array)]
-    ["[0]" list ("[1]#[0]" functor)]]]
+    ["[0]" list (.open: "[1]#[0]" functor)]]]
   [math
    ["r" random]]
   ["[0]" ffi (.only import:)]
diff --git a/stdlib/source/specification/lux/abstract/equivalence.lux b/stdlib/source/specification/lux/abstract/equivalence.lux
index 8454e002a..eaa2a9b5b 100644
--- a/stdlib/source/specification/lux/abstract/equivalence.lux
+++ b/stdlib/source/specification/lux/abstract/equivalence.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]]]]
  [\\library
diff --git a/stdlib/source/specification/lux/world/file.lux b/stdlib/source/specification/lux/world/file.lux
index 6075f38c7..0956528de 100644
--- a/stdlib/source/specification/lux/world/file.lux
+++ b/stdlib/source/specification/lux/world/file.lux
@@ -7,17 +7,17 @@
     ["[0]" predicate]]
    [control
     [io (.only IO)]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]
     [concurrency
      ["[0]" async (.only Async)]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]
      [encoding
-      ["[0]" utf8 ("[1]#[0]" codec)]]]
-    ["[0]" binary (.only Binary) ("[1]#[0]" equivalence monoid)
+      ["[0]" utf8 (.open: "[1]#[0]" codec)]]]
+    ["[0]" binary (.only Binary) (.open: "[1]#[0]" equivalence monoid)
      ["$[1]" \\test]]
     [collection
      ["[0]" list]]]
@@ -26,7 +26,7 @@
     [number
      ["n" nat]]]
    [time
-    ["[0]" instant (.only Instant) ("[1]#[0]" equivalence)]]]]
+    ["[0]" instant (.only Instant) (.open: "[1]#[0]" equivalence)]]]]
  [\\library
   ["[0]" /]])
 
diff --git a/stdlib/source/specification/lux/world/shell.lux b/stdlib/source/specification/lux/world/shell.lux
index 3bff4626d..64e31abfe 100644
--- a/stdlib/source/specification/lux/world/shell.lux
+++ b/stdlib/source/specification/lux/world/shell.lux
@@ -5,14 +5,14 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]
     [parser
      ["[0]" environment (.only Environment)]]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
     ["[0]" random]
diff --git a/stdlib/source/test/aedifex/artifact.lux b/stdlib/source/test/aedifex/artifact.lux
index e16c5f534..aefe175f4 100644
--- a/stdlib/source/test/aedifex/artifact.lux
+++ b/stdlib/source/test/aedifex/artifact.lux
@@ -10,7 +10,7 @@
      ["$[0]" order]
      ["$[0]" hash]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]]
    [world
diff --git a/stdlib/source/test/aedifex/artifact/extension.lux b/stdlib/source/test/aedifex/artifact/extension.lux
index 130065193..d8bfd8267 100644
--- a/stdlib/source/test/aedifex/artifact/extension.lux
+++ b/stdlib/source/test/aedifex/artifact/extension.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" set]
      ["[0]" list]]]
diff --git a/stdlib/source/test/aedifex/artifact/snapshot.lux b/stdlib/source/test/aedifex/artifact/snapshot.lux
index e0c7ffc4b..5379dd8af 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot.lux
@@ -7,11 +7,11 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" xml]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
  ["$[0]" /
   ["[1][0]" build]
   ["[1][0]" stamp]
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/build.lux b/stdlib/source/test/aedifex/artifact/snapshot/build.lux
index 96c41ce36..2775467c9 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/build.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/build.lux
@@ -7,7 +7,7 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" xml]]]
    [math
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux b/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux
index fc9488004..e097f5420 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux
@@ -7,7 +7,7 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" xml]]]
    [math
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/time.lux b/stdlib/source/test/aedifex/artifact/snapshot/time.lux
index 65f17c8a4..28dd249cc 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/time.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/time.lux
@@ -7,7 +7,7 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" text]]]
    [math
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/version.lux b/stdlib/source/test/aedifex/artifact/snapshot/version.lux
index 39883cb64..7ba555256 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/version.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/version.lux
@@ -7,7 +7,7 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" xml]]]
    [math
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
index 9441be139..27ef6062c 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
@@ -7,14 +7,14 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" text]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]
      ["i" int]]]
diff --git a/stdlib/source/test/aedifex/artifact/time.lux b/stdlib/source/test/aedifex/artifact/time.lux
index 81b04c07d..366ec1955 100644
--- a/stdlib/source/test/aedifex/artifact/time.lux
+++ b/stdlib/source/test/aedifex/artifact/time.lux
@@ -7,11 +7,11 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" text]]]
    [time
-    ["[0]" instant ("[1]#[0]" equivalence)]]
+    ["[0]" instant (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/aedifex/artifact/time/date.lux b/stdlib/source/test/aedifex/artifact/time/date.lux
index 4f997fef1..12c4a0da1 100644
--- a/stdlib/source/test/aedifex/artifact/time/date.lux
+++ b/stdlib/source/test/aedifex/artifact/time/date.lux
@@ -7,7 +7,7 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]
     [parser
      ["<[0]>" text]]]
@@ -17,7 +17,7 @@
      ["n" nat]
      ["i" int]]]
    [time
-    ["[0]" date ("[1]#[0]" equivalence)]
+    ["[0]" date (.open: "[1]#[0]" equivalence)]
     ["[0]" year]]]]
  [\\program
   ["[0]" /]])
diff --git a/stdlib/source/test/aedifex/artifact/time/time.lux b/stdlib/source/test/aedifex/artifact/time/time.lux
index 60dda35c0..c3b866451 100644
--- a/stdlib/source/test/aedifex/artifact/time/time.lux
+++ b/stdlib/source/test/aedifex/artifact/time/time.lux
@@ -6,7 +6,7 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" text]]]
    [math
diff --git a/stdlib/source/test/aedifex/artifact/type.lux b/stdlib/source/test/aedifex/artifact/type.lux
index de596592b..a2b5926e5 100644
--- a/stdlib/source/test/aedifex/artifact/type.lux
+++ b/stdlib/source/test/aedifex/artifact/type.lux
@@ -10,7 +10,7 @@
      ["[0]" set]
      ["[0]" list]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]]]
  [\\program
diff --git a/stdlib/source/test/aedifex/artifact/versioning.lux b/stdlib/source/test/aedifex/artifact/versioning.lux
index 6a8e29a08..006ec6566 100644
--- a/stdlib/source/test/aedifex/artifact/versioning.lux
+++ b/stdlib/source/test/aedifex/artifact/versioning.lux
@@ -7,7 +7,7 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" xml]]]
    [math
diff --git a/stdlib/source/test/aedifex/cache.lux b/stdlib/source/test/aedifex/cache.lux
index 13b8e27d4..de334b03d 100644
--- a/stdlib/source/test/aedifex/cache.lux
+++ b/stdlib/source/test/aedifex/cache.lux
@@ -19,7 +19,7 @@
      ["[0]" set]
      ["[0]" dictionary]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]
    [world
diff --git a/stdlib/source/test/aedifex/cli.lux b/stdlib/source/test/aedifex/cli.lux
index 6f3d257c6..9cc571bbe 100644
--- a/stdlib/source/test/aedifex/cli.lux
+++ b/stdlib/source/test/aedifex/cli.lux
@@ -16,7 +16,7 @@
     [collection
      ["[0]" list]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
  [\\program
   ["[0]" / (.only)
    ["/[1]" //
diff --git a/stdlib/source/test/aedifex/command/build.lux b/stdlib/source/test/aedifex/command/build.lux
index 176acc46b..1bb77d307 100644
--- a/stdlib/source/test/aedifex/command/build.lux
+++ b/stdlib/source/test/aedifex/command/build.lux
@@ -14,7 +14,7 @@
     [parser
      ["[0]" environment]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" dictionary]]]
    [math
diff --git a/stdlib/source/test/aedifex/command/clean.lux b/stdlib/source/test/aedifex/command/clean.lux
index 73ad4bcd2..e7bf81855 100644
--- a/stdlib/source/test/aedifex/command/clean.lux
+++ b/stdlib/source/test/aedifex/command/clean.lux
@@ -11,10 +11,10 @@
    [data
     [binary (.only Binary)]
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" set]]]
    [math
     ["[0]" random (.only Random)]
diff --git a/stdlib/source/test/aedifex/command/deploy.lux b/stdlib/source/test/aedifex/command/deploy.lux
index ade7ffc6f..0a4e08166 100644
--- a/stdlib/source/test/aedifex/command/deploy.lux
+++ b/stdlib/source/test/aedifex/command/deploy.lux
@@ -12,8 +12,8 @@
     [parser
      ["[0]" environment]]]
    [data
-    ["[0]" binary ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" binary (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
diff --git a/stdlib/source/test/aedifex/command/deps.lux b/stdlib/source/test/aedifex/command/deps.lux
index c4cf1bcf0..c5e496e29 100644
--- a/stdlib/source/test/aedifex/command/deps.lux
+++ b/stdlib/source/test/aedifex/command/deps.lux
@@ -12,7 +12,7 @@
     [parser
      ["[0]" environment]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
diff --git a/stdlib/source/test/aedifex/command/install.lux b/stdlib/source/test/aedifex/command/install.lux
index 7fa9463f7..4de5c5226 100644
--- a/stdlib/source/test/aedifex/command/install.lux
+++ b/stdlib/source/test/aedifex/command/install.lux
@@ -5,7 +5,7 @@
    [abstract
     ["[0]" monad (.only do)]]
    [control
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception]
     [concurrency
      ["[0]" async (.only Async)]]
@@ -13,7 +13,7 @@
      ["[0]" environment]]]
    [data
     ["[0]" binary]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
      ["[0]" set (.only Set)]]]
diff --git a/stdlib/source/test/aedifex/command/pom.lux b/stdlib/source/test/aedifex/command/pom.lux
index 76eb99b89..75509644d 100644
--- a/stdlib/source/test/aedifex/command/pom.lux
+++ b/stdlib/source/test/aedifex/command/pom.lux
@@ -5,12 +5,12 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [concurrency
      ["[0]" async]]]
    [data
-    ["[0]" binary ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" binary (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      [encoding
       ["[0]" utf8]]]
     [format
diff --git a/stdlib/source/test/aedifex/command/test.lux b/stdlib/source/test/aedifex/command/test.lux
index a6237f970..50bd8e183 100644
--- a/stdlib/source/test/aedifex/command/test.lux
+++ b/stdlib/source/test/aedifex/command/test.lux
@@ -12,7 +12,7 @@
     [parser
      ["[0]" environment]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" dictionary]
      ["[0]" list]]]
diff --git a/stdlib/source/test/aedifex/command/version.lux b/stdlib/source/test/aedifex/command/version.lux
index 9bdb03cc7..fbd864d4b 100644
--- a/stdlib/source/test/aedifex/command/version.lux
+++ b/stdlib/source/test/aedifex/command/version.lux
@@ -11,7 +11,7 @@
     [concurrency
      ["[0]" async (.only Async)]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
     ["[0]" random]]
diff --git a/stdlib/source/test/aedifex/dependency/deployment.lux b/stdlib/source/test/aedifex/dependency/deployment.lux
index cd8c2172e..ab15af81c 100644
--- a/stdlib/source/test/aedifex/dependency/deployment.lux
+++ b/stdlib/source/test/aedifex/dependency/deployment.lux
@@ -7,20 +7,20 @@
     ["[0]" hash (.only Hash)]]
    [control
     ["[0]" io (.only IO)]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [concurrency
      ["[0]" atom (.only Atom)]
      ["[0]" async]]]
    [data
     ["[0]" product]
-    ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)]
+    ["[0]" binary (.only Binary) (.open: "[1]#[0]" equivalence)]
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [math
     ["[0]" random (.only Random)]
     [number
@@ -43,7 +43,7 @@
      ["[0]" profile]
      ["[0]" metadata]
      ["[0]" package (.only Package)]
-     ["[0]" artifact (.only Artifact) ("[1]#[0]" equivalence)
+     ["[0]" artifact (.only Artifact) (.open: "[1]#[0]" equivalence)
       ["[1]/[0]" type]
       ["[1]/[0]" extension]]
      ["[0]" repository (.only)
diff --git a/stdlib/source/test/aedifex/dependency/resolution.lux b/stdlib/source/test/aedifex/dependency/resolution.lux
index 666bd0c53..eaec8b475 100644
--- a/stdlib/source/test/aedifex/dependency/resolution.lux
+++ b/stdlib/source/test/aedifex/dependency/resolution.lux
@@ -39,7 +39,7 @@
     ["[1]" profile]
     ["[1][0]" package (.only Package)]
     ["[1][0]" hash]
-    ["[1][0]" dependency (.only Dependency) ("[1]#[0]" equivalence)
+    ["[1][0]" dependency (.only Dependency) (.open: "[1]#[0]" equivalence)
      ["[1]/[0]" status]]
     ["[1][0]" pom]
     ["[1][0]" artifact (.only Artifact)
diff --git a/stdlib/source/test/aedifex/dependency/status.lux b/stdlib/source/test/aedifex/dependency/status.lux
index c6b6abe9a..6b59fa394 100644
--- a/stdlib/source/test/aedifex/dependency/status.lux
+++ b/stdlib/source/test/aedifex/dependency/status.lux
@@ -10,7 +10,7 @@
     ["[0]" binary
      ["[1]T" \\test]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
  ["$[0]" ///
   ["[1][0]" hash]]
  [\\program
diff --git a/stdlib/source/test/aedifex/metadata.lux b/stdlib/source/test/aedifex/metadata.lux
index b10f192fd..bdac5dfac 100644
--- a/stdlib/source/test/aedifex/metadata.lux
+++ b/stdlib/source/test/aedifex/metadata.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random]]]]
  ["[0]" /
diff --git a/stdlib/source/test/aedifex/metadata/artifact.lux b/stdlib/source/test/aedifex/metadata/artifact.lux
index 34b98590a..34869e646 100644
--- a/stdlib/source/test/aedifex/metadata/artifact.lux
+++ b/stdlib/source/test/aedifex/metadata/artifact.lux
@@ -8,14 +8,14 @@
      ["$[0]" equivalence]]]
    [control
     ["[0]" maybe]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["[0]" environment]
      ["<[0]>" xml]]
     [concurrency
      ["[0]" async]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]]]
    [macro
diff --git a/stdlib/source/test/aedifex/metadata/snapshot.lux b/stdlib/source/test/aedifex/metadata/snapshot.lux
index 136e488c8..c45b817cd 100644
--- a/stdlib/source/test/aedifex/metadata/snapshot.lux
+++ b/stdlib/source/test/aedifex/metadata/snapshot.lux
@@ -8,20 +8,20 @@
      ["$[0]" equivalence]]]
    [control
     ["[0]" maybe]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["[0]" environment]
      ["<[0]>" xml]]
     [concurrency
      ["[0]" async]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]]]
    [macro
     ["[0]" code]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]
    ["[0]" time (.only)
diff --git a/stdlib/source/test/aedifex/package.lux b/stdlib/source/test/aedifex/package.lux
index ead5ce5be..6a7f0a960 100644
--- a/stdlib/source/test/aedifex/package.lux
+++ b/stdlib/source/test/aedifex/package.lux
@@ -33,7 +33,7 @@
   ["[0]" / (.only)
    ["/[1]" //
     ["[1]" profile]
-    ["[1][0]" hash ("[1]#[0]" equivalence)]
+    ["[1][0]" hash (.open: "[1]#[0]" equivalence)]
     ["[1][0]" pom]
     [dependency
      ["[1][0]" status]]
diff --git a/stdlib/source/test/aedifex/parser.lux b/stdlib/source/test/aedifex/parser.lux
index 6b53ab371..050d3daef 100644
--- a/stdlib/source/test/aedifex/parser.lux
+++ b/stdlib/source/test/aedifex/parser.lux
@@ -15,7 +15,7 @@
     [collection
      ["[0]" set (.only Set)]
      ["[0]" dictionary (.only Dictionary)]
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/aedifex/pom.lux b/stdlib/source/test/aedifex/pom.lux
index fbc7d12b2..3a58b340c 100644
--- a/stdlib/source/test/aedifex/pom.lux
+++ b/stdlib/source/test/aedifex/pom.lux
@@ -10,7 +10,7 @@
     ["<>" parser (.only)
      ["<[0]>" xml]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [format
      ["[0]" xml]]]
    [math
diff --git a/stdlib/source/test/aedifex/profile.lux b/stdlib/source/test/aedifex/profile.lux
index a77cb4c7e..d45ac5fa9 100644
--- a/stdlib/source/test/aedifex/profile.lux
+++ b/stdlib/source/test/aedifex/profile.lux
@@ -13,12 +13,12 @@
     [parser
      ["[0]" cli]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" set (.only Set)]
      ["[0]" dictionary (.only Dictionary)]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]
    [tool
diff --git a/stdlib/source/test/aedifex/project.lux b/stdlib/source/test/aedifex/project.lux
index 8a52a39b8..61afbc9da 100644
--- a/stdlib/source/test/aedifex/project.lux
+++ b/stdlib/source/test/aedifex/project.lux
@@ -8,13 +8,13 @@
      ["$[0]" equivalence]
      ["$[0]" monoid]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]]]
  [//
diff --git a/stdlib/source/test/aedifex/repository/local.lux b/stdlib/source/test/aedifex/repository/local.lux
index e8737c5cc..160410bc4 100644
--- a/stdlib/source/test/aedifex/repository/local.lux
+++ b/stdlib/source/test/aedifex/repository/local.lux
@@ -5,13 +5,13 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["[0]" environment]]
     [concurrency
      ["[0]" async]]]
    [data
-    ["[0]" binary ("[1]#[0]" equivalence)]
+    ["[0]" binary (.open: "[1]#[0]" equivalence)]
     [text
      [encoding
       ["[0]" utf8]]]]
diff --git a/stdlib/source/test/aedifex/repository/remote.lux b/stdlib/source/test/aedifex/repository/remote.lux
index 72c042fd7..50ae42a09 100644
--- a/stdlib/source/test/aedifex/repository/remote.lux
+++ b/stdlib/source/test/aedifex/repository/remote.lux
@@ -6,13 +6,13 @@
     [monad (.only do)]]
    [control
     ["[0]" io (.only IO)]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try ("[1]#[0]" monad)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" monad)]
     ["[0]" exception]
     ["[0]" function]]
    [data
-    ["[0]" binary ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" binary (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
diff --git a/stdlib/source/test/aedifex/runtime.lux b/stdlib/source/test/aedifex/runtime.lux
index 78ba09d07..a1ba22588 100644
--- a/stdlib/source/test/aedifex/runtime.lux
+++ b/stdlib/source/test/aedifex/runtime.lux
@@ -7,14 +7,14 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" set]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]]]
  [\\program
diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux
index 790250e73..9fed6be1a 100644
--- a/stdlib/source/test/lux.lux
+++ b/stdlib/source/test/lux.lux
@@ -9,28 +9,28 @@
               [monad (.only do)]]
              [control
               ["[0]" io]
-              ["[0]" maybe ("[1]#[0]" functor)]
+              ["[0]" maybe (.open: "[1]#[0]" functor)]
               [concurrency
                ["[0]" atom (.only Atom)]]
               [parser
                ["<[0]>" code]]]
              [data
               ["[0]" product]
-              ["[0]" bit ("[1]#[0]" equivalence)]
-              ["[0]" text ("[1]#[0]" equivalence)
+              ["[0]" bit (.open: "[1]#[0]" equivalence)]
+              ["[0]" text (.open: "[1]#[0]" equivalence)
                ["%" format (.only format)]]
               [collection
-               ["[0]" list ("[1]#[0]" functor)]
-               ["[0]" set (.only Set) ("[1]#[0]" equivalence)]
+               ["[0]" list (.open: "[1]#[0]" functor)]
+               ["[0]" set (.only Set) (.open: "[1]#[0]" equivalence)]
                [dictionary
                 ["[0]" plist]]]]
              ["[0]" macro
               [syntax (.only syntax:)]
               ["^" pattern]
-              ["[0]" code ("[1]#[0]" equivalence)]
+              ["[0]" code (.open: "[1]#[0]" equivalence)]
               ["[0]" template]]
              ["[0]" math
-              ["[0]" random ("[1]#[0]" functor)]
+              ["[0]" random (.open: "[1]#[0]" functor)]
               [number
                [i8 (.only)]
                [i16 (.only)]
@@ -39,8 +39,8 @@
                ["r" rev]
                ["f" frac]
                ["[0]" i64]]]
-             ["[0]" meta ("[1]#[0]" monad)
-              ["[0]" location ("[1]#[0]" equivalence)]]]]
+             ["[0]" meta (.open: "[1]#[0]" monad)
+              ["[0]" location (.open: "[1]#[0]" equivalence)]]]]
            ... TODO: Must have 100% coverage on tests.
            ["[0]" /
             ["[1][0]" abstract]
@@ -529,7 +529,7 @@
                                        [(<referral> <module/0>)
                                         (<referral> <m2/1>)]]
                                       
-                                      [(.using ["[0]" <module/0>' ("[1]#[0]" <definition>)])
+                                      [(.using ["[0]" <module/0>' (.open: "[1]#[0]" <definition>)])
                                        ("lux def module" [[<module/0> <module/0>]])
                                        [(<referral> <module/0> (<open/0> <definition>))]]
                                       ))))))
diff --git a/stdlib/source/test/lux/abstract/codec.lux b/stdlib/source/test/lux/abstract/codec.lux
index 120dc7a39..970045e7c 100644
--- a/stdlib/source/test/lux/abstract/codec.lux
+++ b/stdlib/source/test/lux/abstract/codec.lux
@@ -7,7 +7,7 @@
    [control
     ["[0]" try]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [format
      ["[0]" json (.only JSON)]]]
    [math
diff --git a/stdlib/source/test/lux/abstract/comonad/cofree.lux b/stdlib/source/test/lux/abstract/comonad/cofree.lux
index 1818540f0..8e8c2998d 100644
--- a/stdlib/source/test/lux/abstract/comonad/cofree.lux
+++ b/stdlib/source/test/lux/abstract/comonad/cofree.lux
@@ -13,7 +13,7 @@
    [data
     [collection
      ["[0]" list]
-     ["[0]" stream (.only Stream) ("[1]#[0]" comonad)]]]
+     ["[0]" stream (.only Stream) (.open: "[1]#[0]" comonad)]]]
    [math
     ["[0]" random]]]]
  [\\library
diff --git a/stdlib/source/test/lux/abstract/enum.lux b/stdlib/source/test/lux/abstract/enum.lux
index 5aa3fd4c5..d33a9aee8 100644
--- a/stdlib/source/test/lux/abstract/enum.lux
+++ b/stdlib/source/test/lux/abstract/enum.lux
@@ -5,11 +5,11 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]]
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/abstract/equivalence.lux b/stdlib/source/test/lux/abstract/equivalence.lux
index 47b2ab03a..2ca34e885 100644
--- a/stdlib/source/test/lux/abstract/equivalence.lux
+++ b/stdlib/source/test/lux/abstract/equivalence.lux
@@ -8,7 +8,7 @@
      [functor
       ["$[0]" contravariant]]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/abstract/hash.lux b/stdlib/source/test/lux/abstract/hash.lux
index 6e2f2504a..cd9a966da 100644
--- a/stdlib/source/test/lux/abstract/hash.lux
+++ b/stdlib/source/test/lux/abstract/hash.lux
@@ -8,7 +8,7 @@
      [functor
       ["$[0]" contravariant]]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/abstract/interval.lux b/stdlib/source/test/lux/abstract/interval.lux
index 4d84cfcb7..74579b53a 100644
--- a/stdlib/source/test/lux/abstract/interval.lux
+++ b/stdlib/source/test/lux/abstract/interval.lux
@@ -18,7 +18,7 @@
     [number
      ["n" nat]]]]]
  [\\library
-  ["[0]" / (.only Interval) ("#[0]" equivalence)]])
+  ["[0]" / (.only Interval) (.open: "[1]#[0]" equivalence)]])
 
 (template [<name> <cmp>]
   [(def: .public <name>
@@ -94,7 +94,7 @@
      right_outer ..outer]
     (all _.and
          (_.property "The union of an interval to itself yields the same interval."
-           (#= some_interval (/.union some_interval some_interval)))
+           (/#= some_interval (/.union some_interval some_interval)))
          (_.property "The union of 2 inner intervals is another inner interval."
            (/.inner? (/.union left_inner right_inner)))
          (_.property "The union of 2 outer intervals yields an inner interval when their complements don't overlap, and an outer when they do."
@@ -115,7 +115,7 @@
      right_outer ..outer]
     (all _.and
          (_.property "The intersection of an interval to itself yields the same interval."
-           (#= some_interval (/.intersection some_interval some_interval)))
+           (/#= some_interval (/.intersection some_interval some_interval)))
          (_.property "The intersection of 2 inner intervals yields an inner interval when they overlap, and an outer when they don't."
            (if (/.overlaps? left_inner right_inner)
              (/.inner? (/.intersection left_inner right_inner))
@@ -130,7 +130,7 @@
     [some_interval ..interval]
     (all _.and
          (_.property "The complement of a complement is the same as the original."
-           (#= some_interval (|> some_interval /.complement /.complement)))
+           (/#= some_interval (|> some_interval /.complement /.complement)))
          (_.property "The complement of an interval does not overlap it."
            (not (/.overlaps? some_interval (/.complement some_interval))))
          )))
diff --git a/stdlib/source/test/lux/abstract/monad.lux b/stdlib/source/test/lux/abstract/monad.lux
index 5ea6a5404..b0dc3f1cc 100644
--- a/stdlib/source/test/lux/abstract/monad.lux
+++ b/stdlib/source/test/lux/abstract/monad.lux
@@ -5,7 +5,7 @@
    [data
     ["[0]" identity (.only Identity)]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/abstract/monad/free.lux b/stdlib/source/test/lux/abstract/monad/free.lux
index 0d63275d5..9d9329a6c 100644
--- a/stdlib/source/test/lux/abstract/monad/free.lux
+++ b/stdlib/source/test/lux/abstract/monad/free.lux
@@ -12,7 +12,7 @@
      ["$[0]" monad]]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     ["[0]" random]]]]
  [\\library
diff --git a/stdlib/source/test/lux/abstract/order.lux b/stdlib/source/test/lux/abstract/order.lux
index a283abfdf..68eedeeba 100644
--- a/stdlib/source/test/lux/abstract/order.lux
+++ b/stdlib/source/test/lux/abstract/order.lux
@@ -8,7 +8,7 @@
      [functor
       ["$[0]" contravariant]]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/abstract/predicate.lux b/stdlib/source/test/lux/abstract/predicate.lux
index 6a8b64dbe..46c44ceea 100644
--- a/stdlib/source/test/lux/abstract/predicate.lux
+++ b/stdlib/source/test/lux/abstract/predicate.lux
@@ -12,7 +12,7 @@
    [control
     ["[0]" function]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]]]
    [math
diff --git a/stdlib/source/test/lux/control/concatenative.lux b/stdlib/source/test/lux/control/concatenative.lux
index d158a83a0..825228c31 100644
--- a/stdlib/source/test/lux/control/concatenative.lux
+++ b/stdlib/source/test/lux/control/concatenative.lux
@@ -6,7 +6,7 @@
     [monad (.only do)]]
    [data
     ["[0]" sum]
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [macro
     ["[0]" template]]
    [math
diff --git a/stdlib/source/test/lux/control/concurrency/actor.lux b/stdlib/source/test/lux/control/concurrency/actor.lux
index 1df46e911..5713f1599 100644
--- a/stdlib/source/test/lux/control/concurrency/actor.lux
+++ b/stdlib/source/test/lux/control/concurrency/actor.lux
@@ -22,7 +22,7 @@
   ["[0]" / (.only actor: message:)
    [//
     ["[0]" atom (.only Atom)]
-    ["[0]" async (.only Async Resolver) ("[1]#[0]" monad)]
+    ["[0]" async (.only Async Resolver) (.open: "[1]#[0]" monad)]
     ["[0]" frp]]]])
 
 (exception: got_wrecked)
diff --git a/stdlib/source/test/lux/control/concurrency/frp.lux b/stdlib/source/test/lux/control/concurrency/frp.lux
index 4dc2b1da7..79d2fe727 100644
--- a/stdlib/source/test/lux/control/concurrency/frp.lux
+++ b/stdlib/source/test/lux/control/concurrency/frp.lux
@@ -14,7 +14,7 @@
     ["[0]" io (.only IO io)]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" mix monoid)]
+     ["[0]" list (.open: "[1]#[0]" mix monoid)]
      ["[0]" sequence (.only Sequence)]]]
    [math
     ["[0]" random]
@@ -25,7 +25,7 @@
  [\\library
   ["[0]" / (.only)
    [//
-    ["[0]" async (.only Async) ("[1]#[0]" monad)]
+    ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]
     ["[0]" atom (.only Atom atom)]]]])
 
 (def: injection
diff --git a/stdlib/source/test/lux/control/concurrency/semaphore.lux b/stdlib/source/test/lux/control/concurrency/semaphore.lux
index bc99871e9..1df21f823 100644
--- a/stdlib/source/test/lux/control/concurrency/semaphore.lux
+++ b/stdlib/source/test/lux/control/concurrency/semaphore.lux
@@ -15,10 +15,10 @@
      ["[0]" async (.only Async)]
      ["[0]" atom (.only Atom)]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/control/concurrency/stm.lux b/stdlib/source/test/lux/control/concurrency/stm.lux
index 7bbe7f398..05d6f33da 100644
--- a/stdlib/source/test/lux/control/concurrency/stm.lux
+++ b/stdlib/source/test/lux/control/concurrency/stm.lux
@@ -13,7 +13,7 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/control/exception.lux b/stdlib/source/test/lux/control/exception.lux
index b71d50025..459e7101a 100644
--- a/stdlib/source/test/lux/control/exception.lux
+++ b/stdlib/source/test/lux/control/exception.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
     ["[0]" random]
diff --git a/stdlib/source/test/lux/control/function/memo.lux b/stdlib/source/test/lux/control/function/memo.lux
index 2d8b7f7b0..b16902c88 100644
--- a/stdlib/source/test/lux/control/function/memo.lux
+++ b/stdlib/source/test/lux/control/function/memo.lux
@@ -6,12 +6,12 @@
     [monad (.only do)]]
    [control
     ["[0]" io (.only IO)]
-    ["[0]" state (.only State) ("[1]#[0]" monad)]]
+    ["[0]" state (.only State) (.open: "[1]#[0]" monad)]]
    [data
     ["[0]" product]
     [collection
      ["[0]" dictionary (.only Dictionary)]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["^" pattern]]
    [math
diff --git a/stdlib/source/test/lux/control/function/mixin.lux b/stdlib/source/test/lux/control/function/mixin.lux
index 01dd7ab47..c19295365 100644
--- a/stdlib/source/test/lux/control/function/mixin.lux
+++ b/stdlib/source/test/lux/control/function/mixin.lux
@@ -13,7 +13,7 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["^" pattern]]
    [math
diff --git a/stdlib/source/test/lux/control/function/mutual.lux b/stdlib/source/test/lux/control/function/mutual.lux
index 3e9c053e7..698685d0c 100644
--- a/stdlib/source/test/lux/control/function/mutual.lux
+++ b/stdlib/source/test/lux/control/function/mutual.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [text
      ["%" format (.only format)]]]
    [math
diff --git a/stdlib/source/test/lux/control/maybe.lux b/stdlib/source/test/lux/control/maybe.lux
index d24ea6166..b986c2fbc 100644
--- a/stdlib/source/test/lux/control/maybe.lux
+++ b/stdlib/source/test/lux/control/maybe.lux
@@ -12,7 +12,7 @@
      ["$[0]" apply]
      ["$[0]" monad]]]
    [control
-    ["[0]" io ("[1]#[0]" monad)]
+    ["[0]" io (.open: "[1]#[0]" monad)]
     ["[0]" pipe]]
    [data
     ["[0]" text]
@@ -23,7 +23,7 @@
     [number
      ["n" nat]]]]]
  [\\library
-  ["[0]" / ("[1]#[0]" monoid monad)]])
+  ["[0]" / (.open: "[1]#[0]" monoid monad)]])
 
 (def: .public test
   Test
diff --git a/stdlib/source/test/lux/control/parser.lux b/stdlib/source/test/lux/control/parser.lux
index e4312d220..c5fdb888a 100644
--- a/stdlib/source/test/lux/control/parser.lux
+++ b/stdlib/source/test/lux/control/parser.lux
@@ -14,10 +14,10 @@
     [parser
      ["<[0]>" code]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/control/parser/analysis.lux b/stdlib/source/test/lux/control/parser/analysis.lux
index bb68755c0..1e1a288b2 100644
--- a/stdlib/source/test/lux/control/parser/analysis.lux
+++ b/stdlib/source/test/lux/control/parser/analysis.lux
@@ -10,8 +10,8 @@
     ["[0]" exception]
     ["<>" parser]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]]]
    [math
@@ -22,7 +22,7 @@
      ["f" frac]
      ["r" rev]]]
    [meta
-    ["[0]" symbol ("[1]#[0]" equivalence)]]
+    ["[0]" symbol (.open: "[1]#[0]" equivalence)]]
    [tool
     [compiler
      [reference (.only Constant)
diff --git a/stdlib/source/test/lux/control/parser/binary.lux b/stdlib/source/test/lux/control/parser/binary.lux
index 34bfab2f7..41d2cec10 100644
--- a/stdlib/source/test/lux/control/parser/binary.lux
+++ b/stdlib/source/test/lux/control/parser/binary.lux
@@ -17,7 +17,7 @@
     ["[0]" binary]
     ["[0]" sum]
     ["[0]" bit]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
diff --git a/stdlib/source/test/lux/control/parser/cli.lux b/stdlib/source/test/lux/control/parser/cli.lux
index 731cea3e4..28e5fb4a2 100644
--- a/stdlib/source/test/lux/control/parser/cli.lux
+++ b/stdlib/source/test/lux/control/parser/cli.lux
@@ -8,7 +8,7 @@
     ["[0]" try]
     ["<>" parser]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]]]
    [macro
@@ -16,7 +16,7 @@
    [math
     ["[0]" random]
     [number
-     ["n" nat ("[1]#[0]" decimal)]]]]]
+     ["n" nat (.open: "[1]#[0]" decimal)]]]]]
  [\\library
   ["[0]" /]])
 
diff --git a/stdlib/source/test/lux/control/parser/code.lux b/stdlib/source/test/lux/control/parser/code.lux
index 81a90c5b0..ad59d2ba3 100644
--- a/stdlib/source/test/lux/control/parser/code.lux
+++ b/stdlib/source/test/lux/control/parser/code.lux
@@ -17,7 +17,7 @@
     ["^" pattern]
     ["[0]" code]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" functor)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" functor)]
     [number
      ["[0]" nat]
      ["[0]" int]
diff --git a/stdlib/source/test/lux/control/parser/environment.lux b/stdlib/source/test/lux/control/parser/environment.lux
index cce8c0d99..9b098cf1a 100644
--- a/stdlib/source/test/lux/control/parser/environment.lux
+++ b/stdlib/source/test/lux/control/parser/environment.lux
@@ -8,7 +8,7 @@
     ["[0]" try]
     ["[0]" exception]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" dictionary]]]
    [math
@@ -17,7 +17,7 @@
      ["n" nat]]]]]
  [\\library
   ["[0]" / (.only)
-   ["/[1]" // ("[1]#[0]" monad)]]])
+   ["/[1]" // (.open: "[1]#[0]" monad)]]])
 
 (def: .public test
   Test
diff --git a/stdlib/source/test/lux/control/parser/json.lux b/stdlib/source/test/lux/control/parser/json.lux
index de37cc4dd..75a817481 100644
--- a/stdlib/source/test/lux/control/parser/json.lux
+++ b/stdlib/source/test/lux/control/parser/json.lux
@@ -14,10 +14,10 @@
     ["[0]" bit]
     ["[0]" text]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" set]
      ["[0]" dictionary]
-     ["[0]" sequence (.only sequence) ("[1]#[0]" functor)]]
+     ["[0]" sequence (.only sequence) (.open: "[1]#[0]" functor)]]
     [format
      ["[0]" json]]]
    [macro
diff --git a/stdlib/source/test/lux/control/parser/synthesis.lux b/stdlib/source/test/lux/control/parser/synthesis.lux
index 3a279ab7a..8e974ad33 100644
--- a/stdlib/source/test/lux/control/parser/synthesis.lux
+++ b/stdlib/source/test/lux/control/parser/synthesis.lux
@@ -12,7 +12,7 @@
     ["[0]" bit]
     ["[0]" text]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
     ["^" pattern]]
    [math
diff --git a/stdlib/source/test/lux/control/parser/text.lux b/stdlib/source/test/lux/control/parser/text.lux
index ae26c9858..af56ad878 100644
--- a/stdlib/source/test/lux/control/parser/text.lux
+++ b/stdlib/source/test/lux/control/parser/text.lux
@@ -10,14 +10,14 @@
     ["[0]" exception (.only Exception)]
     ["[0]" function]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]
      ["[0]" unicode
       ["[1]" set]
       ["[1]/[0]" block]]]
     [collection
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      [tree
       ["[0]" finger]]]]
    [math
diff --git a/stdlib/source/test/lux/control/parser/type.lux b/stdlib/source/test/lux/control/parser/type.lux
index dc7a62b96..779c63cd2 100644
--- a/stdlib/source/test/lux/control/parser/type.lux
+++ b/stdlib/source/test/lux/control/parser/type.lux
@@ -2,7 +2,7 @@
  [library
   [lux (.except)
    ["_" test (.only Test)]
-   ["[0]" type ("[1]#[0]" equivalence)]
+   ["[0]" type (.open: "[1]#[0]" equivalence)]
    [abstract
     [monad (.only do)]]
    [control
@@ -20,7 +20,7 @@
     [number
      ["n" nat]]]
    [meta
-    ["[0]" symbol ("[1]#[0]" equivalence)]]]]
+    ["[0]" symbol (.open: "[1]#[0]" equivalence)]]]]
  [\\library
   ["[0]" / (.only)
    ["/[1]" //]]])
diff --git a/stdlib/source/test/lux/control/parser/xml.lux b/stdlib/source/test/lux/control/parser/xml.lux
index 02262b6f8..95e6c3713 100644
--- a/stdlib/source/test/lux/control/parser/xml.lux
+++ b/stdlib/source/test/lux/control/parser/xml.lux
@@ -2,16 +2,16 @@
  [library
   [lux (.except)
    ["_" test (.only Test)]
-   ["[0]" type ("[1]#[0]" equivalence)]
+   ["[0]" type (.open: "[1]#[0]" equivalence)]
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [format
-     ["[0]" xml ("[1]#[0]" equivalence)]]
+     ["[0]" xml (.open: "[1]#[0]" equivalence)]]
     [collection
      ["[0]" dictionary]
      ["[0]" list]]]
@@ -23,10 +23,10 @@
     [number
      ["n" nat]]]
    [meta
-    ["[0]" symbol ("[1]#[0]" equivalence)]]]]
+    ["[0]" symbol (.open: "[1]#[0]" equivalence)]]]]
  [\\library
   ["[0]" / (.only)
-   ["/[1]" // ("[1]#[0]" monad)]]])
+   ["/[1]" // (.open: "[1]#[0]" monad)]]])
 
 (template: (!expect <pattern> <value>)
   [(case <value>
diff --git a/stdlib/source/test/lux/control/pipe.lux b/stdlib/source/test/lux/control/pipe.lux
index c181ba0f4..cc455e8aa 100644
--- a/stdlib/source/test/lux/control/pipe.lux
+++ b/stdlib/source/test/lux/control/pipe.lux
@@ -7,7 +7,7 @@
     [monad (.only do)]]
    [data
     ["[0]" identity]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
     ["[0]" random]
diff --git a/stdlib/source/test/lux/control/remember.lux b/stdlib/source/test/lux/control/remember.lux
index 2488b31cc..38bd18517 100644
--- a/stdlib/source/test/lux/control/remember.lux
+++ b/stdlib/source/test/lux/control/remember.lux
@@ -17,7 +17,7 @@
      ["%" format (.only format)]]]
    [math
     [number (.only hex)]
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]
    [time
     ["[0]" date (.only Date)]
     ["[0]" instant]
diff --git a/stdlib/source/test/lux/control/security/policy.lux b/stdlib/source/test/lux/control/security/policy.lux
index 0fcb1e901..efd4a029c 100644
--- a/stdlib/source/test/lux/control/security/policy.lux
+++ b/stdlib/source/test/lux/control/security/policy.lux
@@ -10,7 +10,7 @@
      ["$[0]" apply]
      ["$[0]" monad]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [macro
     ["^" pattern]]
    [math
diff --git a/stdlib/source/test/lux/control/try.lux b/stdlib/source/test/lux/control/try.lux
index 995b0125f..043890c39 100644
--- a/stdlib/source/test/lux/control/try.lux
+++ b/stdlib/source/test/lux/control/try.lux
@@ -13,7 +13,7 @@
     ["[0]" pipe]
     ["[0]" io]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/control/writer.lux b/stdlib/source/test/lux/control/writer.lux
index a6f496598..78d475ce1 100644
--- a/stdlib/source/test/lux/control/writer.lux
+++ b/stdlib/source/test/lux/control/writer.lux
@@ -14,7 +14,7 @@
     ["[0]" io]]
    [data
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/data/binary.lux b/stdlib/source/test/lux/data/binary.lux
index ba454ead3..15df63e2e 100644
--- a/stdlib/source/test/lux/data/binary.lux
+++ b/stdlib/source/test/lux/data/binary.lux
@@ -14,7 +14,7 @@
     ["[0]" exception (.only Exception)]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      [array
       [\\unsafe (.only)]]]]
    [math
diff --git a/stdlib/source/test/lux/data/collection/array.lux b/stdlib/source/test/lux/data/collection/array.lux
index b1d6b549f..ee06a8073 100644
--- a/stdlib/source/test/lux/data/collection/array.lux
+++ b/stdlib/source/test/lux/data/collection/array.lux
@@ -13,10 +13,10 @@
      ["$[0]" equivalence]
      ["$[0]" functor (.only Injection)]]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]]
    [data
     ["[0]" bit]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]
      ["[0]" set]]]
diff --git a/stdlib/source/test/lux/data/collection/dictionary.lux b/stdlib/source/test/lux/data/collection/dictionary.lux
index ad26c0120..11a4da3cb 100644
--- a/stdlib/source/test/lux/data/collection/dictionary.lux
+++ b/stdlib/source/test/lux/data/collection/dictionary.lux
@@ -9,13 +9,13 @@
      ["$[0]" equivalence]
      ["$[0]" functor (.only Injection)]]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" try]
     ["[0]" exception]]
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" set]]]
    [math
     ["[0]" random]
diff --git a/stdlib/source/test/lux/data/collection/dictionary/ordered.lux b/stdlib/source/test/lux/data/collection/dictionary/ordered.lux
index 01c979131..75e7a36e2 100644
--- a/stdlib/source/test/lux/data/collection/dictionary/ordered.lux
+++ b/stdlib/source/test/lux/data/collection/dictionary/ordered.lux
@@ -9,15 +9,15 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" maybe ("[1]#[0]" monad)]]
+    ["[0]" maybe (.open: "[1]#[0]" monad)]]
    [data
     ["[0]" product]
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]]]
  [\\library
diff --git a/stdlib/source/test/lux/data/collection/dictionary/plist.lux b/stdlib/source/test/lux/data/collection/dictionary/plist.lux
index 3b8f1ae99..252ca9f85 100644
--- a/stdlib/source/test/lux/data/collection/dictionary/plist.lux
+++ b/stdlib/source/test/lux/data/collection/dictionary/plist.lux
@@ -8,9 +8,9 @@
      ["$[0]" equivalence]
      ["$[0]" monoid]]]
    [control
-    ["[0]" maybe ("[1]#[0]" monad)]]
+    ["[0]" maybe (.open: "[1]#[0]" monad)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     ["[0]" text]
     [collection
      ["[0]" set]
diff --git a/stdlib/source/test/lux/data/collection/list.lux b/stdlib/source/test/lux/data/collection/list.lux
index c727f3041..81e8d76dc 100644
--- a/stdlib/source/test/lux/data/collection/list.lux
+++ b/stdlib/source/test/lux/data/collection/list.lux
@@ -21,7 +21,7 @@
    [data
     ["[0]" bit]
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" set]]]
    [math
@@ -30,7 +30,7 @@
      ["n" nat]
      ["[0]" int]]]]]
  [\\library
-  ["[0]" / ("[1]#[0]" monad)]])
+  ["[0]" / (.open: "[1]#[0]" monad)]])
 
 (def: bounded_size
   (Random Nat)
diff --git a/stdlib/source/test/lux/data/collection/queue.lux b/stdlib/source/test/lux/data/collection/queue.lux
index 05388830b..a67697de2 100644
--- a/stdlib/source/test/lux/data/collection/queue.lux
+++ b/stdlib/source/test/lux/data/collection/queue.lux
@@ -8,10 +8,10 @@
      ["$[0]" equivalence]
      ["$[0]" functor (.only Injection)]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" monoid)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid)]]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/data/collection/queue/priority.lux b/stdlib/source/test/lux/data/collection/queue/priority.lux
index fc8484b42..624231fb1 100644
--- a/stdlib/source/test/lux/data/collection/queue/priority.lux
+++ b/stdlib/source/test/lux/data/collection/queue/priority.lux
@@ -5,9 +5,9 @@
    [abstract
     ["[0]" monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/data/collection/sequence.lux b/stdlib/source/test/lux/data/collection/sequence.lux
index f86951ea4..92d59f68d 100644
--- a/stdlib/source/test/lux/data/collection/sequence.lux
+++ b/stdlib/source/test/lux/data/collection/sequence.lux
@@ -15,17 +15,17 @@
     ["[0]" try (.only Try)]
     ["[0]" exception]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]
+     ["[0]" list (.open: "[1]#[0]" mix)]
      ["[0]" set]]]
    [math
     ["[0]" random]
     [number
      ["n" nat]]]]]
  [\\library
-  ["[0]" / ("[1]#[0]" monad)]])
+  ["[0]" / (.open: "[1]#[0]" monad)]])
 
 (def: signatures
   Test
diff --git a/stdlib/source/test/lux/data/collection/set.lux b/stdlib/source/test/lux/data/collection/set.lux
index 53bf5ee0e..17617c2dc 100644
--- a/stdlib/source/test/lux/data/collection/set.lux
+++ b/stdlib/source/test/lux/data/collection/set.lux
@@ -10,7 +10,7 @@
      ["$[0]" hash]
      ["$[0]" monoid]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]]]
    [math
@@ -18,7 +18,7 @@
     [number
      ["n" nat]]]]]
  [\\library
-  ["[0]" / ("#[0]" equivalence)]])
+  ["[0]" / (.open: "[1]#[0]" equivalence)]])
 
 (def: gen_nat
   (Random Nat)
@@ -68,7 +68,7 @@
                       (bit#= (/.empty? setL)
                              (n.= 0 (/.size setL))))
                     (_.coverage [/.list /.of_list]
-                      (|> setL /.list (/.of_list n.hash) (#= setL)))
+                      (|> setL /.list (/.of_list n.hash) (/#= setL)))
                     (_.coverage [/.member?]
                       (and (list.every? (/.member? setL) (/.list setL))
                            (not (/.member? setL non_memberL))))
@@ -89,12 +89,12 @@
                             (|> setL
                                 (/.has non_memberL)
                                 (/.lacks non_memberL)
-                                (#= setL))
+                                (/#= setL))
 
                             idempotency!
                             (|> setL
                                 (/.lacks non_memberL)
-                                (#= setL))]
+                                (/#= setL))]
                         (and symmetry!
                              idempotency!)))
                     (_.coverage [/.union /.sub?]
@@ -107,7 +107,7 @@
                             union_with_empty_set!
                             (|> setL
                                 (/.union (/.empty n.hash))
-                                (#= setL))]
+                                (/#= setL))]
                         (and sets_are_subs_of_their_unions!
                              union_with_empty_set!)))
                     (_.coverage [/.intersection /.super?]
diff --git a/stdlib/source/test/lux/data/collection/set/multi.lux b/stdlib/source/test/lux/data/collection/set/multi.lux
index 2811e074c..555d7e210 100644
--- a/stdlib/source/test/lux/data/collection/set/multi.lux
+++ b/stdlib/source/test/lux/data/collection/set/multi.lux
@@ -10,10 +10,10 @@
      ["$[0]" equivalence]
      ["$[0]" hash]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/data/collection/set/ordered.lux b/stdlib/source/test/lux/data/collection/set/ordered.lux
index f8dba7aaf..64a1dc4bb 100644
--- a/stdlib/source/test/lux/data/collection/set/ordered.lux
+++ b/stdlib/source/test/lux/data/collection/set/ordered.lux
@@ -8,11 +8,11 @@
     [\\specification
      ["$[0]" equivalence]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]]]
  [\\library
diff --git a/stdlib/source/test/lux/data/collection/stack.lux b/stdlib/source/test/lux/data/collection/stack.lux
index 70141fc19..337b7de4e 100644
--- a/stdlib/source/test/lux/data/collection/stack.lux
+++ b/stdlib/source/test/lux/data/collection/stack.lux
@@ -10,7 +10,7 @@
    [control
     ["[0]" maybe]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/data/collection/stream.lux b/stdlib/source/test/lux/data/collection/stream.lux
index 7c6f10baf..ee293cfa8 100644
--- a/stdlib/source/test/lux/data/collection/stream.lux
+++ b/stdlib/source/test/lux/data/collection/stream.lux
@@ -13,7 +13,7 @@
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/data/collection/tree.lux b/stdlib/source/test/lux/data/collection/tree.lux
index c936ded41..945c1c6b8 100644
--- a/stdlib/source/test/lux/data/collection/tree.lux
+++ b/stdlib/source/test/lux/data/collection/tree.lux
@@ -11,7 +11,7 @@
    [data
     ["[0]" product]
     [collection
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/data/collection/tree/finger.lux b/stdlib/source/test/lux/data/collection/tree/finger.lux
index d2ddb1b96..a9e3d68e6 100644
--- a/stdlib/source/test/lux/data/collection/tree/finger.lux
+++ b/stdlib/source/test/lux/data/collection/tree/finger.lux
@@ -5,11 +5,11 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence monoid)]
+    ["[0]" text (.open: "[1]#[0]" equivalence monoid)]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/data/collection/tree/zipper.lux b/stdlib/source/test/lux/data/collection/tree/zipper.lux
index 4270e0f88..4a2bbac26 100644
--- a/stdlib/source/test/lux/data/collection/tree/zipper.lux
+++ b/stdlib/source/test/lux/data/collection/tree/zipper.lux
@@ -10,7 +10,7 @@
      ["$[0]" comonad]]]
    [control
     ["[0]" pipe]
-    ["[0]" maybe ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]]
    [data
     ["[0]" product]
     ["[0]" text]
diff --git a/stdlib/source/test/lux/data/format/binary.lux b/stdlib/source/test/lux/data/format/binary.lux
index 4210d2563..8c69f0c64 100644
--- a/stdlib/source/test/lux/data/format/binary.lux
+++ b/stdlib/source/test/lux/data/format/binary.lux
@@ -8,7 +8,7 @@
     [\\specification
      ["$[0]" monoid]]]
    [data
-    ["[0]" binary ("[1]#[0]" equivalence)]]
+    ["[0]" binary (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]]]]
  [\\library
diff --git a/stdlib/source/test/lux/data/format/json.lux b/stdlib/source/test/lux/data/format/json.lux
index 9ae374636..1fb8f94fa 100644
--- a/stdlib/source/test/lux/data/format/json.lux
+++ b/stdlib/source/test/lux/data/format/json.lux
@@ -9,7 +9,7 @@
      ["$[0]" equivalence]
      ["$[0]" codec]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]]
+    ["[0]" try (.open: "[1]#[0]" functor)]]
    [data
     ["[0]" product]
     ["[0]" bit]
@@ -19,7 +19,7 @@
      ["[0]" sequence]
      ["[0]" dictionary]
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     ["[0]" random (.only Random)]
     [number
@@ -29,7 +29,7 @@
     ["[0]" syntax (.only syntax:)]
     ["[0]" code]]]]
  [\\library
-  ["[0]" / (.only JSON) ("#[0]" equivalence)]])
+  ["[0]" / (.only JSON) (.open: "[1]#[0]" equivalence)]])
 
 (def: .public random
   (Random /.JSON)
@@ -85,7 +85,7 @@
                    (|> expected
                        /.format
                        (# /.codec decoded)
-                       (try#each (#= expected))
+                       (try#each (/#= expected))
                        (try.else false))))
                (do random.monad
                  [keys (random.set text.hash 3 (random.alphabetic 1))
@@ -106,7 +106,7 @@
                       (_.coverage [/.field]
                         (list.every? (function (_ [key expected])
                                        (|> (/.field key object)
-                                           (try#each (#= expected))
+                                           (try#each (/#= expected))
                                            (try.else false)))
                                      expected))
                       ))
@@ -122,7 +122,7 @@
                           .let [can_find_known_key!
                                 (|> object
                                     (/.field key)
-                                    (try#each (#= {/.#Number expected}))
+                                    (try#each (/#= {/.#Number expected}))
                                     (try.else false))
 
                                 cannot_find_unknown_key!
@@ -165,15 +165,15 @@
                                  <key5> (string)
                                  <key6> (string)]
                  (_.coverage [/.json]
-                   (and (#= {/.#Null} (/.json ()))
+                   (and (/#= {/.#Null} (/.json ()))
                         (~~ (template [<tag> <value>]
-                              [(#= {<tag> <value>} (/.json <value>))]
+                              [(/#= {<tag> <value>} (/.json <value>))]
                               
                               [/.#Boolean <boolean>]
                               [/.#Number <number>]
                               [/.#String <string>]
                               ))
-                        (#= {/.#Array <array_sequence>} (/.json [() <boolean> <number> <string>]))
+                        (/#= {/.#Array <array_sequence>} (/.json [() <boolean> <number> <string>]))
                         (let [object (/.json {<key0> ()
                                                      <key1> <boolean>
                                                      <key2> <number>
@@ -189,11 +189,11 @@
                                  value4 (/.field <key4> object)
                                  value5 (/.field <key5> object)
                                  value6 (/.field <key6> value5)]
-                                (in (and (#= {/.#Null} value0)
-                                         (#= {/.#Boolean <boolean>} value1)
-                                         (#= {/.#Number <number>} value2)
-                                         (#= {/.#String <string>} value3)
-                                         (#= {/.#Array <array_sequence>} value4)
-                                         (#= {/.#Number <number>} value6))))))
+                                (in (and (/#= {/.#Null} value0)
+                                         (/#= {/.#Boolean <boolean>} value1)
+                                         (/#= {/.#Number <number>} value2)
+                                         (/#= {/.#String <string>} value3)
+                                         (/#= {/.#Array <array_sequence>} value4)
+                                         (/#= {/.#Number <number>} value6))))))
                         )))
                ))))
diff --git a/stdlib/source/test/lux/data/format/tar.lux b/stdlib/source/test/lux/data/format/tar.lux
index 24c1be821..c30fb086b 100644
--- a/stdlib/source/test/lux/data/format/tar.lux
+++ b/stdlib/source/test/lux/data/format/tar.lux
@@ -12,8 +12,8 @@
      ["<b>" binary]]]
    [data
     ["[0]" product]
-    ["[0]" binary ("[1]#[0]" equivalence monoid)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" binary (.open: "[1]#[0]" equivalence monoid)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]
@@ -22,7 +22,7 @@
       ["[1]/[0]" block]]]
     [collection
      ["[0]" sequence]
-     ["[0]" list ("[1]#[0]" mix)]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]
     ["[0]" format
      ["[1]" binary]]]
    [time
diff --git a/stdlib/source/test/lux/data/format/xml.lux b/stdlib/source/test/lux/data/format/xml.lux
index 89c68a67a..dc95a00fe 100644
--- a/stdlib/source/test/lux/data/format/xml.lux
+++ b/stdlib/source/test/lux/data/format/xml.lux
@@ -13,15 +13,15 @@
     ["p" parser
      ["</>" xml]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
      ["[0]" dictionary]
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
     ["^" pattern]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]
    [meta
diff --git a/stdlib/source/test/lux/data/sum.lux b/stdlib/source/test/lux/data/sum.lux
index 9dd279775..82adfdc49 100644
--- a/stdlib/source/test/lux/data/sum.lux
+++ b/stdlib/source/test/lux/data/sum.lux
@@ -12,7 +12,7 @@
    [data
     ["[0]" text]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/data/text/buffer.lux b/stdlib/source/test/lux/data/text/buffer.lux
index 0def44bd6..b6d868fbd 100644
--- a/stdlib/source/test/lux/data/text/buffer.lux
+++ b/stdlib/source/test/lux/data/text/buffer.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
     ["[0]" random (.only Random)]
diff --git a/stdlib/source/test/lux/data/text/encoding.lux b/stdlib/source/test/lux/data/text/encoding.lux
index 42f0e9d38..d56fd8bdc 100644
--- a/stdlib/source/test/lux/data/text/encoding.lux
+++ b/stdlib/source/test/lux/data/text/encoding.lux
@@ -10,9 +10,9 @@
     ["[0]" maybe]
     ["[0]" try]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]
+     ["[0]" list (.open: "[1]#[0]" mix)]
      ["[0]" set]]]
    [macro
     ["[0]" template]]
diff --git a/stdlib/source/test/lux/data/text/escape.lux b/stdlib/source/test/lux/data/text/escape.lux
index c2d06ce89..aba3d5948 100644
--- a/stdlib/source/test/lux/data/text/escape.lux
+++ b/stdlib/source/test/lux/data/text/escape.lux
@@ -12,8 +12,8 @@
     [parser
      ["<[0]>" code]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text (.only Char) ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.only Char) (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
      ["[0]" set (.only Set)]]]
diff --git a/stdlib/source/test/lux/data/text/format.lux b/stdlib/source/test/lux/data/text/format.lux
index 9026a7029..903e13497 100644
--- a/stdlib/source/test/lux/data/text/format.lux
+++ b/stdlib/source/test/lux/data/text/format.lux
@@ -11,13 +11,13 @@
    [control
     ["[0]" try]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     ["[0]" bit]
     [format
      ["[0]" xml]
      ["[0]" json]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    ["[0]" time (.only)
     ["[0]" day]
     ["[0]" month]
@@ -25,7 +25,7 @@
     ["[0]" duration]
     ["[0]" date]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     ["[0]" modulus]
     ["[0]" modular]
     [number
diff --git a/stdlib/source/test/lux/data/text/regex.lux b/stdlib/source/test/lux/data/text/regex.lux
index 646e29e6c..c16388e4e 100644
--- a/stdlib/source/test/lux/data/text/regex.lux
+++ b/stdlib/source/test/lux/data/text/regex.lux
@@ -11,7 +11,7 @@
      ["<[0]>" text (.only Parser)]
      ["<[0]>" code]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/test/lux/data/text/unicode/set.lux b/stdlib/source/test/lux/data/text/unicode/set.lux
index a0cc8b90f..af36a8463 100644
--- a/stdlib/source/test/lux/data/text/unicode/set.lux
+++ b/stdlib/source/test/lux/data/text/unicode/set.lux
@@ -8,9 +8,9 @@
      ["$[0]" equivalence]]]
    [data
     ["[0]" product]
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [collection
-     ["[0]" set ("[1]#[0]" equivalence)]]]
+     ["[0]" set (.open: "[1]#[0]" equivalence)]]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/debug.lux b/stdlib/source/test/lux/debug.lux
index 30b464449..9b61ab55d 100644
--- a/stdlib/source/test/lux/debug.lux
+++ b/stdlib/source/test/lux/debug.lux
@@ -6,15 +6,15 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]
     [parser
      ["<[0]>" code]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]
     [format
      [json (.only JSON)]
      [xml (.only XML)]]]
diff --git a/stdlib/source/test/lux/documentation.lux b/stdlib/source/test/lux/documentation.lux
index b6a08b480..40ad67b42 100644
--- a/stdlib/source/test/lux/documentation.lux
+++ b/stdlib/source/test/lux/documentation.lux
@@ -9,7 +9,7 @@
     [parser
      ["<[0]>" code]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format]]
     [format
      ["md" markdown]]]
diff --git a/stdlib/source/test/lux/extension.lux b/stdlib/source/test/lux/extension.lux
index a40850eb7..c8434e1c6 100644
--- a/stdlib/source/test/lux/extension.lux
+++ b/stdlib/source/test/lux/extension.lux
@@ -19,7 +19,7 @@
              [abstract
               ["[0]" monad (.only do)]]
              [control
-              ["[0]" try ("[1]#[0]" functor)]
+              ["[0]" try (.open: "[1]#[0]" functor)]
               ["<>" parser (.only)
                ["<[0]>" code]
                ["<[0]>" analysis]
@@ -27,11 +27,11 @@
              [data
               ["[0]" binary]
               ["[0]" product]
-              ["[0]" text ("[1]#[0]" equivalence)
+              ["[0]" text (.open: "[1]#[0]" equivalence)
                ["%" format (.only format)]]
               [collection
                ["[0]" sequence]
-               ["[0]" list ("[1]#[0]" functor)]]
+               ["[0]" list (.open: "[1]#[0]" functor)]]
               [format
                ["[0]F" binary]]]
              [macro
diff --git a/stdlib/source/test/lux/ffi.js.lux b/stdlib/source/test/lux/ffi.js.lux
index 20920baa6..6d0946605 100644
--- a/stdlib/source/test/lux/ffi.js.lux
+++ b/stdlib/source/test/lux/ffi.js.lux
@@ -7,8 +7,8 @@
    [control
     ["[0]" try]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/ffi.jvm.lux b/stdlib/source/test/lux/ffi.jvm.lux
index 9e4af45a8..0174a039f 100644
--- a/stdlib/source/test/lux/ffi.jvm.lux
+++ b/stdlib/source/test/lux/ffi.jvm.lux
@@ -2,7 +2,7 @@
  [library
   [lux (.except)
    ["_" test (.only Test)]
-   ["[0]" type ("[1]#[0]" equivalence)]
+   ["[0]" type (.open: "[1]#[0]" equivalence)]
    ["[0]" meta]
    ["[0]" debug]
    ["[0]" static]
@@ -10,13 +10,13 @@
     [monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]
     [parser
      ["<[0]>" code]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
      ["[0]" array (.only Array)]]]
@@ -25,15 +25,15 @@
     ["[0]" code]
     ["[0]" template]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number (.only hex)
      ["[0]" i64]
      ["n" nat]
-     ["i" int ("[1]#[0]" equivalence)]
-     ["f" frac ("[1]#[0]" equivalence)]]]
+     ["i" int (.open: "[1]#[0]" equivalence)]
+     ["f" frac (.open: "[1]#[0]" equivalence)]]]
    [target
     ["[0]" jvm
-     ["[1]" type ("[1]#[0]" equivalence)]]]]]
+     ["[1]" type (.open: "[1]#[0]" equivalence)]]]]]
  [\\library
   ["[0]" /]]
  ["$[0]" /
diff --git a/stdlib/source/test/lux/ffi.old.lux b/stdlib/source/test/lux/ffi.old.lux
index 53b14d335..e5f5ab8aa 100644
--- a/stdlib/source/test/lux/ffi.old.lux
+++ b/stdlib/source/test/lux/ffi.old.lux
@@ -8,7 +8,7 @@
    [control
     ["[0]" pipe]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [macro
     ["[0]" template]]
@@ -18,7 +18,7 @@
      ["n" nat]
      ["i" int]
      ["f" frac]]]
-   ["[0]" type ("[1]#[0]" equivalence)]]]
+   ["[0]" type (.open: "[1]#[0]" equivalence)]]]
  [\\library
   ["[0]" /]])
 
diff --git a/stdlib/source/test/lux/ffi.php.lux b/stdlib/source/test/lux/ffi.php.lux
index d880303ec..22532f1b1 100644
--- a/stdlib/source/test/lux/ffi.php.lux
+++ b/stdlib/source/test/lux/ffi.php.lux
@@ -7,7 +7,7 @@
    [control
     ["[0]" try]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/ffi.scm.lux b/stdlib/source/test/lux/ffi.scm.lux
index d880303ec..22532f1b1 100644
--- a/stdlib/source/test/lux/ffi.scm.lux
+++ b/stdlib/source/test/lux/ffi.scm.lux
@@ -7,7 +7,7 @@
    [control
     ["[0]" try]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/ffi/export.jvm.lux b/stdlib/source/test/lux/ffi/export.jvm.lux
index b01c607ef..7dc0e194d 100644
--- a/stdlib/source/test/lux/ffi/export.jvm.lux
+++ b/stdlib/source/test/lux/ffi/export.jvm.lux
@@ -8,18 +8,18 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format]]]
    [macro
     ["[0]" code]
     ["[0]" template]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number (.only hex)
      ["[0]" i64]
-     ["[0]" int ("[1]#[0]" equivalence)]
-     ["[0]" frac ("[1]#[0]" equivalence)]]]]]
+     ["[0]" int (.open: "[1]#[0]" equivalence)]
+     ["[0]" frac (.open: "[1]#[0]" equivalence)]]]]]
  [\\library
   ["[0]" / (.only)
    ["/[1]" //]]])
diff --git a/stdlib/source/test/lux/locale.lux b/stdlib/source/test/lux/locale.lux
index 7116e3e67..7f4f183fb 100644
--- a/stdlib/source/test/lux/locale.lux
+++ b/stdlib/source/test/lux/locale.lux
@@ -8,9 +8,9 @@
      ["$[0]" equivalence]
      ["$[0]" hash]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["[0]" encoding (.only Encoding)]]
     [collection
      ["[0]" list]]]]]
diff --git a/stdlib/source/test/lux/locale/language.lux b/stdlib/source/test/lux/locale/language.lux
index 66f34be4f..6c8b4f6ad 100644
--- a/stdlib/source/test/lux/locale/language.lux
+++ b/stdlib/source/test/lux/locale/language.lux
@@ -13,7 +13,7 @@
     ["[0]" text]
     [collection
      ["[0]" set (.only Set)]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["[0]" template]]
    [math
diff --git a/stdlib/source/test/lux/locale/territory.lux b/stdlib/source/test/lux/locale/territory.lux
index c1d82e8fc..067d68595 100644
--- a/stdlib/source/test/lux/locale/territory.lux
+++ b/stdlib/source/test/lux/locale/territory.lux
@@ -13,7 +13,7 @@
     ["[0]" text]
     [collection
      ["[0]" set (.only Set)]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["[0]" template]]
    [math
diff --git a/stdlib/source/test/lux/macro.lux b/stdlib/source/test/lux/macro.lux
index cda98f580..f1f2bce0b 100644
--- a/stdlib/source/test/lux/macro.lux
+++ b/stdlib/source/test/lux/macro.lux
@@ -6,11 +6,11 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" code]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
@@ -18,7 +18,7 @@
    [macro
     ["^" pattern]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" functor)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" functor)]
     [number
      ["n" nat]]]
    ["[0]" meta (.only)
@@ -27,7 +27,7 @@
  [\\library
   ["[0]" / (.only)
    [syntax (.only syntax:)]
-   ["[0]" code ("[1]#[0]" equivalence)]
+   ["[0]" code (.open: "[1]#[0]" equivalence)]
    ["[0]" template]]]
  ["[0]" /
   ["[1][0]" code]
diff --git a/stdlib/source/test/lux/macro/code.lux b/stdlib/source/test/lux/macro/code.lux
index 34f759fed..f3991eda0 100644
--- a/stdlib/source/test/lux/macro/code.lux
+++ b/stdlib/source/test/lux/macro/code.lux
@@ -12,9 +12,9 @@
     ["[0]" product]
     ["[0]" text]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]
    [meta
diff --git a/stdlib/source/test/lux/macro/pattern.lux b/stdlib/source/test/lux/macro/pattern.lux
index 1353b17ed..6fb9ef8d0 100644
--- a/stdlib/source/test/lux/macro/pattern.lux
+++ b/stdlib/source/test/lux/macro/pattern.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [macro
     ["[0]" code]]
    [math
diff --git a/stdlib/source/test/lux/macro/syntax/check.lux b/stdlib/source/test/lux/macro/syntax/check.lux
index c7e4dbc39..cb43a209c 100644
--- a/stdlib/source/test/lux/macro/syntax/check.lux
+++ b/stdlib/source/test/lux/macro/syntax/check.lux
@@ -13,7 +13,7 @@
    [math
     ["[0]" random (.only Random)]]
    [macro
-    ["[0]" code ("[1]#[0]" equivalence)]]]]
+    ["[0]" code (.open: "[1]#[0]" equivalence)]]]]
  [\\library
   ["[0]" /]]
  ["$[0]" ///
diff --git a/stdlib/source/test/lux/macro/syntax/definition.lux b/stdlib/source/test/lux/macro/syntax/definition.lux
index 2365e0d6b..7fa3550dd 100644
--- a/stdlib/source/test/lux/macro/syntax/definition.lux
+++ b/stdlib/source/test/lux/macro/syntax/definition.lux
@@ -12,7 +12,7 @@
     ["<>" parser (.only)
      ["<[0]>" code]]]
    [macro
-    ["[0]" code ("[1]#[0]" equivalence)]]
+    ["[0]" code (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]]
    [meta
diff --git a/stdlib/source/test/lux/macro/syntax/export.lux b/stdlib/source/test/lux/macro/syntax/export.lux
index a2133452c..151d72ada 100644
--- a/stdlib/source/test/lux/macro/syntax/export.lux
+++ b/stdlib/source/test/lux/macro/syntax/export.lux
@@ -6,11 +6,11 @@
     [monad (.only do)]]
    [control
     ["[0]" maybe]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" code]]]
    [macro
-    ["[0]" code ("[1]#[0]" equivalence)]]
+    ["[0]" code (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/macro/syntax/type/variable.lux b/stdlib/source/test/lux/macro/syntax/type/variable.lux
index db7e23daa..0e1d52f6f 100644
--- a/stdlib/source/test/lux/macro/syntax/type/variable.lux
+++ b/stdlib/source/test/lux/macro/syntax/type/variable.lux
@@ -7,7 +7,7 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" code]]]
    [math
diff --git a/stdlib/source/test/lux/math.lux b/stdlib/source/test/lux/math.lux
index 6c7cfd915..38c704927 100644
--- a/stdlib/source/test/lux/math.lux
+++ b/stdlib/source/test/lux/math.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [macro
     ["[0]" template]]
    [math
diff --git a/stdlib/source/test/lux/math/infix.lux b/stdlib/source/test/lux/math/infix.lux
index 249f8d3a2..441df11b9 100644
--- a/stdlib/source/test/lux/math/infix.lux
+++ b/stdlib/source/test/lux/math/infix.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/math/logic/fuzzy.lux b/stdlib/source/test/lux/math/logic/fuzzy.lux
index e0e5bc1ea..2cfc62142 100644
--- a/stdlib/source/test/lux/math/logic/fuzzy.lux
+++ b/stdlib/source/test/lux/math/logic/fuzzy.lux
@@ -9,7 +9,7 @@
      [functor
       ["$[0]" contravariant]]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]
      ["[0]" set]]]
diff --git a/stdlib/source/test/lux/math/modular.lux b/stdlib/source/test/lux/math/modular.lux
index e05d7c8e9..0137ba9ae 100644
--- a/stdlib/source/test/lux/math/modular.lux
+++ b/stdlib/source/test/lux/math/modular.lux
@@ -2,7 +2,7 @@
  [library
   [lux (.except)
    ["_" test (.only Test)]
-   ["[0]" type ("[1]#[0]" equivalence)]
+   ["[0]" type (.open: "[1]#[0]" equivalence)]
    [abstract
     [monad (.only do)]
     ["[0]" predicate]
@@ -16,7 +16,7 @@
     ["[0]" exception]]
    [data
     ["[0]" product]
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/math/number/complex.lux b/stdlib/source/test/lux/math/number/complex.lux
index ec11a5428..087ee1245 100644
--- a/stdlib/source/test/lux/math/number/complex.lux
+++ b/stdlib/source/test/lux/math/number/complex.lux
@@ -8,7 +8,7 @@
      ["$[0]" equivalence]]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     ["[0]" random (.only Random)]]]]
  [\\library
diff --git a/stdlib/source/test/lux/math/number/frac.lux b/stdlib/source/test/lux/math/number/frac.lux
index 5f4c021bd..c302d876c 100644
--- a/stdlib/source/test/lux/math/number/frac.lux
+++ b/stdlib/source/test/lux/math/number/frac.lux
@@ -13,7 +13,7 @@
      ["$[0]" monoid]
      ["$[0]" codec]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [macro
     ["[0]" template]]
    [math
diff --git a/stdlib/source/test/lux/math/number/i64.lux b/stdlib/source/test/lux/math/number/i64.lux
index f6ade938b..550d6f03d 100644
--- a/stdlib/source/test/lux/math/number/i64.lux
+++ b/stdlib/source/test/lux/math/number/i64.lux
@@ -3,7 +3,7 @@
   [lux (.except)
    ["_" test (.only Test)]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [abstract
     [monad (.only do)]
     [\\specification
@@ -13,7 +13,7 @@
    [math
     ["[0]" random (.only Random)]]]]
  [\\library
-  ["[0]" / ("#[0]" equivalence)
+  ["[0]" / (.open: "[1]#[0]" equivalence)
    [// (.only hex)
     ["n" nat]
     ["i" int]]]])
@@ -26,20 +26,20 @@
     (all _.and
          (_.coverage [/.one? /.one]
            (if (/.one? idx pattern)
-             (#= pattern (/.one idx pattern))
-             (not (#= pattern (/.one idx pattern)))))
+             (/#= pattern (/.one idx pattern))
+             (not (/#= pattern (/.one idx pattern)))))
          (_.coverage [/.zero? /.zero]
            (if (/.zero? idx pattern)
-             (#= pattern (/.zero idx pattern))
-             (not (#= pattern (/.zero idx pattern)))))
+             (/#= pattern (/.zero idx pattern))
+             (not (/#= pattern (/.zero idx pattern)))))
          (_.coverage [/.flipped]
-           (#= (/.flipped idx pattern)
-               (if (/.one? idx pattern)
-                 (/.zero idx pattern)
-                 (/.one idx pattern))))
+           (/#= (/.flipped idx pattern)
+                (if (/.one? idx pattern)
+                  (/.zero idx pattern)
+                  (/.one idx pattern))))
          (_.coverage [/.bit]
            (bit#= (/.zero? idx pattern)
-                  (#= /.false (/.and (/.bit idx) pattern))))
+                  (/#= /.false (/.and (/.bit idx) pattern))))
          )))
 
 (def: shift
@@ -51,19 +51,19 @@
            [idx (# ! each (|>> (n.% (-- /.width)) ++) random.nat)]
            (_.coverage [/.left_shifted /.right_shifted]
              (let [nullity!
-                   (and (#= pattern (/.left_shifted 0 pattern))
-                        (#= pattern (/.right_shifted 0 pattern)))
+                   (and (/#= pattern (/.left_shifted 0 pattern))
+                        (/#= pattern (/.right_shifted 0 pattern)))
 
                    idempotency!
-                   (and (#= pattern (/.left_shifted /.width pattern))
-                        (#= pattern (/.right_shifted /.width pattern)))
+                   (and (/#= pattern (/.left_shifted /.width pattern))
+                        (/#= pattern (/.right_shifted /.width pattern)))
 
                    movement!
                    (let [shift (n.- idx /.width)]
-                     (#= (/.and (/.mask idx) pattern)
-                         (|> pattern
-                             (/.left_shifted shift)
-                             (/.right_shifted shift))))]
+                     (/#= (/.and (/.mask idx) pattern)
+                          (|> pattern
+                              (/.left_shifted shift)
+                              (/.right_shifted shift))))]
                (and nullity!
                     idempotency!
                     movement!))))
@@ -78,20 +78,20 @@
          signed random.int]
         (all _.and
              (_.coverage [/.sign]
-               (bit#= (#= (.i64 0) (/.and /.sign signed))
+               (bit#= (/#= (.i64 0) (/.and /.sign signed))
                       (i.positive? signed)))
              (_.coverage [/.mask]
                (let [mask (/.mask idx)
-                     idempotency! (#= (/.and mask pattern)
-                                      (/.and mask (/.and mask pattern)))
+                     idempotency! (/#= (/.and mask pattern)
+                                       (/.and mask (/.and mask pattern)))
 
                      limit (++ (.nat mask))
                      limit! (if (n.< limit pattern)
-                              (#= pattern (/.and mask pattern))
+                              (/#= pattern (/.and mask pattern))
                               (n.< limit (/.and mask pattern)))
 
-                     empty! (#= /.false (/.mask 0))
-                     full! (#= /.true (/.mask /.width))]
+                     empty! (/#= /.false (/.mask 0))
+                     full! (/#= /.true (/.mask /.width))]
                  (and idempotency!
                       limit!
 
@@ -103,19 +103,19 @@
                 offset (# ! each (n.% spare) random.nat)]
                (_.coverage [/.region]
                  (case size
-                   0 (#= /.false (/.region offset size))
-                   _ (#= (|> pattern
-                             ... NNNNYYYYNNNN
-                             (/.right_shifted offset)
-                             ... ____NNNNYYYY
-                             (/.left_shifted spare)
-                             ... YYYY________
-                             (/.right_shifted spare)
-                             ... ________YYYY
-                             (/.left_shifted offset)
-                             ... ____YYYY____
-                             )
-                         (/.and (/.region offset size) pattern)))))
+                   0 (/#= /.false (/.region offset size))
+                   _ (/#= (|> pattern
+                              ... NNNNYYYYNNNN
+                              (/.right_shifted offset)
+                              ... ____NNNNYYYY
+                              (/.left_shifted spare)
+                              ... YYYY________
+                              (/.right_shifted spare)
+                              ... ________YYYY
+                              (/.left_shifted offset)
+                              ... ____YYYY____
+                              )
+                          (/.and (/.region offset size) pattern)))))
              ))))
 
 (def: sub
@@ -143,7 +143,7 @@
                     ($equivalence.spec (# sub sub_equivalence) (random (# sub narrow)))
                     (_.coverage [/.sub]
                       (let [actual (|> expected .i64 (# sub narrow) (# sub wide))]
-                        (#= expected actual)))
+                        (/#= expected actual)))
                     ))))))
 
 (def: signature
@@ -175,27 +175,27 @@
              (_.coverage [/.false]
                (n.= 0 (/.ones /.false)))
              (_.coverage [/.or]
-               (and (#= /.true (/.or /.true pattern))
-                    (#= pattern (/.or /.false pattern))))
+               (and (/#= /.true (/.or /.true pattern))
+                    (/#= pattern (/.or /.false pattern))))
              (_.coverage [/.true]
                (n.= /.width (/.ones /.true)))
              (_.coverage [/.and]
-               (and (#= pattern (/.and /.true pattern))
-                    (#= /.false (/.and /.false pattern))))
+               (and (/#= pattern (/.and /.true pattern))
+                    (/#= /.false (/.and /.false pattern))))
              (_.coverage [/.not]
-               (and (#= /.false
-                        (/.and pattern
-                               (/.not pattern)))
-                    (#= /.true
-                        (/.or pattern
-                              (/.not pattern)))))
+               (and (/#= /.false
+                         (/.and pattern
+                                (/.not pattern)))
+                    (/#= /.true
+                         (/.or pattern
+                               (/.not pattern)))))
              (_.coverage [/.xor]
-               (and (#= /.true
-                        (/.xor pattern
-                               (/.not pattern)))
-                    (#= /.false
-                        (/.xor pattern
-                               pattern))))
+               (and (/#= /.true
+                         (/.xor pattern
+                                (/.not pattern)))
+                    (/#= /.false
+                         (/.xor pattern
+                                pattern))))
              (_.coverage [/.ones]
                (let [zero&one!
                      (if (/.one? idx pattern)
@@ -210,52 +210,52 @@
                       complementarity!)))
              (_.coverage [/.left_rotated /.right_rotated]
                (let [false!
-                     (and (#= /.false (/.left_rotated idx /.false))
-                          (#= /.false (/.right_rotated idx /.false)))
+                     (and (/#= /.false (/.left_rotated idx /.false))
+                          (/#= /.false (/.right_rotated idx /.false)))
 
                      true!
-                     (and (#= /.true (/.left_rotated idx /.true))
-                          (#= /.true (/.right_rotated idx /.true)))
+                     (and (/#= /.true (/.left_rotated idx /.true))
+                          (/#= /.true (/.right_rotated idx /.true)))
 
                      inverse!
                      (and (|> pattern
                               (/.left_rotated idx)
                               (/.right_rotated idx)
-                              (#= pattern))
+                              (/#= pattern))
                           (|> pattern
                               (/.right_rotated idx)
                               (/.left_rotated idx)
-                              (#= pattern)))
+                              (/#= pattern)))
 
                      nullity!
                      (and (|> pattern
                               (/.left_rotated 0)
-                              (#= pattern))
+                              (/#= pattern))
                           (|> pattern
                               (/.right_rotated 0)
-                              (#= pattern)))
+                              (/#= pattern)))
 
                      futility!
                      (and (|> pattern
                               (/.left_rotated /.width)
-                              (#= pattern))
+                              (/#= pattern))
                           (|> pattern
                               (/.right_rotated /.width)
-                              (#= pattern)))]
+                              (/#= pattern)))]
                  (and false!
                       true!
                       inverse!
                       nullity!
                       futility!)))
              (_.coverage [/.reversed]
-               (and (|> pattern /.reversed /.reversed (#= pattern))
-                    (or (|> pattern /.reversed (#= pattern) not)
+               (and (|> pattern /.reversed /.reversed (/#= pattern))
+                    (or (|> pattern /.reversed (/#= pattern) not)
                         (let [high (/.and (hex "FFFFFFFF00000000")
                                           pattern)
                               low (/.and (hex "00000000FFFFFFFF")
                                          pattern)]
-                          (#= (/.reversed high)
-                              low)))))
+                          (/#= (/.reversed high)
+                               low)))))
              
              ..bit
              ..shift
diff --git a/stdlib/source/test/lux/math/number/int.lux b/stdlib/source/test/lux/math/number/int.lux
index 200d932ea..1509a65fc 100644
--- a/stdlib/source/test/lux/math/number/int.lux
+++ b/stdlib/source/test/lux/math/number/int.lux
@@ -13,7 +13,7 @@
      ["$[0]" monoid]
      ["$[0]" codec]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]]]]
  [\\library
diff --git a/stdlib/source/test/lux/math/number/nat.lux b/stdlib/source/test/lux/math/number/nat.lux
index 04a0418c1..733b6445e 100644
--- a/stdlib/source/test/lux/math/number/nat.lux
+++ b/stdlib/source/test/lux/math/number/nat.lux
@@ -13,7 +13,7 @@
      ["$[0]" monoid]
      ["$[0]" codec]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random]]]]
  [\\library
diff --git a/stdlib/source/test/lux/math/number/ratio.lux b/stdlib/source/test/lux/math/number/ratio.lux
index b851e47eb..fe01953dc 100644
--- a/stdlib/source/test/lux/math/number/ratio.lux
+++ b/stdlib/source/test/lux/math/number/ratio.lux
@@ -10,15 +10,15 @@
      ["$[0]" monoid]
      ["$[0]" codec]]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]]]]
  [\\library
   ["[0]" / (.only)
    [//
-    ["n" nat ("[1]#[0]" equivalence)]]]])
+    ["n" nat (.open: "[1]#[0]" equivalence)]]]])
 
 (def: part
   (Random Nat)
diff --git a/stdlib/source/test/lux/math/number/rev.lux b/stdlib/source/test/lux/math/number/rev.lux
index 45ce9ff55..82b16e725 100644
--- a/stdlib/source/test/lux/math/number/rev.lux
+++ b/stdlib/source/test/lux/math/number/rev.lux
@@ -13,7 +13,7 @@
      ["$[0]" monoid]
      ["$[0]" codec]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random]]]]
  [\\library
@@ -21,7 +21,7 @@
    [// (.only hex)
     ["n" nat]
     ["f" frac]
-    ["[0]" i64 ("[1]#[0]" hash)]]]])
+    ["[0]" i64 (.open: "[1]#[0]" hash)]]]])
 
 (def: signature
   Test
diff --git a/stdlib/source/test/lux/meta.lux b/stdlib/source/test/lux/meta.lux
index 31119081b..87823e85a 100644
--- a/stdlib/source/test/lux/meta.lux
+++ b/stdlib/source/test/lux/meta.lux
@@ -2,7 +2,7 @@
  [library
   [lux (.except)
    ["_" test (.only Test)]
-   ["[0]" type ("[1]#[0]" equivalence)]
+   ["[0]" type (.open: "[1]#[0]" equivalence)]
    [abstract
     [equivalence (.only Equivalence)]
     [monad (.only do)]
@@ -12,14 +12,14 @@
      ["$[0]" monad]]]
    [control
     ["[0]" maybe]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
    [data
     ["[0]" product]
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor monoid)]
+     ["[0]" list (.open: "[1]#[0]" functor monoid)]
      ["[0]" set]]]
    [macro
     ["^" pattern]]
@@ -29,7 +29,7 @@
      ["n" nat]]]
    [meta
     ["[0]" location]
-    ["[0]" symbol ("[1]#[0]" equivalence)]]]]
+    ["[0]" symbol (.open: "[1]#[0]" equivalence)]]]]
  [\\library
   ["[0]" /]]
  ["[0]" /
diff --git a/stdlib/source/test/lux/meta/configuration.lux b/stdlib/source/test/lux/meta/configuration.lux
index 8f9539fae..a8d7f0169 100644
--- a/stdlib/source/test/lux/meta/configuration.lux
+++ b/stdlib/source/test/lux/meta/configuration.lux
@@ -9,7 +9,7 @@
      ["$[0]" equivalence]
      ["$[0]" monoid]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]
     ["<>" parser (.only)
      ["<[0]>" text]
@@ -22,7 +22,7 @@
     [syntax (.only syntax:)]
     ["[0]" code]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
  [\\library
   ["[0]" /]])
 
diff --git a/stdlib/source/test/lux/static.lux b/stdlib/source/test/lux/static.lux
index c5ecf3a71..2e810c517 100644
--- a/stdlib/source/test/lux/static.lux
+++ b/stdlib/source/test/lux/static.lux
@@ -5,14 +5,14 @@
    ["@" target]
    ["[0]" meta]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [macro
     ["[0]" code]]
    [math
-    ["[0]" random ("[1]#[0]" functor)]
+    ["[0]" random (.open: "[1]#[0]" functor)]
     [number
      ["n" nat]
      ["i" int]
diff --git a/stdlib/source/test/lux/target/js.lux b/stdlib/source/test/lux/target/js.lux
index c759cc02e..84cd62bdf 100644
--- a/stdlib/source/test/lux/target/js.lux
+++ b/stdlib/source/test/lux/target/js.lux
@@ -9,18 +9,18 @@
    [control
     ["[0]" pipe]
     ["[0]" function]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text (.only \n) ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.only \n) (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
     ["[0]" template]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]
      ["i" int]
diff --git a/stdlib/source/test/lux/target/jvm.lux b/stdlib/source/test/lux/target/jvm.lux
index 0dddacfb5..c2c1e49f3 100644
--- a/stdlib/source/test/lux/target/jvm.lux
+++ b/stdlib/source/test/lux/target/jvm.lux
@@ -13,8 +13,8 @@
     [concurrency
      ["[0]" atom]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     ["[0]" format
      ["[1]" binary]]
@@ -23,9 +23,9 @@
      ["[0]" dictionary]
      ["[0]" sequence]
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]
      ["i" int]
@@ -37,7 +37,7 @@
   ["[0]" /
    ["[1][0]" loader (.only Library)]
    ["[1][0]" version]
-   ["[1][0]" modifier ("[1]#[0]" monoid)]
+   ["[1][0]" modifier (.open: "[1]#[0]" monoid)]
    ["[1][0]" field]
    ["[1][0]" method (.only Method)]
    ["[1][0]" class]
diff --git a/stdlib/source/test/lux/target/lua.lux b/stdlib/source/test/lux/target/lua.lux
index 381758793..fbdc7625e 100644
--- a/stdlib/source/test/lux/target/lua.lux
+++ b/stdlib/source/test/lux/target/lua.lux
@@ -12,18 +12,18 @@
    [control
     ["[0]" pipe]
     ["[0]" function]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text (.only \n) ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.only \n) (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
     ["[0]" template]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]
      ["i" int]
diff --git a/stdlib/source/test/lux/target/python.lux b/stdlib/source/test/lux/target/python.lux
index 0b484f9ef..35fbf47c8 100644
--- a/stdlib/source/test/lux/target/python.lux
+++ b/stdlib/source/test/lux/target/python.lux
@@ -12,25 +12,25 @@
      ["$[0]" hash]]]
    [control
     ["[0]" function]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [macro
     ["[0]" code]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]
      ["i" int]
      ["f" frac]
      ["[0]" i64]]]]]
  [\\library
-  ["[0]" / ("[1]#[0]" equivalence)]])
+  ["[0]" / (.open: "[1]#[0]" equivalence)]])
 
 (ffi.import: (eval [Text] "try" "?" Any))
 
diff --git a/stdlib/source/test/lux/target/ruby.lux b/stdlib/source/test/lux/target/ruby.lux
index 94e1df527..5e5588be7 100644
--- a/stdlib/source/test/lux/target/ruby.lux
+++ b/stdlib/source/test/lux/target/ruby.lux
@@ -11,17 +11,17 @@
      ["$[0]" equivalence]]]
    [control
     ["[0]" pipe]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor)]
+     ["[0]" list (.open: "[1]#[0]" functor)]
      ["[0]" set]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number (.only hex)
      ["n" nat]
      ["i" int]
@@ -35,7 +35,7 @@
    [world
     ["[0]" file]]]]
  [\\library
-  ["[0]" / ("[1]#[0]" equivalence)]])
+  ["[0]" / (.open: "[1]#[0]" equivalence)]])
 
 (ffi.import: (eval [Text] "try" "?" Any))
 
diff --git a/stdlib/source/test/lux/test.lux b/stdlib/source/test/lux/test.lux
index 1a1842846..b43483870 100644
--- a/stdlib/source/test/lux/test.lux
+++ b/stdlib/source/test/lux/test.lux
@@ -10,7 +10,7 @@
      ["[0]" async]
      ["[0]" atom (.only Atom)]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format]]
     [collection
      ["[0]" list]
diff --git a/stdlib/source/test/lux/time.lux b/stdlib/source/test/lux/time.lux
index 8f478b695..456409afd 100644
--- a/stdlib/source/test/lux/time.lux
+++ b/stdlib/source/test/lux/time.lux
@@ -11,7 +11,7 @@
      ["$[0]" codec]]]
    [control
     ["[0]" pipe]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]
     [parser
      ["<[0]>" text]]]
diff --git a/stdlib/source/test/lux/time/date.lux b/stdlib/source/test/lux/time/date.lux
index 1d0da3548..2d9a2486b 100644
--- a/stdlib/source/test/lux/time/date.lux
+++ b/stdlib/source/test/lux/time/date.lux
@@ -10,7 +10,7 @@
      ["$[0]" enum]
      ["$[0]" codec]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]
     [parser
      ["<[0]>" text]]]
diff --git a/stdlib/source/test/lux/time/day.lux b/stdlib/source/test/lux/time/day.lux
index 4537d684d..432012147 100644
--- a/stdlib/source/test/lux/time/day.lux
+++ b/stdlib/source/test/lux/time/day.lux
@@ -12,14 +12,14 @@
      ["$[0]" enum]
      ["$[0]" codec]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]]
    [data
     [collection
      ["[0]" list]
      ["[0]" set]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]]]
  [\\library
diff --git a/stdlib/source/test/lux/time/duration.lux b/stdlib/source/test/lux/time/duration.lux
index 80e516133..d637ebf2f 100644
--- a/stdlib/source/test/lux/time/duration.lux
+++ b/stdlib/source/test/lux/time/duration.lux
@@ -11,7 +11,7 @@
      ["$[0]" monoid]
      ["$[0]" codec]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/time/instant.lux b/stdlib/source/test/lux/time/instant.lux
index 50c1eec56..0ae5bf04c 100644
--- a/stdlib/source/test/lux/time/instant.lux
+++ b/stdlib/source/test/lux/time/instant.lux
@@ -15,12 +15,12 @@
     ["[0]" io]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [math
     ["[0]" random]]
    [time
     ["[0]" duration (.only Duration)]
-    ["[0]" day (.only Day) ("[1]#[0]" enum)]]]]
+    ["[0]" day (.only Day) (.open: "[1]#[0]" enum)]]]]
  [\\library
   ["[0]" /]])
 
diff --git a/stdlib/source/test/lux/time/month.lux b/stdlib/source/test/lux/time/month.lux
index 61172c7be..b1950994b 100644
--- a/stdlib/source/test/lux/time/month.lux
+++ b/stdlib/source/test/lux/time/month.lux
@@ -12,12 +12,12 @@
      ["$[0]" enum]
      ["$[0]" codec]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]]
    [data
     [collection
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/time/year.lux b/stdlib/source/test/lux/time/year.lux
index d96fb4539..f80e03838 100644
--- a/stdlib/source/test/lux/time/year.lux
+++ b/stdlib/source/test/lux/time/year.lux
@@ -12,7 +12,7 @@
     ["[0]" try]
     ["[0]" exception]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [text
      ["%" format (.only format)]]]
    [math
diff --git a/stdlib/source/test/lux/tool/compiler/arity.lux b/stdlib/source/test/lux/tool/compiler/arity.lux
index cba1ec670..7ba4457d0 100644
--- a/stdlib/source/test/lux/tool/compiler/arity.lux
+++ b/stdlib/source/test/lux/tool/compiler/arity.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux
index 3ee106194..a1f45b42d 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux
@@ -14,14 +14,14 @@
     ["[0]" try]
     ["[0]" exception (.only exception:)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]]]
    [macro
     ["[0]" template]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["f" frac]]]
    [meta
@@ -45,7 +45,7 @@
      ["[1][0]" symbol]
      ["[0]" location
       ["[2][1]" /]
-      ["[1]" \\library ("[1]#[0]" equivalence)]]]]]]
+      ["[1]" \\library (.open: "[1]#[0]" equivalence)]]]]]]
  [\\library
   ["[0]" / (.only)
    [//
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux
index 4167b14b8..6b10cb6ea 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux
@@ -8,11 +8,11 @@
      ["$[0]" equivalence]
      ["$[0]" hash]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]]]
  [\\library
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux
index 0b8e456e7..362d94927 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux
@@ -9,23 +9,23 @@
      ["$[0]" equivalence]]]
    [control
     ["[0]" pipe]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only Exception)]]
    [data
     ["[0]" product]
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format]]
     [collection
      ["[0]" set]
      ["[0]" dictionary]
-     ["[0]" list ("[1]#[0]" functor mix)]]]
+     ["[0]" list (.open: "[1]#[0]" functor mix)]]]
    [macro
     ["^" pattern]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
-     ["n" nat ("[1]#[0]" interval)]
+     ["n" nat (.open: "[1]#[0]" interval)]
      ["i" int]
      ["r" rev]
      ["f" frac]]]]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux
index 1f73e45e7..f7acc50f8 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux
@@ -5,19 +5,19 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only Exception)]]
    [data
     ["[0]" product]
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     ["[0]" text]
     [collection
-     ["[0]" list ("[1]#[0]" monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monad)]]]
    [macro
     ["[0]" code]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]
    [meta
@@ -25,7 +25,7 @@
      ["$[1]" \\test]]
     ["[0]" configuration
      ["$[1]" \\test]]]
-   ["[0]" type ("[1]#[0]" equivalence)
+   ["[0]" type (.open: "[1]#[0]" equivalence)
     ["[0]" check (.only Check)]]]]
  [\\library
   ["[0]" / (.only)
@@ -42,7 +42,7 @@
        ["[1]/[0]" analysis
         ["[1]" lux]]]]
      [///
-      ["[2][0]" phase ("[1]#[0]" monad)]
+      ["[2][0]" phase (.open: "[1]#[0]" monad)]
       [meta
        ["[0]" archive]]]]]]])
 
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux
index 832684b48..684873614 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux
@@ -8,18 +8,18 @@
      ["$[0]" equivalence]]]
    [control
     ["[0]" pipe]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
-     ["[0]" list ("[1]#[0]" monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monad)]]]
    [macro
-    ["[0]" code ("[1]#[0]" equivalence)]]
+    ["[0]" code (.open: "[1]#[0]" equivalence)]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]
    ["[0]" meta (.only)
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux
index 1093d5917..ef24e378b 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux
@@ -6,11 +6,11 @@
     ["[0]" monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]
      ["[0]" set]]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux
index 38be6c002..b78881b03 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux
@@ -7,10 +7,10 @@
     [\\specification
      ["$[0]" equivalence]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["f" frac]]]]]
  [\\library
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux
index e2c440224..8a4730a35 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux
@@ -6,8 +6,8 @@
     [monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]]
    [data
     ["[0]" product]
@@ -26,7 +26,7 @@
      [phase
       ["[1][0]" extension]]
      [///
-      ["[1][0]" phase ("[1]#[0]" monad)]
+      ["[1][0]" phase (.open: "[1]#[0]" monad)]
       [reference
        ["[1][0]" variable (.only Register Variable)]]]]]]]
  ["$[0]" //
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux
index 223b22cca..a918dc13c 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux
@@ -7,10 +7,10 @@
     [\\specification
      ["$[0]" equivalence]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["f" frac]]]]]
  [\\library
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux
index 4a2f18b51..5b2c340dc 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux
@@ -6,7 +6,7 @@
     [monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" try ("[1]#[0]" functor)]]
+    ["[0]" try (.open: "[1]#[0]" functor)]]
    [data
     ["[0]" product]]
    [math
@@ -14,7 +14,7 @@
    [meta
     ["[0]" configuration
      ["$[1]" \\test]]]
-   ["[0]" type ("[1]#[0]" equivalence)
+   ["[0]" type (.open: "[1]#[0]" equivalence)
     ["[0]" check]]]]
  [\\library
   ["[0]" / (.only)
@@ -24,7 +24,7 @@
      [phase
       ["[2][0]" extension]]
      [///
-      ["[2][0]" phase ("[1]#[0]" functor)]]]]]])
+      ["[2][0]" phase (.open: "[1]#[0]" functor)]]]]]])
 
 (def: .public random_state
   (Random Lux)
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux
index 87ca59d95..67c097440 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux
@@ -18,7 +18,7 @@
     ["[0]" random]
     [number
      ["n" nat]]]
-   ["[0]" type ("[1]#[0]" equivalence)
+   ["[0]" type (.open: "[1]#[0]" equivalence)
     ["[0]" check]]]]
  [\\library
   ["[0]" / (.only)
@@ -36,7 +36,7 @@
       ["[1][0]" type (.only)
        ["$[1]" \\test]]]
      [///
-      ["[0]" phase ("[1]#[0]" monad)]
+      ["[0]" phase (.open: "[1]#[0]" monad)]
       [meta
        ["[0]" archive]]]]]]]
  ["[0]" /
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux
index 2c2367a0c..f69c47c4c 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux
@@ -5,7 +5,7 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception]]
    [data
     ["[0]" product]
@@ -15,7 +15,7 @@
     ["[0]" code]]
    [math
     ["[0]" random]]
-   ["[0]" type ("[1]#[0]" equivalence)
+   ["[0]" type (.open: "[1]#[0]" equivalence)
     ["[0]" check]]]]
  [\\library
   ["[0]" / (.only)
@@ -36,7 +36,7 @@
        ["[2][0]" inference
         ["$[1]" \\test]]]
       [///
-       ["[1][0]" phase ("[1]#[0]" monad)]
+       ["[1][0]" phase (.open: "[1]#[0]" monad)]
        [meta
         ["[0]" archive]]]]]]]])
 
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux
index 2db4901b8..669d747ff 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux
@@ -6,22 +6,22 @@
     [monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try (.only Try) ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only Exception)]]
    [data
     ["[0]" product]
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     ["[0]" text (.only)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" monad monoid)]
+     ["[0]" list (.open: "[1]#[0]" monad monoid)]
      ["[0]" set]]]
    [macro
     ["^" pattern]
     ["[0]" code]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]
      ["f" frac]]]
@@ -30,7 +30,7 @@
      ["$[1]" \\test]]
     ["[0]" configuration
      ["$[1]" \\test]]]
-   ["[0]" type ("[1]#[0]" equivalence)
+   ["[0]" type (.open: "[1]#[0]" equivalence)
     ["[0]" check]]]]
  [\\library
   ["[0]" / (.only)
@@ -48,7 +48,7 @@
        ["[2][0]" complex]
        ["[2][0]" scope]]
       [///
-       ["[1][0]" phase ("[1]#[0]" monad)]
+       ["[1][0]" phase (.open: "[1]#[0]" monad)]
        [meta
         ["[0]" archive]]]]]]]])
 
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux
index 423a541aa..90730f325 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux
@@ -6,7 +6,7 @@
     [monad (.only do)]]
    [control
     ["[0]" function]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]]
    [data
     ["[0]" product]
@@ -23,7 +23,7 @@
    [meta
     ["[0]" symbol
      ["$[1]" \\test]]]
-   ["[0]" type ("[1]#[0]" equivalence)
+   ["[0]" type (.open: "[1]#[0]" equivalence)
     ["$[1]" \\test]
     ["[0]" check]]]]
  [\\library
@@ -43,7 +43,7 @@
        ["[2][0]" inference
         ["$[1]" \\test]]]
       [///
-       ["[1][0]" phase ("[1]#[0]" monad)]
+       ["[1][0]" phase (.open: "[1]#[0]" monad)]
        [meta
         ["[0]" archive]]]]]]]])
 
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux
index a6ec3d851..9f09dba69 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux
@@ -6,14 +6,14 @@
     [monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]]
    [data
     ["[0]" product]
     ["[0]" text]]
    [math
     ["[0]" random]]
-   ["[0]" type ("[1]#[0]" equivalence)
+   ["[0]" type (.open: "[1]#[0]" equivalence)
     ["$[1]" \\test]]]]
  [\\library
   ["[0]" / (.only)
@@ -27,7 +27,7 @@
        ["[2][0]" type (.only)
         ["$[1]" \\test]]]
       [///
-       ["[1][0]" phase ("[1]#[0]" monad)]]]]]]])
+       ["[1][0]" phase (.open: "[1]#[0]" monad)]]]]]]])
 
 (def: .public test
   Test
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux
index 6796d5da7..66d8d5833 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux
@@ -2,7 +2,7 @@
  [library
   [lux (.except)
    ["_" test (.only Test)]
-   ["[0]" type ("[1]#[0]" equivalence)]
+   ["[0]" type (.open: "[1]#[0]" equivalence)]
    [abstract
     [monad (.only do)]]
    [control
@@ -24,7 +24,7 @@
       ["[2][0]" type]
       ["[2][0]" module]]
      [///
-      ["[1][0]" phase ("[1]#[0]" functor)]]]]]])
+      ["[1][0]" phase (.open: "[1]#[0]" functor)]]]]]])
 
 (def: (analysis state module type it ?)
   (-> Lux Text Type (Operation Analysis) (-> Analysis Bit) Bit)
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux
index c4417535c..05ddfaaff 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux
@@ -12,12 +12,12 @@
     ["[0]" try]
     ["[0]" exception]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
      ["[0]" dictionary]
-     ["[0]" list ("[1]#[0]" mix)]]]
+     ["[0]" list (.open: "[1]#[0]" mix)]]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
index 7159422cc..c7d2ba84e 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
@@ -14,7 +14,7 @@
     ["[0]" atom]]]
   [data
    ["[0]" product]]
-  ["[0]" type ("[1]#[0]" equivalence)]
+  ["[0]" type (.open: "[1]#[0]" equivalence)]
   [macro
    ["[0]" code]]
   [meta
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux
index c885819a5..351098c03 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux
@@ -6,7 +6,7 @@
    ["[0]" monad (.only do)]]
   [control
    ["[0]" pipe]
-   ["[0]" try ("[1]#[0]" functor)]]
+   ["[0]" try (.open: "[1]#[0]" functor)]]
   [data
    ["[0]" sum]
    ["[0]" text (.only)
@@ -17,7 +17,7 @@
     ["[0]" rev]
     ["[0]" frac]]
    [collection
-    ["[0]" list ("[1]#[0]" functor mix monoid)]
+    ["[0]" list (.open: "[1]#[0]" functor mix monoid)]
     ["[0]" set]]]
   [math
    ["[0]" random (.only Random)]]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux
index fb46bc028..8ab54be6f 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux
@@ -12,7 +12,7 @@
    [number
     ["n" nat]]
    [collection
-    ["[0]" list ("[1]#[0]" functor mix monoid)]
+    ["[0]" list (.open: "[1]#[0]" functor mix monoid)]
     ["[0]" dictionary (.only Dictionary)]
     ["[0]" set]]]
   [macro
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
index 4d0ae78d3..96c5116be 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
@@ -10,9 +10,9 @@
    [number
     ["n" nat]]
    [collection
-    ["[0]" list ("[1]#[0]" functor)]]]
+    ["[0]" list (.open: "[1]#[0]" functor)]]]
   [math
-   ["[0]" random (.only Random) ("[1]#[0]" monad)]]]
+   ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]
  [\\
   ["[0]" /
    [////
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux
index fca41d4c5..3e6cdda9c 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux
@@ -10,7 +10,7 @@
     ["n" nat]]
    [collection
     ["[0]" list]]]
-  ["r" math/random (.only Random) ("[1]#[0]" monad)]
+  ["r" math/random (.only Random) (.open: "[1]#[0]" monad)]
   ["_" test (.only Test)]
   [meta
    ["[0]" symbol]]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux
index d2d62f1db..954818c48 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux
@@ -10,7 +10,7 @@
    ["[0]" pipe]
    ["[0]" try]]
   [data
-   ["[0]" bit ("[1]#[0]" equivalence)]
+   ["[0]" bit (.open: "[1]#[0]" equivalence)]
    ["[0]" product]
    [number
     ["n" nat]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
index c683c8bb8..006790ba4 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
@@ -14,7 +14,7 @@
    [number
     ["n" nat]]
    [collection
-    ["[0]" list ("[1]#[0]" functor mix)]
+    ["[0]" list (.open: "[1]#[0]" functor mix)]
     ["[0]" dictionary (.only Dictionary)]]]
   [macro
    ["^" pattern]]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux b/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux
index 7719130c8..7e92f65ae 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux
@@ -5,7 +5,7 @@
    ["%" text/format (.only format)]
    [number
     ["n" nat]]]
-  ["r" math/random (.only Random) ("[1]#[0]" monad)]
+  ["r" math/random (.only Random) (.open: "[1]#[0]" monad)]
   ["_" test (.only Test)]
   [control
    ["[0]" try]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux
index 929b99b71..fec861dfd 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux
@@ -8,8 +8,8 @@
      ["$[0]" equivalence]
      ["$[0]" hash]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]]]]
  [\\library
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux
index 20b38598b..61080fd2c 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux
@@ -8,8 +8,8 @@
      ["$[0]" equivalence]
      ["$[0]" hash]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]]]]
  [\\library
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux
index c8135b2ad..cd422dccc 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux
@@ -8,8 +8,8 @@
      ["$[0]" equivalence]
      ["$[0]" hash]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive.lux b/stdlib/source/test/lux/tool/compiler/meta/archive.lux
index 9c013079f..359446987 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive.lux
@@ -13,7 +13,7 @@
      ["%" format (.only format)]]
     [collection
      ["[0]" list]
-     ["[0]" set ("[1]#[0]" equivalence)]
+     ["[0]" set (.open: "[1]#[0]" equivalence)]
      ["[0]" sequence]]]
    [math
     ["[0]" random (.only Random)]
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux
index 87ce44514..2f8086595 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux
@@ -6,7 +6,7 @@
     [\\specification
      ["$[0]" equivalence]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
  [\\library
   ["[0]" /]])
 
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux
index 9bf3509c5..b62b50e3c 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux
@@ -7,15 +7,15 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" binary]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [format
      ["[0]" binary]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
  [\\library
   ["[0]" /]])
 
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux
index e67f4e18e..ce5dd5566 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux
@@ -6,7 +6,7 @@
     [monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]
     [parser
      ["<[0]>" binary]]]
@@ -20,7 +20,7 @@
  [\\library
   ["[0]" / (.only)
    [///
-    ["[1][0]" signature ("[1]#[0]" equivalence)]
+    ["[1][0]" signature (.open: "[1]#[0]" equivalence)]
     ["[1][0]" key]]]]
  ["[0]" ///
   ["[1][0]" signature]])
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux
index f441916d2..7305277cb 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux
@@ -5,8 +5,8 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" binary]]]
    [data
@@ -15,7 +15,7 @@
     [collection
      ["[0]" sequence (.only Sequence)]
      ["[0]" set (.only Set)]
-     ["[0]" list ("[1]#[0]" mix functor)]]
+     ["[0]" list (.open: "[1]#[0]" mix functor)]]
     [format
      ["[0]" binary]]]
    [math
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux
index b54e7cc63..23a2d62c9 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux
@@ -7,12 +7,12 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [parser
      ["<[0]>" binary]]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [format
      ["[0]F" binary]]]
    [math
diff --git a/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux b/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux
index 1aaa9bfae..3d42ef1e1 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux
@@ -5,11 +5,11 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [concurrency
      ["[0]" async]]]
    [data
-    ["[0]" binary ("[1]#[0]" equivalence)]
+    ["[0]" binary (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" sequence]]]
    [math
diff --git a/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux b/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux
index 4b31a3c36..de5344cf1 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux
@@ -7,9 +7,9 @@
    [control
     ["[0]" try]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
    [data
-    ["[0]" binary ("[1]#[0]" equivalence)
+    ["[0]" binary (.open: "[1]#[0]" equivalence)
      ["$[1]" \\test]]]
    [math
     ["[0]" random (.only Random)]
diff --git a/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux b/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux
index ea51f0f9b..8091e33c8 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux
@@ -8,7 +8,7 @@
     ["[0]" try]
     ["[0]" exception]
     [concurrency
-     ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+     ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
    [math
     ["[0]" random]]
    [world
diff --git a/stdlib/source/test/lux/tool/compiler/meta/cli.lux b/stdlib/source/test/lux/tool/compiler/meta/cli.lux
index a50a44fc5..6df5fc3dd 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/cli.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/cli.lux
@@ -6,20 +6,20 @@
     [monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["<>" parser (.only)
      ["<[0]>" cli]]]
    [data
     ["[0]" product]
     ["[0]" text]
     [collection
-     ["[0]" list ("[1]#[0]" monoid monad)]]]
+     ["[0]" list (.open: "[1]#[0]" monoid monad)]]]
    [math
     ["[0]" random (.only Random)]
     [number
      ["n" nat]]]
    [meta
-    ["[0]" configuration ("[1]#[0]" equivalence)
+    ["[0]" configuration (.open: "[1]#[0]" equivalence)
      ["$[1]" \\test]]]]]
  [\\library
   ["[0]" / (.only)
diff --git a/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux b/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux
index 85ea91687..988227519 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux
@@ -7,7 +7,7 @@
     [\\specification
      ["$[0]" equivalence]]]
    [control
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["<>" parser
      ["<[0]>" text]]]
    [math
diff --git a/stdlib/source/test/lux/tool/compiler/meta/context.lux b/stdlib/source/test/lux/tool/compiler/meta/context.lux
index 6031daabf..46d9c6343 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/context.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/context.lux
@@ -8,7 +8,7 @@
     ["[0]" text]
     [collection
      ["[0]" set]
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     ["[0]" random (.only Random)]
     [number
diff --git a/stdlib/source/test/lux/tool/compiler/meta/export.lux b/stdlib/source/test/lux/tool/compiler/meta/export.lux
index ca92ca74c..eccebdfe0 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/export.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/export.lux
@@ -6,18 +6,18 @@
     [monad (.only do)]]
    [control
     ["[0]" pipe]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     [concurrency
      ["[0]" async]]
     [parser
      ["<[0]>" binary]]]
    [data
     ["[0]" product]
-    ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)]
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" binary (.only Binary) (.open: "[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [format
      ["[0]" tar]]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
diff --git a/stdlib/source/test/lux/tool/compiler/meta/import.lux b/stdlib/source/test/lux/tool/compiler/meta/import.lux
index 7145da568..a055d3408 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/import.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/import.lux
@@ -5,8 +5,8 @@
    [abstract
     [monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" functor)]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception]
     [concurrency
      ["[0]" async]]
@@ -14,12 +14,12 @@
      ["<[0]>" binary]]]
    [data
     ["[0]" product]
-    ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)]
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" binary (.only Binary) (.open: "[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     ["[0]" format
      ["[0]" tar (.only Tar)]
      ["[1]" binary]]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]
      [encoding
       ["[0]" utf8]]]
diff --git a/stdlib/source/test/lux/tool/compiler/phase.lux b/stdlib/source/test/lux/tool/compiler/phase.lux
index b6d7ac312..6fa17a691 100644
--- a/stdlib/source/test/lux/tool/compiler/phase.lux
+++ b/stdlib/source/test/lux/tool/compiler/phase.lux
@@ -9,10 +9,10 @@
      ["$[0]" monad]]]
    [control
     ["[0]" pipe]
-    ["[0]" try ("[1]#[0]" functor)]
+    ["[0]" try (.open: "[1]#[0]" functor)]
     ["[0]" exception (.only exception:)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
     ["[0]" random]
diff --git a/stdlib/source/test/lux/tool/compiler/reference.lux b/stdlib/source/test/lux/tool/compiler/reference.lux
index d6ef6ace8..37e61b319 100644
--- a/stdlib/source/test/lux/tool/compiler/reference.lux
+++ b/stdlib/source/test/lux/tool/compiler/reference.lux
@@ -8,14 +8,14 @@
      ["$[0]" equivalence]
      ["$[0]" hash]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format]]]
    [math
     ["[0]" random (.only Random)]
     [number
      ["n" nat]]]
    [meta
-    ["[0]" symbol ("[1]#[0]" equivalence)]]]]
+    ["[0]" symbol (.open: "[1]#[0]" equivalence)]]]]
  [\\library
   ["[0]" / (.only)
    ["[0]" variable (.only Register)]]]
diff --git a/stdlib/source/test/lux/tool/compiler/reference/variable.lux b/stdlib/source/test/lux/tool/compiler/reference/variable.lux
index 082350228..cfbd5eeaa 100644
--- a/stdlib/source/test/lux/tool/compiler/reference/variable.lux
+++ b/stdlib/source/test/lux/tool/compiler/reference/variable.lux
@@ -8,7 +8,7 @@
      ["$[0]" equivalence]
      ["$[0]" hash]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    [math
     ["[0]" random (.only Random)]]]]
  [\\library
diff --git a/stdlib/source/test/lux/tool/compiler/version.lux b/stdlib/source/test/lux/tool/compiler/version.lux
index 96cd64fa0..cd3bf39ee 100644
--- a/stdlib/source/test/lux/tool/compiler/version.lux
+++ b/stdlib/source/test/lux/tool/compiler/version.lux
@@ -5,8 +5,8 @@
    [abstract
     [monad (.only do)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
     ["[0]" random (.only Random)]
diff --git a/stdlib/source/test/lux/type.lux b/stdlib/source/test/lux/type.lux
index 0c6d1e6fa..e93535317 100644
--- a/stdlib/source/test/lux/type.lux
+++ b/stdlib/source/test/lux/type.lux
@@ -10,20 +10,20 @@
     ["[0]" pipe]
     ["[0]" maybe]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]
      ["[0]" array]]]
    [macro
     ["^" pattern]
-    ["[0]" code ("[1]#[0]" equivalence)]]
+    ["[0]" code (.open: "[1]#[0]" equivalence)]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]]]
  [\\library
-  ["[0]" / ("[1]#[0]" equivalence)]]
+  ["[0]" / (.open: "[1]#[0]" equivalence)]]
  ["[0]" /
   ["[1][0]" primitive]
   ["[1][0]" check]
diff --git a/stdlib/source/test/lux/type/check.lux b/stdlib/source/test/lux/type/check.lux
index 27c63dc0b..d8e92bebc 100644
--- a/stdlib/source/test/lux/type/check.lux
+++ b/stdlib/source/test/lux/type/check.lux
@@ -2,7 +2,7 @@
  [library
   [lux (.except type symbol)
    ["_" test (.only Test)]
-   ["[0]" type ("[1]#[0]" equivalence)]
+   ["[0]" type (.open: "[1]#[0]" equivalence)]
    [abstract
     ["[0]" monad (.only do)]
     [\\specification
@@ -15,17 +15,17 @@
     ["[0]" try]
     ["[0]" exception (.only exception:)]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     ["[0]" product]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
-     ["[0]" list ("[1]#[0]" functor monoid)]
+     ["[0]" list (.open: "[1]#[0]" functor monoid)]
      ["[0]" set]]]
    [macro
     ["^" pattern]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
     [number
      ["n" nat]]]]]
  [\\library
diff --git a/stdlib/source/test/lux/type/dynamic.lux b/stdlib/source/test/lux/type/dynamic.lux
index 3b9179d37..cb5931ff7 100644
--- a/stdlib/source/test/lux/type/dynamic.lux
+++ b/stdlib/source/test/lux/type/dynamic.lux
@@ -8,7 +8,7 @@
     ["[0]" try]
     ["[0]" exception]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
     ["[0]" random (.only Random)]
diff --git a/stdlib/source/test/lux/type/implicit.lux b/stdlib/source/test/lux/type/implicit.lux
index 4eb575a18..7a345cd53 100644
--- a/stdlib/source/test/lux/type/implicit.lux
+++ b/stdlib/source/test/lux/type/implicit.lux
@@ -9,7 +9,7 @@
     [monad (.only do)]
     ["[0]" enum]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]]]
    [math
diff --git a/stdlib/source/test/lux/type/primitive.lux b/stdlib/source/test/lux/type/primitive.lux
index bb6defdda..15b084af1 100644
--- a/stdlib/source/test/lux/type/primitive.lux
+++ b/stdlib/source/test/lux/type/primitive.lux
@@ -11,7 +11,7 @@
     [parser
      ["<[0]>" code]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
     ["[0]" code]
diff --git a/stdlib/source/test/lux/type/quotient.lux b/stdlib/source/test/lux/type/quotient.lux
index a0f2fa444..c8652e8c7 100644
--- a/stdlib/source/test/lux/type/quotient.lux
+++ b/stdlib/source/test/lux/type/quotient.lux
@@ -7,12 +7,12 @@
     [\\specification
      ["$[0]" equivalence]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
     ["[0]" random (.only Random)]
     [number
-     ["n" nat ("[1]#[0]" equivalence)]]]]]
+     ["n" nat (.open: "[1]#[0]" equivalence)]]]]]
  [\\library
   ["[0]" /]])
 
diff --git a/stdlib/source/test/lux/type/refinement.lux b/stdlib/source/test/lux/type/refinement.lux
index fbf318736..514d59e79 100644
--- a/stdlib/source/test/lux/type/refinement.lux
+++ b/stdlib/source/test/lux/type/refinement.lux
@@ -6,10 +6,10 @@
     [predicate (.only Predicate)]
     [monad (.only do)]]
    [control
-    ["[0]" maybe ("[1]#[0]" monad)]]
+    ["[0]" maybe (.open: "[1]#[0]" monad)]]
    [data
     [collection
-     ["[0]" list ("[1]#[0]" functor)]]]
+     ["[0]" list (.open: "[1]#[0]" functor)]]]
    [math
     ["[0]" random]
     [number
diff --git a/stdlib/source/test/lux/type/resource.lux b/stdlib/source/test/lux/type/resource.lux
index f49981fdd..a33c4817d 100644
--- a/stdlib/source/test/lux/type/resource.lux
+++ b/stdlib/source/test/lux/type/resource.lux
@@ -16,7 +16,7 @@
      ["<[0]>" code]]]
    [data
     ["[0]" identity (.only Identity)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    ["[0]" macro (.only)
     [syntax (.only syntax:)]
diff --git a/stdlib/source/test/lux/type/unit.lux b/stdlib/source/test/lux/type/unit.lux
index 19b2bc9c2..7ea97fc3f 100644
--- a/stdlib/source/test/lux/type/unit.lux
+++ b/stdlib/source/test/lux/type/unit.lux
@@ -18,7 +18,7 @@
     ["[0]" random (.only Random)]
     [number
      ["i" int]
-     ["[0]" ratio ("[1]#[0]" equivalence)]]]]]
+     ["[0]" ratio (.open: "[1]#[0]" equivalence)]]]]]
  [\\library
   ["[0]" /]])
 
diff --git a/stdlib/source/test/lux/world/console.lux b/stdlib/source/test/lux/world/console.lux
index 9cfe5dbc5..cb0978bda 100644
--- a/stdlib/source/test/lux/world/console.lux
+++ b/stdlib/source/test/lux/world/console.lux
@@ -9,7 +9,7 @@
     ["[0]" try (.only Try)]
     ["[0]" exception (.only exception:)]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]]
    [math
     ["[0]" random]]]]
diff --git a/stdlib/source/test/lux/world/file.lux b/stdlib/source/test/lux/world/file.lux
index 53c2c7ce9..2e06d0af5 100644
--- a/stdlib/source/test/lux/world/file.lux
+++ b/stdlib/source/test/lux/world/file.lux
@@ -12,8 +12,8 @@
      ["[0]" async (.only Async)]
      ["[0]" atom (.only Atom)]]]
    [data
-    ["[0]" binary (.only Binary) ("[1]#[0]" monoid)]
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" binary (.only Binary) (.open: "[1]#[0]" monoid)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" dictionary (.only Dictionary)]
      ["[0]" list]]]
diff --git a/stdlib/source/test/lux/world/file/watch.lux b/stdlib/source/test/lux/world/file/watch.lux
index af69350e0..9ab9e68ec 100644
--- a/stdlib/source/test/lux/world/file/watch.lux
+++ b/stdlib/source/test/lux/world/file/watch.lux
@@ -11,13 +11,13 @@
     [concurrency
      ["[0]" async (.only Async)]]]
    [data
-    ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)]
-    ["[0]" text ("[1]#[0]" equivalence)
+    ["[0]" binary (.only Binary) (.open: "[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)
      ["%" format (.only format)]]
     [collection
      ["[0]" list]]]
    [math
-    ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+    ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
  [\\library
   ["[0]" / (.only)
    ["/[1]" //]]]
diff --git a/stdlib/source/test/lux/world/input/keyboard.lux b/stdlib/source/test/lux/world/input/keyboard.lux
index f13e615a0..3ffd0edf6 100644
--- a/stdlib/source/test/lux/world/input/keyboard.lux
+++ b/stdlib/source/test/lux/world/input/keyboard.lux
@@ -7,7 +7,7 @@
    [control
     ["[0]" maybe]]
    [data
-    ["[0]" bit ("[1]#[0]" equivalence)]
+    ["[0]" bit (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]
      ["[0]" set (.only Set)]]]
diff --git a/stdlib/source/test/lux/world/net/http/client.lux b/stdlib/source/test/lux/world/net/http/client.lux
index 21cbaa354..cf5005977 100644
--- a/stdlib/source/test/lux/world/net/http/client.lux
+++ b/stdlib/source/test/lux/world/net/http/client.lux
@@ -10,7 +10,7 @@
     ["[0]" try (.only Try)]
     ["[0]" function]
     [concurrency
-     ["[0]" async ("[1]#[0]" functor)]]]
+     ["[0]" async (.open: "[1]#[0]" functor)]]]
    [data
     ["[0]" binary]
     ["[0]" product]
diff --git a/stdlib/source/test/lux/world/program.lux b/stdlib/source/test/lux/world/program.lux
index 3d7119229..390a77515 100644
--- a/stdlib/source/test/lux/world/program.lux
+++ b/stdlib/source/test/lux/world/program.lux
@@ -7,13 +7,13 @@
    [control
     ["[0]" pipe]
     ["[0]" io]
-    ["[0]" maybe ("[1]#[0]" functor)]
+    ["[0]" maybe (.open: "[1]#[0]" functor)]
     ["[0]" try]
     ["[0]" exception]
     [parser
      [environment (.only Environment)]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" dictionary]
      ["[0]" list]]]
diff --git a/stdlib/source/test/lux/world/shell.lux b/stdlib/source/test/lux/world/shell.lux
index c9960e037..c30aef45d 100644
--- a/stdlib/source/test/lux/world/shell.lux
+++ b/stdlib/source/test/lux/world/shell.lux
@@ -13,7 +13,7 @@
     [parser
      ["[0]" environment (.only Environment)]]]
    [data
-    ["[0]" text ("[1]#[0]" equivalence)]
+    ["[0]" text (.open: "[1]#[0]" equivalence)]
     [collection
      ["[0]" list]]]
    [math
author	Eduardo Julian	2022-06-04 02:28:47 -0400
committer	Eduardo Julian	2022-06-04 02:28:47 -0400
commit	56d2835d35093e2d92c5e8a4371aa322b55e037b (patch)
tree	1c7949355baeae92e2f6e02f9104739ddb10ff73 /stdlib/source
parent	f2172051a91bbb2578918dc784a053a321849b63 (diff)