X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_cic_content%2FnTermCicContent.mli;h=2a1d7bcc7c613dd1c07c7652d5cf15eef438a0d5;hb=5c92c318030a05c766b3f6070dbd23589cbdee04;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..2a1d7bcc7 100644 --- a/helm/software/components/ng_cic_content/nTermCicContent.mli +++ b/helm/software/components/ng_cic_content/nTermCicContent.mli @@ -82,4 +82,16 @@ 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: + #NCicCoercion.status -> metasenv:NCic.metasenv -> subst:NCic.substitution -> + int * NCic.conjecture -> + CicNotationPt.term Content.conjecture * + (id, NReference.reference) Hashtbl.t (* id -> reference *) + +val nmap_obj: + #NCicCoercion.status -> NCic.obj -> + CicNotationPt.term Content.cobj * + (id, NReference.reference) Hashtbl.t (* id -> reference *)