X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_cic_content%2FnTermCicContent.mli;h=bae7daee2ea9322e4cf49c072068425faa849fe5;hb=ba8d987dab88c8a834c4e23508f13a397070d537;hp=6381e7f487853af26b6816ab69c3e100ffa6a06a;hpb=21d58ec6efaf1969c42eb3929475b638cdd0ce2e;p=helm.git

diff --git a/helm/software/components/ng_cic_content/nTermCicContent.mli b/helm/software/components/ng_cic_content/nTermCicContent.mli
index 6381e7f48..bae7daee2 100644
--- a/helm/software/components/ng_cic_content/nTermCicContent.mli
+++ b/helm/software/components/ng_cic_content/nTermCicContent.mli
@@ -76,5 +76,21 @@ val push: unit -> unit
 val pop: unit -> unit
 *)
 
-val nast_of_cic : subst:NCic.substitution -> NCic.term -> CicNotationPt.term
-val nmap_sequent : subst:NCic.substitution -> int * NCic.conjecture -> NCic.term Content.conjecture
+(*
+val nast_of_cic :
+ output_type:[`Pattern | `Term ] ->
+  subst:NCic.substitution -> context:NCic.context -> NCic.term ->
+   CicNotationPt.term
+*)
+
+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 *)