blob: e9033bd732804f6968c10ad7f6694d7b0a2cb2b7 (
plain)
1
2
3
4
5
6
7
8
9
10
|
(* Test no clash names occur *)
(* see bug #2723 *)
Parameter a : forall x, {y:nat|x=y}.
Fail Definition b y : {x:nat|x=y} := a y.
Goal (forall n m, n <= m -> m <= n -> n = m) -> True.
intro H; epose proof (H _ 3) as H.
Show.
Abort.
|
