| n = n2 + m, m < n, n0 | gcd(m, n2), m ≤ n, ∀ n1, m, n0. n1 < n → m < n1 ∧ n0 | gcd(m, n1) → n0 | n1 ∧ n0 | m ⊦ n0 | n ∧ n0 | m |
n0 | gcd(m, n2), ∀ n1, m0, n0. n1 < n2 + m → m0 < n1 ∧ n0 | gcd(m0, n1) → n0 | n1 ∧ n0 | m0 ⊦ n2 = 0, n0 | n2 ∧ n0 | m
Used simplifier rules: divi-add: ⊦ m | n → (m | n + n0 ↔ m | n0);%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ m < m + n ↔ n ≠ 0; (s)% ⊦ m < n → m ≤ n; (s)