| n + m ≤ m0, m0 ≤ 1 + # x0, n + m ≤ 1 + # x0, ∀ n0, m0, n, m. n0 + m0 ≤ # x0 ∧ n + m ≤ m0 → firstn(m, restn(n, firstn(m0, restn(n0, x0)))) = firstn(m, restn(n0 + n, x0)) ⊦ firstn(m, restn(n, a ' + firstn(m0 - 1, x0))) = firstn(m, restn(n, a ' + x0)), m0 = 0 |
m0 = m1 + 1, n + m ≤ 1 + # x0, m0 ≤ 1 + # x0, n + m ≤ m0, ∀ n0, m0, n, m. n0 + m0 ≤ # x0 ∧ n + m ≤ m0 → firstn(m, restn(n, firstn(m0, restn(n0, x0)))) = firstn(m, restn(n0 + n, x0)) ⊦ firstn(m, restn(n, a ' + firstn(m1, x0))) = firstn(m, restn(n, a ' + x0)), m0 = 0
Used simplifier rules: n ≠ 0 ⊦ m = n - 1 ↔ n = m + 1; (elim) Used terms: m0, m1