X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Ftactics%2FautoTypes.mli;h=745438462c7bad0effb096c8edae1f4f7639df78;hb=HEAD;hp=f1a078359c0c4e274812ee8668fb62f40a0d4c98;hpb=2eaee49a7ff3ed74598a0db84ce4dbc5bca92380;p=helm.git diff --git a/helm/software/components/tactics/autoTypes.mli b/helm/software/components/tactics/autoTypes.mli index f1a078359..745438462 100644 --- a/helm/software/components/tactics/autoTypes.mli +++ b/helm/software/components/tactics/autoTypes.mli @@ -25,11 +25,18 @@ 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; + do_types: bool; + skip_trie_filtering: bool; + skip_context : bool; } val default_flags : unit -> flags @@ -37,8 +44,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