X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_cic_content%2FnTermCicContent.mli;h=bae7daee2ea9322e4cf49c072068425faa849fe5;hb=8bc5bc0e8375a85736f6a5df317d129d5efa8de4;hp=fb62365530fe9231b46db5e8bcaafb2ecc85a018;hpb=7deb0d8f534f779adb1b5813a7f159609b9cba3c;p=helm.git diff --git a/helm/software/components/ng_cic_content/nTermCicContent.mli b/helm/software/components/ng_cic_content/nTermCicContent.mli index fb6236553..bae7daee2 100644 --- a/helm/software/components/ng_cic_content/nTermCicContent.mli +++ b/helm/software/components/ng_cic_content/nTermCicContent.mli @@ -82,4 +82,15 @@ val nast_of_cic : subst:NCic.substitution -> context:NCic.context -> NCic.term -> CicNotationPt.term *) -val nmap_sequent : subst:NCic.substitution -> int * NCic.conjecture -> CicNotationPt.term Content.conjecture + +type id = string + +val nmap_sequent: + subst:NCic.substitution -> int * NCic.conjecture -> + CicNotationPt.term Content.conjecture * + (id, NReference.reference) Hashtbl.t (* id -> reference *) + +val nmap_obj: + NCic.obj -> + CicNotationPt.term Content.cobj * + (id, NReference.reference) Hashtbl.t (* id -> reference *)