X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Ftactics%2FautoTypes.mli;h=f1a078359c0c4e274812ee8668fb62f40a0d4c98;hb=98fa2447804cf187f88af1fbd0fa64d5666ff5f2;hp=1cf966ca0d96e7a7e56fc233e427b7037d0bf5dd;hpb=e3f6d410ebe780d1b26a0bcf982ef900a94e95a7;p=helm.git

diff --git a/components/tactics/autoTypes.mli b/components/tactics/autoTypes.mli
index 1cf966ca0..f1a078359 100644
--- a/components/tactics/autoTypes.mli
+++ b/components/tactics/autoTypes.mli
@@ -23,37 +23,13 @@
  * http://cs.unibo.it/helm/.
  *)
 
-type universe
-val empty_universe:universe
-val get_candidates: universe -> Cic.term -> Cic.term list
-val universe_of_goals: 
-  HMysql.dbd -> ProofEngineTypes.proof -> ProofEngineTypes.goal list ->
-    universe -> universe
-val universe_of_context: Cic.context -> Cic.metasenv -> universe -> universe
-val add_to_universe: Cic.term -> Cic.term -> universe -> universe
-
-type cache
-type cache_key = Cic.term
-type cache_elem = 
-  | Failed_in of int
-  | Succeded of Cic.term
-  | UnderInspection
-  | Notfound
-val cache_examine: cache -> cache_key -> cache_elem
-val cache_add_failure: cache -> cache_key -> int -> cache 
-val cache_add_success: cache -> cache_key -> Cic.term -> cache
-val cache_add_underinspection: cache -> cache_key -> int -> cache
-val cache_empty: cache
-val cache_print: Cic.context -> cache -> string
-val cache_size: cache -> int
-val cache_clean: cache -> cache
-
 type flags = {
   maxwidth: int;
   maxdepth: int;
   timeout: float;
   use_paramod: bool;
   use_only_paramod : bool;
+  dont_cache_failures: bool;
 }
 
 val default_flags : unit -> flags