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

try to speed up set_solver a little

parent c82719b9
Pipeline #250 passed with stage
......@@ -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