Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  cdleme18d Structured version   Visualization version   GIF version

Theorem cdleme18d 39824
Description: Part of proof of Lemma E in [Crawley] p. 114, 4th sentence of 4th paragraph. 𝐹, 𝐺, 𝐷, 𝐸 represent f(s), fs(r), f(t), ft(r) respectively. We show fs(r) = ft(r) for all possible r (which must equal p or q in the case of exactly 3 atoms in p ∨ q/0 , i.e., when Β¬ βˆƒπ‘Ÿ ∈ 𝐴...). (Contributed by NM, 12-Nov-2012.)
Hypotheses
Ref Expression
cdleme18d.l ≀ = (leβ€˜πΎ)
cdleme18d.j ∨ = (joinβ€˜πΎ)
cdleme18d.m ∧ = (meetβ€˜πΎ)
cdleme18d.a 𝐴 = (Atomsβ€˜πΎ)
cdleme18d.h 𝐻 = (LHypβ€˜πΎ)
cdleme18d.u π‘ˆ = ((𝑃 ∨ 𝑄) ∧ π‘Š)
cdleme18d.f 𝐹 = ((𝑆 ∨ π‘ˆ) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š)))
cdleme18d.g 𝐺 = ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑅 ∨ 𝑆) ∧ π‘Š)))
cdleme18d.d 𝐷 = ((𝑇 ∨ π‘ˆ) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š)))
cdleme18d.e 𝐸 = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑇) ∧ π‘Š)))
Assertion
Ref Expression
cdleme18d ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝐺 = 𝐸)
Distinct variable groups:   𝐴,π‘Ÿ   𝐷,π‘Ÿ   𝐹,π‘Ÿ   ∨ ,π‘Ÿ   ≀ ,π‘Ÿ   ∧ ,π‘Ÿ   𝑃,π‘Ÿ   𝑄,π‘Ÿ   𝑅,π‘Ÿ   𝑆,π‘Ÿ   𝑇,π‘Ÿ   π‘Š,π‘Ÿ
Allowed substitution hints:   π‘ˆ(π‘Ÿ)   𝐸(π‘Ÿ)   𝐺(π‘Ÿ)   𝐻(π‘Ÿ)   𝐾(π‘Ÿ)

