]> matita.cs.unibo.it Git - helm.git/blobdiff - components/tactics/paramodulation/indexing.mli
auto snapshot
[helm.git] / components / tactics / paramodulation / indexing.mli
index 836a267dea78fa0f57cb0d8eb883d5f9e0c96f29..ef068151ea3210aa5463b0f66b7b79f86e68aa27 100644 (file)
@@ -31,7 +31,6 @@ module Index :
       with type elt = Utils.pos * Equality.equality
       and type t = Equality_indexing.DT.PosEqSet.t
     type t = Discrimination_tree.DiscriminationTreeIndexing(PosEqSet).t
-    type key = Cic.term
   end
 
 val index : Index.t -> Equality.equality -> Index.t
@@ -80,8 +79,8 @@ val demodulation_theorem :
   'a ->
   Cic.metasenv * Cic.context * CicUniv.universe_graph ->
   Index.t ->
-  Cic.term * Index.key * Cic.metasenv ->
-  'a * (Cic.term * Index.key * Cic.metasenv)
+  Cic.term * Cic.term * Cic.metasenv ->
+  'a * (Cic.term * Cic.term * Cic.metasenv)
 val check_target:
   Cic.context ->
     Equality.equality -> string -> unit