From 1dccf4412cf9f5903c6291e08f2001c895babfd1 Mon Sep 17 00:00:00 2001 From: Pierre-Marie Pédrot Date: Tue, 25 Mar 2014 19:27:44 +0100 Subject: Moving some tactic code to the new engine. --- tactics/equality.mli | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'tactics/equality.mli') diff --git a/tactics/equality.mli b/tactics/equality.mli index 681b366db..d5aa2d248 100644 --- a/tactics/equality.mli +++ b/tactics/equality.mli @@ -94,15 +94,15 @@ val make_iterated_tuple : env -> evar_map -> constr -> (constr * types) -> constr * constr * constr (* The family cutRewriteIn expect an equality statement *) -val cutRewriteInHyp : bool -> types -> Id.t -> tactic -val cutRewriteInConcl : bool -> constr -> tactic +val cutRewriteInHyp : bool -> types -> Id.t -> unit Proofview.tactic +val cutRewriteInConcl : bool -> constr -> unit Proofview.tactic (* The family rewriteIn expect the proof of an equality *) -val rewriteInHyp : bool -> constr -> Id.t -> tactic -val rewriteInConcl : bool -> constr -> tactic +val rewriteInHyp : bool -> constr -> Id.t -> unit Proofview.tactic +val rewriteInConcl : bool -> constr -> unit Proofview.tactic (* Expect the proof of an equality; fails with raw internal errors *) -val substClause : bool -> constr -> Id.t option -> tactic +val substClause : bool -> constr -> Id.t option -> unit Proofview.tactic val discriminable : env -> evar_map -> constr -> constr -> bool val injectable : env -> evar_map -> constr -> constr -> bool -- cgit v1.2.3