Commit 3e1c355f authored by Ralf Jung's avatar Ralf Jung
Browse files

try to speed up set_solver a little

parent c82719b9
......@@ -265,7 +265,7 @@ Ltac set_unfold :=
[set_solver] already. We use the [naive_solver] tactic as a substitute.
This tactic either fails or proves the goal. *)
Tactic Notation "set_solver" "by" tactic3(tac) :=
try done;
try (reflexivity || eassumption);
intros; setoid_subst;
set_unfold;
intros; setoid_subst;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment