m * m0 = m1 * n + 1, gcd(m, n) = 1 ⊦ n = 1, n = 0, n | dist(m * m0, 1)
Used simplifier rules: one: ⊦ 1 < m ↔ ¬(m = 0 ∨ m = 1); from specification nat-basic1