From 35c0807799717cd720ab28b35851c1a01a67445d Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 7 Sep 2021 22:50:21 -0400
Subject: De-taggification | part 4

---
 .../test/aedifex/artifact/snapshot/build.lux       | 10 ++++-----
 .../test/aedifex/artifact/snapshot/stamp.lux       | 18 ++++++++--------
 .../source/test/aedifex/artifact/snapshot/time.lux | 14 ++++++-------
 .../test/aedifex/artifact/snapshot/version.lux     | 20 +++++++++---------
 .../aedifex/artifact/snapshot/version/value.lux    | 24 +++++++++++-----------
 5 files changed, 43 insertions(+), 43 deletions(-)

(limited to 'stdlib/source/test/aedifex/artifact/snapshot')

diff --git a/stdlib/source/test/aedifex/artifact/snapshot/build.lux b/stdlib/source/test/aedifex/artifact/snapshot/build.lux
index e3e0c62cd..24f6ee539 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/build.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/build.lux
@@ -5,15 +5,15 @@
     [abstract
      [monad {"+" [do]}]
      [\\specification
-      ["$." equivalence]]]
+      ["$[0]" equivalence]]]
     [control
-     ["." try ("#\." functor)]
+     ["[0]" try ("[1]\[0]" functor)]
      [parser
-      ["<.>" xml]]]
+      ["<[0]>" xml]]]
     [math
-     ["." random {"+" [Random]}]]]]
+     ["[0]" random {"+" [Random]}]]]]
   [\\program
-   ["." /]])
+   ["[0]" /]])
 
 (def: .public random
   (Random /.Build)
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux b/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux
index 82217bd62..0ece8e264 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux
@@ -5,20 +5,20 @@
     [abstract
      [monad {"+" [do]}]
      [\\specification
-      ["$." equivalence]]]
+      ["$[0]" equivalence]]]
     [control
-     ["." try ("#\." functor)]
+     ["[0]" try ("[1]\[0]" functor)]
      [parser
-      ["<.>" xml]]]
+      ["<[0]>" xml]]]
     [math
-     ["." random {"+" [Random]}]]
+     ["[0]" random {"+" [Random]}]]
     [time
-     ["." instant]]]]
+     ["[0]" instant]]]]
   [\\program
-   ["." /]]
-  ["$." // "_"
-   ["#." time]
-   ["#." build]])
+   ["[0]" /]]
+  ["$[0]" // "_"
+   ["[1][0]" time]
+   ["[1][0]" build]])
 
 (def: .public random
   (Random /.Stamp)
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/time.lux b/stdlib/source/test/aedifex/artifact/snapshot/time.lux
index f11fe6f12..50fbbbf49 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/time.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/time.lux
@@ -5,17 +5,17 @@
     [abstract
      [monad {"+" [do]}]
      [\\specification
-      ["$." equivalence]]]
+      ["$[0]" equivalence]]]
     [control
-     ["." try ("#\." functor)]
+     ["[0]" try ("[1]\[0]" functor)]
      [parser
-      ["<.>" text]]]
+      ["<[0]>" text]]]
     [math
-     ["." random {"+" [Random]}]]]]
+     ["[0]" random {"+" [Random]}]]]]
   [\\program
-   ["." /]]
-  ["$." /// "_"
-   ["#." time]])
+   ["[0]" /]]
+  ["$[0]" /// "_"
+   ["[1][0]" time]])
 
 (def: .public random
   (Random /.Time)
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/version.lux b/stdlib/source/test/aedifex/artifact/snapshot/version.lux
index 162b05348..238a0d2a3 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/version.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/version.lux
@@ -5,20 +5,20 @@
     [abstract
      [monad {"+" [do]}]
      [\\specification
-      ["$." equivalence]]]
+      ["$[0]" equivalence]]]
     [control
-     ["." try ("#\." functor)]
+     ["[0]" try ("[1]\[0]" functor)]
      [parser
-      ["<.>" xml]]]
+      ["<[0]>" xml]]]
     [math
-     ["." random {"+" [Random]}]]]]
+     ["[0]" random {"+" [Random]}]]]]
   [\\program
-   ["." /]]
-  ["." / "_"
-   ["#." value]]
-  ["$." /// "_"
-   ["#." type]
-   ["#." time]])
+   ["[0]" /]]
+  ["[0]" / "_"
+   ["[1][0]" value]]
+  ["$[0]" /// "_"
+   ["[1][0]" type]
+   ["[1][0]" time]])
 
 (def: .public random
   (Random /.Version)
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
index e63453f84..bccd76fac 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
@@ -5,28 +5,28 @@
     [abstract
      [monad {"+" [do]}]
      [\\specification
-      ["$." equivalence]]]
+      ["$[0]" equivalence]]]
     [control
-     ["." try ("#\." functor)]
+     ["[0]" try ("[1]\[0]" functor)]
      [parser
-      ["<.>" text]]]
+      ["<[0]>" text]]]
     [data
-     ["." text ("#\." equivalence)
+     ["[0]" text ("[1]\[0]" equivalence)
       ["%" format {"+" [format]}]]]
     [math
-     ["." random {"+" [Random]} ("#\." monad)]
+     ["[0]" random {"+" [Random]} ("[1]\[0]" monad)]
      [number
       ["n" nat]
       ["i" int]]]
     [time
-     ["." instant]]]]
-  ["$." /// "_"
-   ["#." stamp]]
+     ["[0]" instant]]]]
+  ["$[0]" /// "_"
+   ["[1][0]" stamp]]
   [\\program
-   ["." /
-    ["//#" ///
-     ["#." stamp]
-     ["#." time]]]])
+   ["[0]" /
+    ["//[1]" ///
+     ["[1][0]" stamp]
+     ["[1][0]" time]]]])
 
 (def: .public random
   (Random /.Value)
-- 
cgit v1.2.3