| m + n = m0 * 2 ⊦ m0 < n ↔ m < n |
Used simplifier rules: lels: ⊦ ¬ m < n ↔ n ≤ m; from specification nat%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic1%fle: ⊦ m < n ∧ n ≤ n0 → m < n0; (forward) from specification nat%twoeqf-01: ⊦ m + m0 = 2 * n ∧ m < n → n < m0; (forward) from specification nat-mult%mult-a: ⊦ m0 * m * n = (m0 * m) * n; from specification nat-mult%mult-c: ⊦ m * n = n * m; from specification nat-mult%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2%c: ⊦ m + n = n + m; from specification nat-basic2%le-ls-simp: ⊦ m ≤ n → (n < m ↔ false); from specification nat%twoeqf: ⊦ m + m0 = 2 * n ∧ n < m → m0 < n; (forward) from specification nat-mult%ls-02: ⊦ m < n → ¬ n < m; from specification nat-basic1