| m < gcd(m, n1), ∀ n0, m0. n0 < n1 + m → m0 < n0 → n0 = 0 ∨ m0 = 0 ∨ ¬ m0 < gcd(m0, n0) ∧ ¬ n0 < gcd(m0, n0) ⊦ n1 + m = 0, m = 0, n1 = 0, gcd(m, n1) = 0 |
m < gcd(m, n1), ∀ n0, m0. n0 < n1 + m → m0 < n0 → n0 = 0 ∨ m0 = 0 ∨ ¬ m0 < gcd(m0, n0) ∧ ¬ n0 < gcd(m0, n0) ⊦ m < n1, n1 + m = 0, m = 0, n1 = 0, gcd(m, n1) = 0
Used simplifier rules: lels: ⊦ ¬ m < n ↔ n ≤ m; from specification nat%le-add: ⊦ m + m0 ≤ m ↔ m0 = 0; from specification nat%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2%c: ⊦ m + n = n + m; from specification nat-basic2 Used terms: n1, m