| ⊦ 2 * n ≤ 2 * m + 1 ↔ n ≤ m |
2 * n ≤ 2 * m + 1 ⊦ n ≤ m
Used simplifier rules: modls: ⊦ n0 < m0 → (m0 * m + n0 < m0 * n ↔ m < n);%mult-a: ⊦ m0 * m * n = (m0 * m) * n;%mult-c: ⊦ m * n = n * m;%lels-01: ⊦ ¬ m ≤ n ↔ n < m; from specification nat%le-ls-simp: ⊦ m ≤ n → (n < m ↔ false); from specification nat%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2%c: ⊦ m + n = n + m; from specification nat-basic2