moved term indexing (in both discrimination and path tree forms) from paramodulation...

[helm.git] / helm / ocaml / cic / discrimination_tree.ml

diff --git a/helm/ocaml/cic/discrimination_tree.ml b/helm/ocaml/cic/discrimination_tree.ml
index fd234df98980a8c912d66fdb2d59f69044121921..6e252901631c4465917ea76042f44513378787ac 100644 (file)
--- a/helm/ocaml/cic/discrimination_tree.ml
+++ b/helm/ocaml/cic/discrimination_tree.ml
@@ -23,7 +23,7 @@
  * http://cs.unibo.it/helm/.
  *)
 
-module DiscriminationTreeIndexing =
+module DiscriminationTreeIndexing =  
   functor (A:Set.S) -> 
     struct
 
@@ -59,7 +59,6 @@ module DiscriminationTreeIndexing =
       module DiscriminationTree = Trie.Make(PSMap);;
 
       type t = A.t DiscriminationTree.t
-      type elt = A.elt
       let empty = DiscriminationTree.empty
 
 (*