blob: d64cc6fe68d557b8eb18835ecdf3b71761f2033c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
Variables P Q : nat -> Prop.
Variable f : nat -> nat.
Goal forall (x:nat), (forall y, P y -> forall z, Q z -> y=f z -> False) -> False.
Proof.
intros.
ecase H with (3:=eq_refl).
Abort.
Goal forall (x:nat), (forall y, y=x -> False) -> False.
Proof.
intros.
unshelve ecase H with (1:=eq_refl).
Qed.
|
