Used simplifier rules: four-01: ⊦ m ≠ 2 ∧ m ≠ 1 ∧ m ≠ 0 → (m < 4 ↔ m = 3);%lels-02: ⊦ m ≠ n → (m ≤ n ↔ m < n); from specification nat