m + n = m0 * 2 + 1 ⊦ m0 < n ↔ m < n
Used simplifier rules: twols-02: ⊦ m ≠ 0 → (m < 2 ↔ m = 1); from specification nat-basic1