| n = m2 + 1, ∀ n, m. dropn(n, lax0.to-adr(m)) = dropn(n, lax0).to-adr(m) ⊦ dropn(m2, lax0.to-adr(m)) = dropn(n, @(m0, m1) ' + lax0).to-adr(m), n = 0 |
∀ n, m. dropn(n, lax0.to-adr(m)) = dropn(n, lax0).to-adr(m) ⊦ dropn(m2, lax0.to-adr(m)) = dropn(m2 + 1, @(m0, m1) ' + lax0).to-adr(m)
Used simplifier rules: c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ m + 1 ≠ 0; (s)