| m0 < n, ∀ n, x. m0 ≤ n → lastn(m0, lastn(n, x)) = lastn(m0, x) ⊦ lastn(m0 + 1, lastn(n, x)) = lastn(m0, x.butlast) + x.last ' |
⊦ n ≠ 0 → lastn(n, x) = lastn(n -1, x.butlast) + x.last
m0 < n, ∀ n, x. m0 ≤ n → lastn(m0, lastn(n, x)) = lastn(m0, x) ⊦ lastn((m0 + 1)-1, lastn(n, x).butlast) + lastn(n, x).last = lastn(m0, x.butlast) + x.last ', m0 + 1 = 0
Used simplifier rules: ⊦ m + 1 ≠ 0; (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic Used terms: lastn(n, x), m0 + 1