blob: 9cf68796990cb4560062ee25735b5577477160d6 (
plain)
1
2
3
4
5
6
7
8
9
10
|
Require Import Psatz.
Inductive TT : Set :=
| C : nat -> TT.
Lemma lem4 : forall (n m : nat),
S m <= m -> C (S m) <> C n -> False.
Proof. firstorder. Qed.
Print Assumptions lem4.
|