| m * m + m0 < n * n, m0 ≤ 2 * m ⊦ m < n |
m * m + m0 < n * n, n ≤ m, m0 ≤ 2 * m ⊦ n = 0
Used simplifier rules: sqzero: ⊦ m * m = 0 ↔ m = 0;%mult-a: ⊦ m0 * m * n = (m0 * m) * n;%mult-c: ⊦ m * n = n * m;%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ m < n ↔ ¬ n ≤ m; (ss)