检查自然数的后继

Question

我想证明一个目标，我有两个假设。 您能帮我实现目标吗？非常感谢您的帮助。 Goal : (S m <? S m - (S m - 1)) = true有两个假设

m : nat
H : 1 < 1
H0 : (S  m =? 0) = false

Answer 1

1实际上不小于1。因此，我们可以证明荒谬。好东西也是，因为目标本身是不可能的。

Require Import PeanoNat.
contradict H. (* now proving ~(1 < 1) *)
(* Well, < is irreflexive: forall x, ~(x < x). *)
apply Nat.le_irrefl.