- we implemented the hierarchy and sort names declaration in text parser

[helm.git] / helm / software / lambda-delta / automath / aut.ml

diff --git a/helm/software/lambda-delta/automath/aut.ml b/helm/software/lambda-delta/automath/aut.ml
index 513bd4a4704cb86a0935825fe37176d5c48a21ee..00213b4b3986c9ac7bd300826330b986e5f58a59 100644 (file)
--- a/helm/software/lambda-delta/automath/aut.ml
+++ b/helm/software/lambda-delta/automath/aut.ml
@@ -18,8 +18,8 @@ type term = Sort of bool              (* sorts: true = TYPE, false = PROP *)
          | Appl of term * term       (* application: argument, function *)
          | Abst of id * term * term  (* abstraction: name, domain, scope *)
          
-type entity = Section of (bool * id) option  (* section: Some true = open, Some false = reopen, None = close last *)
-           | Context of qid option          (* context: Some = last node, None = root *)
-           | Block of id * term             (* block opener: name, domain *)
-           | Decl of id * term              (* declaration: name, domain *)
-           | Def of id * term * bool * term (* definition: name, domain, transparent?, body *)
+type command = Section of (bool * id) option  (* section: Some true = open, Some false = reopen, None = close last *)
+            | Context of qid option          (* context: Some = last node, None = root *)
+            | Block of id * term             (* block opener: name, domain *)
+            | Decl of id * term              (* declaration: name, domain *)
+            | Def of id * term * bool * term (* definition: name, domain, transparent?, body *)