diff options
Diffstat (limited to 'src/Util/Decidable.v')
-rw-r--r-- | src/Util/Decidable.v | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Util/Decidable.v b/src/Util/Decidable.v index 9ab05699a..c2094c765 100644 --- a/src/Util/Decidable.v +++ b/src/Util/Decidable.v @@ -14,7 +14,7 @@ Ltac destruct_decidable_step := end. Ltac destruct_decidable := repeat destruct_decidable_step. -Local Ltac pre_decide := +Ltac pre_decide := repeat (intros || destruct_decidable || subst @@ -22,13 +22,13 @@ Local Ltac pre_decide := || unfold Decidable in * || hnf ). -Local Ltac solve_decidable_transparent_with tac := +Ltac solve_decidable_transparent_with tac := pre_decide; try solve [ left; abstract tac | right; abstract tac | decide equality; eauto with nocore ]. -Local Ltac solve_decidable_transparent := solve_decidable_transparent_with firstorder. +Ltac solve_decidable_transparent := solve_decidable_transparent_with firstorder. Local Hint Extern 0 => solve [ solve_decidable_transparent ] : typeclass_instances. |