X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fdtd%2Fcic.dtd;h=47280b845aa191e8359c5ae42b109340679dfc98;hb=89262281b6e83bd2321150f81f1a0583645eb0c8;hp=a2156a522b507c96a92adf72d9f2605c99a49681;hpb=1f0d6e8932f4200a6b1956995225211df2a271a8;p=helm.git

diff --git a/helm/dtd/cic.dtd b/helm/dtd/cic.dtd
index a2156a522..47280b845 100644
--- a/helm/dtd/cic.dtd
+++ b/helm/dtd/cic.dtd
@@ -42,6 +42,9 @@
 
 <!ENTITY % sort '(Prop|Set|Type)'>
 
+<!-- CIC sequents -->
+
+<!ENTITY % sequent '((Decl|Def|Hidden)*,Goal)'>
 
 <!-- CIC objects: -->
 
@@ -74,9 +77,10 @@
           name CDATA #REQUIRED
           id   ID    #REQUIRED>
 
-<!ELEMENT Sequent ((Decl|Def)*,Goal)>
+<!ELEMENT Sequent %sequent;>
 <!ATTLIST Sequent
-          id   ID    #REQUIRED>
+          no  NMTOKEN #REQUIRED
+          id  ID      #REQUIRED>
 
 <!-- Elements used in CIC objects, which are not terms: -->
 
@@ -85,9 +89,10 @@
           name      CDATA        #REQUIRED
           inductive (true|false) #REQUIRED>
 
-<!ELEMENT Conjecture %term;>
+<!ELEMENT Conjecture %sequent;>
 <!ATTLIST Conjecture
-          no NMTOKEN #REQUIRED>
+          no NMTOKEN #REQUIRED
+          id ID      #REQUIRED>
 
 <!ELEMENT Constructor %term;>
 <!ATTLIST Constructor
@@ -95,11 +100,17 @@
 
 <!ELEMENT Decl %term;>
 <!ATTLIST Decl
-          name CDATA #REQUIRED>
+          name CDATA #IMPLIED
+          id   ID    #REQUIRED>
 
 <!ELEMENT Def %term;>
 <!ATTLIST Def
-          name CDATA #REQUIRED>
+          name CDATA #IMPLIED
+          id   ID    #REQUIRED>
+
+<!ELEMENT Hidden EMPTY>
+<!ATTLIST Hidden
+          id ID #REQUIRED>
 
 <!ELEMENT Goal %term;>
 
@@ -148,11 +159,14 @@
           id     ID     #REQUIRED
           sort   %sort; #REQUIRED>
 
-<!ELEMENT META EMPTY>
+<!-- The substitutions are ordered by increasing DeBrujin  -->
+<!-- index. An empty substitution means that that index is -->
+<!-- not accessible.                                       -->
+<!ELEMENT META (substitution*)>
 <!ATTLIST META
-          no   NMTOKEN #REQUIRED
-          id   ID      #REQUIRED
-          sort %sort;  #REQUIRED>
+          no              NMTOKEN #REQUIRED
+          id              ID      #REQUIRED
+          sort            %sort;  #REQUIRED>
 
 <!ELEMENT IMPLICIT EMPTY>
 <!ATTLIST IMPLICIT
@@ -208,6 +222,8 @@
 <!ATTLIST CofixFunction
           name     CDATA   #REQUIRED>
 
+<!ELEMENT substitution ((%term;)?)>
+
 <!-- Sintactic sugar for CIC terms and for CIC objects: -->
 
 <!ELEMENT source %term;>