X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Ftactics%2Fparamodulation%2Fequality.mli;h=1a909dfc4b387c40465d5743bfc940964ba5e79c;hb=d3743c95bc18632db962f3961b9a0ab2bb9a90b2;hp=019578ccc363d53d43c7c36f5af90bc9f707af4c;hpb=5457fddfff1794566caed4a4d46f5389ac7cb8dc;p=helm.git diff --git a/components/tactics/paramodulation/equality.mli b/components/tactics/paramodulation/equality.mli index 019578ccc..1a909dfc4 100644 --- a/components/tactics/paramodulation/equality.mli +++ b/components/tactics/paramodulation/equality.mli @@ -39,6 +39,8 @@ val pp_proof: (Cic.name option) list -> goal_proof -> proof -> Subst.substitution -> int -> Cic.term -> string +val pp_proofterm: Cic.term -> string + val reset : unit -> unit val mk_equality : @@ -71,7 +73,8 @@ val build_goal_proof: UriManager.uri -> goal_proof -> proof -> Cic.term-> int list -> Cic.context -> Cic.metasenv -> Cic.term * Cic.term list -val build_proof_term : UriManager.uri -> (int * Cic.term) list -> int -> proof -> Cic.term +val build_proof_term : + UriManager.uri -> (int * Cic.term) list -> int -> proof -> Cic.term val refl_proof: UriManager.uri -> Cic.term -> Cic.term -> Cic.term (** ensures that metavariables in equality are unique *) val fix_metas_goal: int -> goal -> int * goal