| ∀ nf. nf to m0 + 1 = (nf to m0) + nf(m0) ' ⊦ nf(0) ' + ((λ n. nf(n + 1)) to m0 + 1) = (nf(0) + ((λ n. nf(n + 1)) to m0)) + nf(m0 + 1) ' |
∀ nf. nf to m0 + 1 = (nf to m0) + nf(m0) ' ⊦ (λ n. nf(n + 1)) to m0 + 1 = ((λ n. nf(n + 1)) to m0) + nf(m0 + 1) '
Used simplifier rules: ⊦ x + y = x + z ↔ y = z; (s)%a: ⊦ (x + y) + z = x + y + z; from specification list% ⊦ a + x = a ' + x; (s)