1 files changed, 15 insertions, 2 deletions
diff --git a/stdlib/source/lux/lang/analysis.lux b/stdlib/source/lux/lang/analysis.lux
index 0b48f803d..324f12b3e 100644
--- a/stdlib/source/lux/lang/analysis.lux
+++ b/stdlib/source/lux/lang/analysis.lux
@@ -1,5 +1,5 @@
 (.module:
-  lux
+  [lux #- nat int deg]
   (lux [function]
        (data (coll [list "list/" Fold<List>]))))
 
@@ -46,7 +46,20 @@
   (#Apply Analysis Analysis)
   (#Variable Variable)
   (#Constant Ident)
-  (#Special (Special Text)))
+  (#Special (Special Analysis)))
+
+(do-template [<name> <type> <tag>]
+  [(def: #export <name>
+     (-> <type> Analysis)
+     (|>> <tag> #Primitive))]
+
+  [bool Bool #Bool]
+  [nat  Nat  #Nat]
+  [int  Int  #Int]
+  [deg  Deg  #Deg]
+  [frac Frac #Frac]
+  [text Text #Text]
+  )
 
 (type: #export (Variant a)
   {#lefts Nat