aboutsummaryrefslogtreecommitdiff
path: root/test-suite/bugs/opened/3794.v
blob: 511a92b2aff06c837712d0d081769a16d0f38fa4 (plain)
1
2
3
4
5
6
7
Hint Extern 10 ((?X = ?Y) -> False) => intros; discriminate.
Hint Unfold not : core.

Goal true<>false.
Set Typeclasses Debug.
typeclasses eauto with core.
Qed.