diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-06-21 14:39:48 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-06-24 15:16:03 +0200 |
| commit | f3a39777af60c649ef799fe88c218ce1010f0a5c (patch) | |
| tree | 2e9626e2786977b9e622147e212ab675367fdbde | |
| parent | d5c3569d20253166487482dfb69716985943863c (diff) | |
Optimization in the subst tactic.
Do not normalize all goals beforehand.
| -rw-r--r-- | tactics/equality.ml | 2 |
1 files changed, 1 insertions, 1 deletions
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 |