X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Ftactics%2Fparamodulation%2Futils.mli;h=2f25415ac5ba528ecca3537e160d293c2af716bd;hb=b4da5c84ca7fa4c028ef70875aa79cc7bc279ee9;hp=c64eacfd61f3c3364df483305e51624d04e96aab;hpb=bc8187a8276f45fdf0882acbb832089a10e0d8ed;p=helm.git diff --git a/helm/software/components/tactics/paramodulation/utils.mli b/helm/software/components/tactics/paramodulation/utils.mli index c64eacfd6..2f25415ac 100644 --- a/helm/software/components/tactics/paramodulation/utils.mli +++ b/helm/software/components/tactics/paramodulation/utils.mli @@ -63,6 +63,7 @@ val names_of_context: Cic.context -> (Cic.name option) list module TermMap: Map.S with type key = Cic.term val symbols_of_term: Cic.term -> int TermMap.t +val set_goal_symbols: Cic.term -> unit val lpo: Cic.term -> Cic.term -> comparison @@ -75,10 +76,6 @@ val compare_terms: (Cic.term -> Cic.term -> comparison) ref val guarded_simpl: ?debug:bool -> Cic.context -> Cic.term -> Cic.term -type equality_sign = Negative | Positive - -val string_of_sign: equality_sign -> string - type pos = Left | Right val string_of_pos: pos -> string