diff options
| author |  Anton Trunov <anton.a.trunov@gmail.com> | 2018-03-04 18:14:21 +0100 |
|---|---|---|
| committer | Anton Trunov <anton.a.trunov@gmail.com> | 2018-03-04 19:24:19 +0100 |
| commit | d147b10a7fede25214416165b6a6ac10b6b827de (patch) | |
| tree | 0f987d97c061dbecf0d476f7ca2116885b3964a1 /test-suite | |
| parent | 5233abd2f876af6b9e5b705b2ab4df8cdb50b12e (diff) | |
ssr: add Prenex Implicits for Some_inj to use it as a view
Diffstat (limited to 'test-suite')
| -rw-r--r-- | test-suite/bugs/closed/6910.v | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/6910.v b/test-suite/bugs/closed/6910.v new file mode 100644 index 000000000..5167a5364 --- /dev/null +++ b/test-suite/bugs/closed/6910.v @@ -0,0 +1,5 @@ +From Coq Require Import ssreflect ssrfun. + +(* We should be able to use Some_inj as a view: *) +Lemma foo (x y : nat) : Some x = Some y -> x = y. +Proof. by move/Some_inj. Qed. |