ocaml 3.09 transition

[helm.git] / helm / dtd / cicobject.dtd

diff --git a/helm/dtd/cicobject.dtd b/helm/dtd/cicobject.dtd
index a6b6155b1f156db72c17bb8e24f67c4a88183b34..10f001df645f8e0ea6bc1c6e585a6ad3f15f96c5 100644 (file)
--- a/helm/dtd/cicobject.dtd
+++ b/helm/dtd/cicobject.dtd
@@ -62,11 +62,15 @@
 <!ATTLIST InductiveDefinition
           xmlns:m    CDATA      #REQUIRED>
 
-<!ELEMENT Variable (type)>
+<!ELEMENT Variable (body?,type)>
 <!ATTLIST Variable
           name CDATA #REQUIRED
           xmlns:m    CDATA      #REQUIRED>
 
+<!ELEMENT Sequent ((Decl|Def)*,Goal)>
+<!ATTLIST Sequent
+          id   ID    #REQUIRED>
+
 <!-- Elements used in CIC objects, which are not terms: -->
 
 <!ELEMENT InductiveType (arity,Constructor*)>
@@ -86,7 +90,19 @@
 <!ATTLIST Param
           name CDATA #REQUIRED>
 
-<!ELEMENT Params (#PCDATA)*>
+<!ELEMENT Params (param)*>
+
+<!ELEMENT param %term;>
+
+<!ELEMENT Decl %term;>
+<!ATTLIST Decl
+          name CDATA #REQUIRED>
+
+<!ELEMENT Def %term;>
+<!ATTLIST Def
+          name CDATA #REQUIRED>
+
+<!ELEMENT Goal %term;>
 
 <!-- Sintactic sugar for CIC objects: -->