| ordered≤(a0 ' + y + z), ∀ b. b ∈ z → a < b, ∀ b. b ∈ y → b < a ∨ b = a ⊦ a0 ' + y + z = (a0 ' + y) + z ∧ (∀ b. b ∈ a0 ' + y → b < a ∨ b = a) ∧ (∀ b. b ∈ z → a < b), ∃ y0, z0. a0 ' + y + z = y0 + z0 ∧ (∀ b. b ∈ y0 → b < a ∨ b = a) ∧ (∀ b. b ∈ z0 → a < b) |
ordered≤(a0 ' + y + z), a < b, ∀ b. b ∈ z → a < b, ∀ b. b ∈ y → b < a ∨ b = a, b = a0 ∨ b ∈ y ⊦ b = a, ∃ y0, z0. a0 ' + y + z = y0 + z0 ∧ (∀ b. b ∈ y0 → b < a ∨ b = a) ∧ (∀ b. b ∈ z0 → a < b)
Used simplifier rules: sls: ⊦ a ≠ b → (¬ a < b ↔ b < a); from specification oelem%in-rec: ⊦ a ∈ b ' + x ↔ ¬ ¬(a = b ∨ a ∈ x); from specification list%a: ⊦ (x + y) + z = x + y + z; from specification list