File tree Expand file tree Collapse file tree 2 files changed +3
-5
lines changed Expand file tree Collapse file tree 2 files changed +3
-5
lines changed Original file line number Diff line number Diff line change @@ -98,7 +98,7 @@ Hint Rewrite eq_sym_eq_sym : eq_rw.
98
98
Ltac autorewrite_eq_rw :=
99
99
repeat progress (autorewrite with eq_rw;
100
100
repeat match goal with
101
- | |- context [ match ?X return _ -> _ with
101
+ | |- context [ match ?X in @eq _ _ _ return _ -> _ with
102
102
| eq_refl => _
103
103
end ] => rewrite (eq_Arr_eq X)
104
104
end ).
Original file line number Diff line number Diff line change @@ -658,10 +658,8 @@ Section hlist.
658
658
Proof .
659
659
induction ls; simpl; intros; try congruence.
660
660
{ destruct n; intuition. }
661
- { destruct n; simpl; try solve [ intuition congruence ].
662
- { unfold value. intuition congruence. }
663
- { specialize (IHls n).
664
- forward. } }
661
+ { destruct n; simpl; try solve [ unfold value; intuition congruence ].
662
+ specialize (IHls n). forward. }
665
663
Qed .
666
664
667
665
Lemma nth_error_get_hlist_nth_weaken
You can’t perform that action at this time.
0 commit comments