diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-03-25 19:27:44 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-03-26 12:46:20 +0100 |
| commit | 1dccf4412cf9f5903c6291e08f2001c895babfd1 (patch) | |
| tree | dc643bc580346bd4fee02d31e3f3c1acec6b855e /tactics/equality.mli | |
| parent | 1d933c489d1f9d064fd54a4487754a86a0aed506 (diff) | |
Moving some tactic code to the new engine.
Diffstat (limited to 'tactics/equality.mli')
| -rw-r--r-- | tactics/equality.mli | 10 |
1 files changed, 5 insertions, 5 deletions
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 |