显示整数上简单不等式的无痛方式
Painless way to show simple inequality over whole number
我有以下状态：
a : ℕ,
a_1 : ℕ,
nltm : of_nat a_1 + 1 < of_nat a + 1
⊢ of_nat a_1 < of_nat a
请注意 of_nat 构造 Z。
有没有一种无痛的方法可以达到目标？
这是lt_of_lt_add_right:
open int
example (a a_1 : ℕ) (nltm : of_nat a_1 + 1 < of_nat a + 1) : of_nat a_1 < of_nat a :=
lt_of_add_lt_add_right nltm
学习 Lean naming conventions 对找到这样的引理很有帮助。
我有以下状态：
a : ℕ,
a_1 : ℕ,
nltm : of_nat a_1 + 1 < of_nat a + 1
⊢ of_nat a_1 < of_nat a
请注意 of_nat 构造 Z。
有没有一种无痛的方法可以达到目标？
这是lt_of_lt_add_right:
open int
example (a a_1 : ℕ) (nltm : of_nat a_1 + 1 < of_nat a + 1) : of_nat a_1 < of_nat a :=
lt_of_add_lt_add_right nltm
学习 Lean naming conventions 对找到这样的引理很有帮助。