使用Coq来证明相对数字之间的差异

Question

你如何在Coq中证明：forall m n : Z, m < n -> m -n < O？非常感谢！

Answer 1

如果您只是关心证明，而不是证明，请使用omega：

Require Import Omega.

Goal forall m n : Z, (m < n)%Z -> (m - n < 0%Z)%Z.
intros. omega.
Qed.

---

如果你必须证明这是练习或家庭作业的一部分，那么如果你依赖一些现有的证据就不会太难。

例如，你可以结合这些人：

Zminus_diag_reverse
     : forall n : Z, 0%Z = (n - n)%Z

Zplus_lt_le_compat
     : forall n m p q : Z, (n < m)%Z -> (p <= q)%Z -> (n + p < m + q)%Z

肯定有不止一种方法可以做到这一点，如果你使用一些现有的引理，这不是一个非常难的目标。