X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Ftactics%2Fparamodulation%2Futils.mli;h=9dc6501d796d296d4797d67704b924f5778da45a;hb=fb3ae649cf1079117166318809ac5a2dba987dcd;hp=ce14d480f0735a426035191df6d833385258b181;hpb=7f2444c2670cadafddd8785b687ef312158376b0;p=helm.git diff --git a/components/tactics/paramodulation/utils.mli b/components/tactics/paramodulation/utils.mli index ce14d480f..9dc6501d7 100644 --- a/components/tactics/paramodulation/utils.mli +++ b/components/tactics/paramodulation/utils.mli @@ -24,6 +24,12 @@ *) (* (weight of constants, [(meta, weight_of_meta)]) *) + +val time : bool +val debug : bool +val debug_metas: bool +val debug_res: bool + type weight = int * (int * int) list;; type comparison = Lt | Le | Eq | Ge | Gt | Incomparable;; @@ -34,7 +40,9 @@ val print_subst: ?prefix:string -> Cic.substitution -> string val string_of_weight: weight -> string -val weight_of_term: ?consider_metas:bool -> Cic.term -> weight +val weight_of_term: + ?consider_metas:bool -> + ?count_metas_occurrences:bool-> Cic.term -> weight val normalize_weight: int -> weight -> weight