| ⊦ 2 * (m + 1) = n + 1 ↔ 2 * m + 1 = n |
Used simplifier rules: rsucc-01: ⊦ (m + 1) * n = m * n + n;%mult-a: ⊦ m0 * m * n = (m0 * m) * n;%mult-c: ⊦ m * n = n * m;%eq-01: ⊦ m * n + n = m * n0 + n0 ↔ n = n0;%add-num-01: n < n0 ⊦ m + (* n) = m0 + (* n0) ↔ m = m0 + (n0 - n); from specification nat%c: ⊦ m + n = n + m; from specification nat-basic2%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2