| # x0 < m0, ∀ m, σ. # x0 < m → ⌜x0⌝ + σ to m = ⌜x0⌝ + (σ to (m - # x0)) ∨ m = 0 ⊦ ⌜x0⌝ + σ to m0 = ⌜x0⌝ + (σ to (m0 - # x0)), m0 = 0 |
m0 = n0 + # x0 ∧ # x0 ≤ m0, # x0 < m0, ∀ m, σ. # x0 < m → ⌜x0⌝ + σ to m = ⌜x0⌝ + (σ to (m - # x0)) ∨ m = 0 ⊦ ⌜x0⌝ + σ to m0 = ⌜x0⌝ + (σ to n0), m0 = 0
Used simplifier rules: lels-03: ⊦ m < n → m ≤ n; from specification nat%n ≤ m ⊦ n0 = m - n ↔ m = n0 + n; (elim) Used terms: m0, # x0, n