X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Ftactics%2Funiverse.mli;h=5f9d612b5e97720705c16d122c2b01d1c027b7da;hb=806ecbdd749ecf2a1cabff52b41cf748fe022401;hp=de7c2087174b4be352a1b4dc838521c167a70af4;hpb=d030f02fa8a708cd663ffd0c5783770906b9b21a;p=helm.git

diff --git a/helm/software/components/tactics/universe.mli b/helm/software/components/tactics/universe.mli
index de7c20871..5f9d612b5 100644
--- a/helm/software/components/tactics/universe.mli
+++ b/helm/software/components/tactics/universe.mli
@@ -27,6 +27,12 @@ type universe
 
 val empty : universe
 
+
+val iter : 
+  universe ->
+  (UriManager.uri Discrimination_tree.path -> Cic.term list -> unit) ->
+  unit
+
 (* retrieves the list of term that hopefully unify *)
 val get_candidates: universe -> Cic.term -> Cic.term list
 
@@ -40,6 +46,8 @@ val keys: Cic.context -> Cic.term -> Cic.term list
 (* collapse non-indexable terms, not removing coercions *)
 val key: Cic.term -> Cic.term 
 
+val in_universe: universe -> Cic.term -> Cic.term option
+
 (* indexes the term and its unfolded both without coercions *)
 val index_term_and_unfolded_term: 
   universe -> Cic.context -> Cic.term -> Cic.term -> universe