| m0 = m0 ∨ m0 ∈ nx0 → m0 < m, ∀ n. n ∈ nx0 → n < m, ∀ m. nx0 < m ↔ (∀ n. n ∈ nx0 → n < m) ⊦ m0 ' + nx0 < m |
⊦ m ' + nx < n ↔ m < n ∧ nx < n
m0 < m, ∀ n. n ∈ nx0 → n < m, ∀ m. nx0 < m ↔ (∀ n. n ∈ nx0 → n < m) ⊦ nx0 < m
Used simplifier rules: ls-rec: ⊦ m ' + nx < n ↔ m < n ∧ nx < n;% ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic%a: ⊦ (nx + nx0) + nx1 = nx + nx0 + nx1; from specification list[nat-list-set]