De-sigil-ification: suffix : [Part 4]

1 files changed, 15 insertions, 15 deletions

diff --git a/stdlib/source/program/aedifex/artifact.lux b/stdlib/source/program/aedifex/artifact.lux
index a6824828a..6b27b55a9 100644
--- a/stdlib/source/program/aedifex/artifact.lux
+++ b/stdlib/source/program/aedifex/artifact.lux
@@ -43,25 +43,25 @@
   (Equivalence Artifact)
   (at ..hash equivalence))
 
-(implementation: .public order
+(def: .public order
   (Order Artifact)
+  (implementation
+   (def: equivalence
+     ..equivalence)
 
-  (def: equivalence
-    ..equivalence)
-
-  (def: (< reference subject)
-    (<| (or (text#< (the #group reference)
-                    (the #group subject)))
-
-        (and (text#= (the #group reference)
+   (def: (< reference subject)
+     (<| (or (text#< (the #group reference)
                      (the #group subject)))
-        (or (text#< (the #name reference)
-                    (the #name subject)))
-        
-        (and (text#= (the #name reference)
+
+         (and (text#= (the #group reference)
+                      (the #group subject)))
+         (or (text#< (the #name reference)
                      (the #name subject)))
-        (text#< (the #version reference)
-                (the #version subject)))))
+         
+         (and (text#= (the #name reference)
+                      (the #name subject)))
+         (text#< (the #version reference)
+                 (the #version subject))))))
 
 (with_template [<separator> <definition>]
   [(def: <definition>