From f3a39777af60c649ef799fe88c218ce1010f0a5c Mon Sep 17 00:00:00 2001 From: Pierre-Marie Pédrot Date: Tue, 21 Jun 2016 14:39:48 +0200 Subject: Optimization in the subst tactic. Do not normalize all goals beforehand. --- tactics/equality.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tactics/equality.ml b/tactics/equality.ml index 1d3239ef6..17b44fbcc 100644 --- a/tactics/equality.ml +++ b/tactics/equality.ml @@ -1730,7 +1730,7 @@ let subst_one_var dep_proof_ok x = end } let subst_gen dep_proof_ok ids = - tclTHEN Proofview.V82.nf_evar_goals (tclMAP (subst_one_var dep_proof_ok) ids) + tclMAP (subst_one_var dep_proof_ok) ids (* For every x, look for an hypothesis hyp of the form "x=rhs" or "rhs=x", rewrite it everywhere, and erase hyp and x; proceed by generalizing -- cgit v1.2.3