| ⊦ n / 2 + n / 2 = n ↔ even(n) |
2 * n / 2 = n ⊦ ∃ m. 2 * m = n
Used simplifier rules: Even: ⊦ even(n) ↔ (∃ m. m + m = n);%mult-c: ⊦ m * n = n * m; from specification nat-mult%mult-a: ⊦ m0 * m * n = (m0 * m) * n; from specification nat-mult% ⊦ (2 * m) / 2 = m; (s)%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ m + m = 2 * m; (s)