| n = m0 * m + n0, n0 = 0, n0 < m, prime(m), m * m ≤ n, ∀ m. 2 ≤ m ∧ m * m ≤ n → n % m ≠ 0 ⊦ m = 0, n = 1, n = 0, prime(n) |
prime(m), m ≤ m0, ∀ m1. 2 ≤ m1 ∧ m1 * m1 ≤ m0 * m → (m0 * m) % m1 ≠ 0 ⊦ m0 * m = 1, m = 0, m0 = 0, m0 = 1
Used simplifier rules: mult-02: ⊦ prime(m) → (prime(m * n) ↔ n = 1);% ⊦ m0 ≠ 0 → (m0 * m ≤ m0 * n ↔ m ≤ n); (s)% ⊦ 0 < n ↔ n ≠ 0; (s)% ⊦ m < n → n ≠ 0; (s)%mult-c: ⊦ m * n = n * m; from specification nat-mult%mult-a: ⊦ m0 * m * n = (m0 * m) * n; from specification nat-mult% ⊦ m0 * m = 0 ↔ m0 = 0 ∨ m = 0; (ws)%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ 0 + m = m; (s)