X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_omdoc%2Fcontent.ml;h=c3c2295ca3703370079e6145042eafafdec80484;hb=1c7fb836e2af4f2f3d18afd0396701f2094265ff;hp=2f956d7d11a7aa59a026173900808112c38cc6cc;hpb=e23bc37c0a5e552395e499e7b8cee8d610b8e4f4;p=helm.git diff --git a/helm/ocaml/cic_omdoc/content.ml b/helm/ocaml/cic_omdoc/content.ml index 2f956d7d1..c3c2295ca 100644 --- a/helm/ocaml/cic_omdoc/content.ml +++ b/helm/ocaml/cic_omdoc/content.ml @@ -121,8 +121,9 @@ and 'term conclude_item = } and 'term arg = - Aux of int + Aux of string | Premise of premise + | Lemma of lemma | Term of 'term | ArgProof of 'term proof | ArgMethod of string (* ???? *) @@ -133,6 +134,13 @@ and premise = premise_binder : string option; premise_n : int option; } + +and lemma = + { lemma_id: string; + lemma_name: string; + lemma_uri: string + } + ;; type 'term conjecture = id * int * 'term context * 'term