将 a <= b 转换为 suc a <= suc b答案

【问题标题】：Turning a <= b to suc a <= suc b将 a <= b 转换为 suc a <= suc b
【发布时间】：2015-06-06 21:07:42
【问题描述】：

这是此处发布的问题的扩展：

我有

trans₁ : ∀ {a b c} → suc a ≤ suc b → suc b ≤ c → suc a ≤ c

对于trans₁的定义，但这需要我将下面的widen定义更改为：

widen : ∀{min max newMin newMax}
      → BST min max
      → suc newMin ≤ suc min
      → max ≤ newMax
      → BST newMin newMax

如何将a <= b 更改为suc a <= suc b？这将允许我将trans₁ 的定义更改为：

trans₁ : ∀ {a b c} → a ≤ b → suc b ≤ c → suc a ≤ c

非常感谢任何帮助。

【问题讨论】：

【解决方案1】：

查看小于或等于关系的 s

【讨论】：