Proof of Theorem cdleme18d
StepHypRef Expression
1 eleq1 2813 . . . . . . . 8 (𝑅 = 𝑃 β†’ (𝑅 ∈ 𝐴 ↔ 𝑃 ∈ 𝐴))
2 breq1 5146 . . . . . . . . 9 (𝑅 = 𝑃 β†’ (𝑅 ≀ π‘Š ↔ 𝑃 ≀ π‘Š))
32notbid 317 . . . . . . . 8 (𝑅 = 𝑃 β†’ (Β¬ 𝑅 ≀ π‘Š ↔ Β¬ 𝑃 ≀ π‘Š))
41, 3anbi12d 630 . . . . . . 7 (𝑅 = 𝑃 β†’ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ↔ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š)))
543anbi1d 1436 . . . . . 6 (𝑅 = 𝑃 β†’ (((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ↔ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š))))
653anbi2d 1437 . . . . 5 (𝑅 = 𝑃 β†’ ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) ↔ (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ))))))
7 simp11 1200 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ (𝐾 ∈ HL ∧ π‘Š ∈ 𝐻))
8 simp21 1203 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š))
9 simp13l 1285 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝑄 ∈ 𝐴)
10 simp22 1204 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š))
11 simp322 1321 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄))
12 cdleme18d.l . . . . . . . 8 ≀ = (leβ€˜πΎ)
13 cdleme18d.j . . . . . . . 8 ∨ = (joinβ€˜πΎ)
14 cdleme18d.m . . . . . . . 8 ∧ = (meetβ€˜πΎ)
15 cdleme18d.a . . . . . . . 8 𝐴 = (Atomsβ€˜πΎ)
16 cdleme18d.h . . . . . . . 8 𝐻 = (LHypβ€˜πΎ)
17 cdleme18d.u . . . . . . . 8 π‘ˆ = ((𝑃 ∨ 𝑄) ∧ π‘Š)
18 cdleme18d.f . . . . . . . 8 𝐹 = ((𝑆 ∨ π‘ˆ) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š)))
19 eqid 2725 . . . . . . . 8 ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š)))
2012, 13, 14, 15, 16, 17, 18, 19cdleme17d1 39818 . . . . . . 7 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ 𝑄 ∈ 𝐴 ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š)) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄)) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š))) = 𝑄)
217, 8, 9, 10, 11, 20syl131anc 1380 . . . . . 6 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š))) = 𝑄)
22 simp23 1205 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š))
23 simp323 1322 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄))
24 cdleme18d.d . . . . . . . 8 𝐷 = ((𝑇 ∨ π‘ˆ) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š)))
25 eqid 2725 . . . . . . . 8 ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š)))
2612, 13, 14, 15, 16, 17, 24, 25cdleme17d1 39818 . . . . . . 7 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ 𝑄 ∈ 𝐴 ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š))) = 𝑄)
277, 8, 9, 22, 23, 26syl131anc 1380 . . . . . 6 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š))) = 𝑄)
2821, 27eqtr4d 2768 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š))))
296, 28biimtrdi 252 . . . 4 (𝑅 = 𝑃 β†’ ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š)))))
30 cdleme18d.g . . . . . 6 𝐺 = ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑅 ∨ 𝑆) ∧ π‘Š)))
31 cdleme18d.e . . . . . 6 𝐸 = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑇) ∧ π‘Š)))
3230, 31eqeq12i 2743 . . . . 5 (𝐺 = 𝐸 ↔ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑅 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑇) ∧ π‘Š))))
33 oveq1 7423 . . . . . . . . 9 (𝑅 = 𝑃 β†’ (𝑅 ∨ 𝑆) = (𝑃 ∨ 𝑆))
3433oveq1d 7431 . . . . . . . 8 (𝑅 = 𝑃 β†’ ((𝑅 ∨ 𝑆) ∧ π‘Š) = ((𝑃 ∨ 𝑆) ∧ π‘Š))
3534oveq2d 7432 . . . . . . 7 (𝑅 = 𝑃 β†’ (𝐹 ∨ ((𝑅 ∨ 𝑆) ∧ π‘Š)) = (𝐹 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š)))
3635oveq2d 7432 . . . . . 6 (𝑅 = 𝑃 β†’ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑅 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š))))
37 oveq1 7423 . . . . . . . . 9 (𝑅 = 𝑃 β†’ (𝑅 ∨ 𝑇) = (𝑃 ∨ 𝑇))
3837oveq1d 7431 . . . . . . . 8 (𝑅 = 𝑃 β†’ ((𝑅 ∨ 𝑇) ∧ π‘Š) = ((𝑃 ∨ 𝑇) ∧ π‘Š))
3938oveq2d 7432 . . . . . . 7 (𝑅 = 𝑃 β†’ (𝐷 ∨ ((𝑅 ∨ 𝑇) ∧ π‘Š)) = (𝐷 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š)))
4039oveq2d 7432 . . . . . 6 (𝑅 = 𝑃 β†’ ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑇) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š))))
4136, 40eqeq12d 2741 . . . . 5 (𝑅 = 𝑃 β†’ (((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑅 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑇) ∧ π‘Š))) ↔ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š)))))
4232, 41bitrid 282 . . . 4 (𝑅 = 𝑃 β†’ (𝐺 = 𝐸 ↔ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑃 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑃 ∨ 𝑇) ∧ π‘Š)))))
4329, 42sylibrd 258 . . 3 (𝑅 = 𝑃 β†’ ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝐺 = 𝐸))
4443com12 32 . 2 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ (𝑅 = 𝑃 β†’ 𝐺 = 𝐸))
45 eleq1 2813 . . . . . . . 8 (𝑅 = 𝑄 β†’ (𝑅 ∈ 𝐴 ↔ 𝑄 ∈ 𝐴))
46 breq1 5146 . . . . . . . . 9 (𝑅 = 𝑄 β†’ (𝑅 ≀ π‘Š ↔ 𝑄 ≀ π‘Š))
4746notbid 317 . . . . . . . 8 (𝑅 = 𝑄 β†’ (Β¬ 𝑅 ≀ π‘Š ↔ Β¬ 𝑄 ≀ π‘Š))
4845, 47anbi12d 630 . . . . . . 7 (𝑅 = 𝑄 β†’ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ↔ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)))
49483anbi1d 1436 . . . . . 6 (𝑅 = 𝑄 β†’ (((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ↔ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š))))
50 breq1 5146 . . . . . . . 8 (𝑅 = 𝑄 β†’ (𝑅 ≀ (𝑃 ∨ 𝑄) ↔ 𝑄 ≀ (𝑃 ∨ 𝑄)))
51503anbi1d 1436 . . . . . . 7 (𝑅 = 𝑄 β†’ ((𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ↔ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄))))
52513anbi2d 1437 . . . . . 6 (𝑅 = 𝑄 β†’ ((𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ))) ↔ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))))
5349, 523anbi23d 1435 . . . . 5 (𝑅 = 𝑄 β†’ ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) ↔ (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ))))))
54 simp11l 1281 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝐾 ∈ HL)
55 simp11r 1282 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ π‘Š ∈ 𝐻)
56 simp12 1201 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š))
57 simp21 1203 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š))
58 simp22 1204 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š))
59 simp31 1206 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝑃 β‰  𝑄)
60 simp322 1321 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄))
61 simp33 1208 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))
62 eqid 2725 . . . . . . . 8 ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑄 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑄 ∨ 𝑆) ∧ π‘Š)))
6312, 13, 14, 15, 16, 17, 18, 62cdleme18c 39822 . . . . . . 7 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑄 ∨ 𝑆) ∧ π‘Š))) = 𝑃)
6454, 55, 56, 57, 58, 59, 60, 61, 63syl233anc 1396 . . . . . 6 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑄 ∨ 𝑆) ∧ π‘Š))) = 𝑃)
65 simp23 1205 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š))
66 simp323 1322 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄))
67 eqid 2725 . . . . . . . 8 ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑄 ∨ 𝑇) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑄 ∨ 𝑇) ∧ π‘Š)))
6812, 13, 14, 15, 16, 17, 24, 67cdleme18c 39822 . . . . . . 7 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑄 ∨ 𝑇) ∧ π‘Š))) = 𝑃)
6954, 55, 56, 57, 65, 59, 66, 61, 68syl233anc 1396 . . . . . 6 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑄 ∨ 𝑇) ∧ π‘Š))) = 𝑃)
7064, 69eqtr4d 2768 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑄 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑄 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑄 ∨ 𝑇) ∧ π‘Š))))
7153, 70biimtrdi 252 . . . 4 (𝑅 = 𝑄 β†’ ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑄 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑄 ∨ 𝑇) ∧ π‘Š)))))
72 oveq1 7423 . . . . . . . . 9 (𝑅 = 𝑄 β†’ (𝑅 ∨ 𝑆) = (𝑄 ∨ 𝑆))
7372oveq1d 7431 . . . . . . . 8 (𝑅 = 𝑄 β†’ ((𝑅 ∨ 𝑆) ∧ π‘Š) = ((𝑄 ∨ 𝑆) ∧ π‘Š))
7473oveq2d 7432 . . . . . . 7 (𝑅 = 𝑄 β†’ (𝐹 ∨ ((𝑅 ∨ 𝑆) ∧ π‘Š)) = (𝐹 ∨ ((𝑄 ∨ 𝑆) ∧ π‘Š)))
7574oveq2d 7432 . . . . . 6 (𝑅 = 𝑄 β†’ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑅 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑄 ∨ 𝑆) ∧ π‘Š))))
76 oveq1 7423 . . . . . . . . 9 (𝑅 = 𝑄 β†’ (𝑅 ∨ 𝑇) = (𝑄 ∨ 𝑇))
7776oveq1d 7431 . . . . . . . 8 (𝑅 = 𝑄 β†’ ((𝑅 ∨ 𝑇) ∧ π‘Š) = ((𝑄 ∨ 𝑇) ∧ π‘Š))
7877oveq2d 7432 . . . . . . 7 (𝑅 = 𝑄 β†’ (𝐷 ∨ ((𝑅 ∨ 𝑇) ∧ π‘Š)) = (𝐷 ∨ ((𝑄 ∨ 𝑇) ∧ π‘Š)))
7978oveq2d 7432 . . . . . 6 (𝑅 = 𝑄 β†’ ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑇) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑄 ∨ 𝑇) ∧ π‘Š))))
8075, 79eqeq12d 2741 . . . . 5 (𝑅 = 𝑄 β†’ (((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑅 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑇) ∧ π‘Š))) ↔ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑄 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑄 ∨ 𝑇) ∧ π‘Š)))))
8132, 80bitrid 282 . . . 4 (𝑅 = 𝑄 β†’ (𝐺 = 𝐸 ↔ ((𝑃 ∨ 𝑄) ∧ (𝐹 ∨ ((𝑄 ∨ 𝑆) ∧ π‘Š))) = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑄 ∨ 𝑇) ∧ π‘Š)))))
8271, 81sylibrd 258 . . 3 (𝑅 = 𝑄 β†’ ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝐺 = 𝐸))
8382com12 32 . 2 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ (𝑅 = 𝑄 β†’ 𝐺 = 𝐸))
84 simp11l 1281 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝐾 ∈ HL)
85 simp321 1320 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝑅 ≀ (𝑃 ∨ 𝑄))
86 simp33 1208 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))
87 simp12l 1283 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝑃 ∈ 𝐴)
88 simp13l 1285 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝑄 ∈ 𝐴)
89 simp31 1206 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝑃 β‰  𝑄)
90 simp21l 1287 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝑅 ∈ 𝐴)
91 simp21r 1288 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ Β¬ 𝑅 ≀ π‘Š)
9212, 13, 15cdleme0nex 39819 . . 3 (((𝐾 ∈ HL ∧ 𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ))) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑃 β‰  𝑄) ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) β†’ (𝑅 = 𝑃 ∨ 𝑅 = 𝑄))
9384, 85, 86, 87, 88, 89, 90, 91, 92syl332anc 1398 . 2 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ (𝑅 = 𝑃 ∨ 𝑅 = 𝑄))
9444, 83, 93mpjaod 858 1 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑆 ∈ 𝐴 ∧ Β¬ 𝑆 ≀ π‘Š) ∧ (𝑇 ∈ 𝐴 ∧ Β¬ 𝑇 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑆 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑇 ≀ (𝑃 ∨ 𝑄)) ∧ Β¬ βˆƒπ‘Ÿ ∈ 𝐴 (Β¬ π‘Ÿ ≀ π‘Š ∧ (𝑃 ∨ π‘Ÿ) = (𝑄 ∨ π‘Ÿ)))) β†’ 𝐺 = 𝐸)
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ∧ wa 394   ∨ wo 845   ∧ w3a 1084   = wceq 1533   ∈ wcel 2098   β‰  wne 2930  βˆƒwrex 3060   class class class wbr 5143  β€˜cfv 6543  (class class class)co 7416  lecple 17239  joincjn 18302  meetcmee 18303  Atomscatm 38791  HLchlt 38878  LHypclh 39513
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2696  ax-rep 5280  ax-sep 5294  ax-nul 5301  ax-pow 5359  ax-pr 5423  ax-un 7738
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2703  df-cleq 2717  df-clel 2802  df-nfc 2877  df-ne 2931  df-ral 3052  df-rex 3061  df-rmo 3364  df-reu 3365  df-rab 3420  df-v 3465  df-sbc 3769  df-csb 3885  df-dif 3942  df-un 3944  df-in 3946  df-ss 3956  df-nul 4319  df-if 4525  df-pw 4600  df-sn 4625  df-pr 4627  df-op 4631  df-uni 4904  df-iun 4993  df-iin 4994  df-br 5144  df-opab 5206  df-mpt 5227  df-id 5570  df-xp 5678  df-rel 5679  df-cnv 5680  df-co 5681  df-dm 5682  df-rn 5683  df-res 5684  df-ima 5685  df-iota 6495  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-riota 7372  df-ov 7419  df-oprab 7420  df-mpo 7421  df-1st 7991  df-2nd 7992  df-proset 18286  df-poset 18304  df-plt 18321  df-lub 18337  df-glb 18338  df-join 18339  df-meet 18340  df-p0 18416  df-p1 18417  df-lat 18423  df-clat 18490  df-oposet 38704  df-ol 38706  df-oml 38707  df-covers 38794  df-ats 38795  df-atl 38826  df-cvlat 38850  df-hlat 38879  df-llines 39027  df-lines 39030  df-psubsp 39032  df-pmap 39033  df-padd 39325  df-lhyp 39517
This theorem is referenced by:  cdleme21  39866
  Copyright terms: Public domain W3C validator