| m0 + 1 = i→n(i), i < 0 ⊦ ~1 = n→i(m0) + i, i = 0 |
m0 + 1 = i→n(i), i < 0 ⊦ ~1 = n→i(m0) + i, i = 0, n→i(m0 + 1) = n→i(i→n(i))
Used simplifier rules: ⊦ n→i(m + n) = n→i(m) + n→i(n); (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic% ⊦ i < 0 → n→i(i→n(i)) = ~ i; (s)% ⊦ ~ i = j ↔ i + j = 0; (s)% ⊦ (* j) = i0 + (* j0) ↔ j - j0 = i0; (s)%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%add-c: ⊦ i + j = j + i; from specification int-basic2 Used formulas: n→i(m0 + 1) = n→i(i→n(i))