blob: 60faac8dd9bd6e15ed287bf57624192a3819286f (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
(* -*- mode: coq; coq-prog-args: ("-emacs") -*- *)
(* tests of Show output with -emacs flag to coqtop; see bug 5535 *)
Theorem nums : forall (n m : nat), n = m -> (S n) = (S m).
Proof.
intros.
induction n as [| n'].
induction m as [| m'].
Show.
Admitted.
|
