]> matita.cs.unibo.it Git - helm.git/blobdiff - components/tactics/autoTypes.mli
moved to pkg-ocaml-maint
[helm.git] / components / tactics / autoTypes.mli
index 5014f41ce10d6eb75c60a6b2ec1a768cf5120ae0..ab05564ff3c2099819feab9d3e971d6d5d41d8a9 100644 (file)
 
 type flags = {
   maxwidth: int;
+  maxsize: int;
   maxdepth: int;
+  maxgoalsizefactor : int;
   timeout: float;
   use_library: bool;
   use_paramod: bool;
   use_only_paramod : bool;
   close_more : bool;
-  dont_cache_failures: bool
+  dont_cache_failures: bool;
+  do_types: bool;
 }
 
 val default_flags : unit -> flags
@@ -39,8 +42,8 @@ val default_flags : unit -> flags
 (* (metasenv, subst, (metano,depth)list *)
 type sort = P | T;;
 type and_elem =  
-  Cic.metasenv * Cic.substitution * (ProofEngineTypes.goal * int * sort) list
+  (int * Cic.term * Cic.term) * Cic.metasenv * Cic.substitution * (ProofEngineTypes.goal * int * sort) list
 type auto_result = 
   | Fail of string
-  | Success of Cic.metasenv * Cic.substitution * and_elem list
+  | Success of (int * Cic.term * Cic.term) * Cic.metasenv * Cic.substitution * and_elem list