Skip to content
Snippets Groups Projects
Commit 4c68a044 authored by Ralf Jung's avatar Ralf Jung
Browse files

try to speed up set_solver a little

parent e5fe972d
No related branches found
No related tags found
No related merge requests found
......@@ -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;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment