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 40954
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 2857 . . . . . . . 8 (𝑅 = 𝑃 → (𝑅𝐴𝑃𝐴))
2 breq1 5113 . . . . . . . . 9 (𝑅 = 𝑃 → (𝑅 𝑊𝑃 𝑊))
32notbid 321 . . . . . . . 8 (𝑅 = 𝑃 → (¬ 𝑅 𝑊 ↔ ¬ 𝑃 𝑊))
41, 3anbi12d 643 . . . . . . 7 (𝑅 = 𝑃 → ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ↔ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)))
543anbi1d 1466 . . . . . 6 (𝑅 = 𝑃 → (((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ↔ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊))))
653anbi2d 1467 . . . . 5 (𝑅 = 𝑃 → ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ↔ (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟))))))
7 simp11 1220 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
8 simp21 1223 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
9 simp13l 1305 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑄𝐴)
10 simp22 1224 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑆𝐴 ∧ ¬ 𝑆 𝑊))
11 simp322 1341 . . . . . . 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 2769 . . . . . . . 8 ((𝑃 𝑄) (𝐹 ((𝑃 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐹 ((𝑃 𝑆) 𝑊)))
2012, 13, 14, 15, 16, 17, 18, 19cdleme17d1 40948 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴 ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ¬ 𝑆 (𝑃 𝑄)) → ((𝑃 𝑄) (𝐹 ((𝑃 𝑆) 𝑊))) = 𝑄)
217, 8, 9, 10, 11, 20syl131anc 1408 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 𝑄) (𝐹 ((𝑃 𝑆) 𝑊))) = 𝑄)
22 simp23 1225 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑇𝐴 ∧ ¬ 𝑇 𝑊))
23 simp323 1342 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ¬ 𝑇 (𝑃 𝑄))
24 cdleme18d.d . . . . . . . 8 𝐷 = ((𝑇 𝑈) (𝑄 ((𝑃 𝑇) 𝑊)))
25 eqid 2769 . . . . . . . 8 ((𝑃 𝑄) (𝐷 ((𝑃 𝑇) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑃 𝑇) 𝑊)))
2612, 13, 14, 15, 16, 17, 24, 25cdleme17d1 40948 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴 ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ ¬ 𝑇 (𝑃 𝑄)) → ((𝑃 𝑄) (𝐷 ((𝑃 𝑇) 𝑊))) = 𝑄)
277, 8, 9, 22, 23, 26syl131anc 1408 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 𝑄) (𝐷 ((𝑃 𝑇) 𝑊))) = 𝑄)
2821, 27eqtr4d 2807 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 𝑄) (𝐹 ((𝑃 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑃 𝑇) 𝑊))))
296, 28biimtrdi 256 . . . 4 (𝑅 = 𝑃 → ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 𝑄) (𝐹 ((𝑃 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑃 𝑇) 𝑊)))))
30 cdleme18d.g . . . . . 6 𝐺 = ((𝑃 𝑄) (𝐹 ((𝑅 𝑆) 𝑊)))
31 cdleme18d.e . . . . . 6 𝐸 = ((𝑃 𝑄) (𝐷 ((𝑅 𝑇) 𝑊)))
3230, 31eqeq12i 2787 . . . . 5 (𝐺 = 𝐸 ↔ ((𝑃 𝑄) (𝐹 ((𝑅 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑅 𝑇) 𝑊))))
33 oveq1 7415 . . . . . . . . 9 (𝑅 = 𝑃 → (𝑅 𝑆) = (𝑃 𝑆))
3433oveq1d 7423 . . . . . . . 8 (𝑅 = 𝑃 → ((𝑅 𝑆) 𝑊) = ((𝑃 𝑆) 𝑊))
3534oveq2d 7424 . . . . . . 7 (𝑅 = 𝑃 → (𝐹 ((𝑅 𝑆) 𝑊)) = (𝐹 ((𝑃 𝑆) 𝑊)))
3635oveq2d 7424 . . . . . 6 (𝑅 = 𝑃 → ((𝑃 𝑄) (𝐹 ((𝑅 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐹 ((𝑃 𝑆) 𝑊))))
37 oveq1 7415 . . . . . . . . 9 (𝑅 = 𝑃 → (𝑅 𝑇) = (𝑃 𝑇))
3837oveq1d 7423 . . . . . . . 8 (𝑅 = 𝑃 → ((𝑅 𝑇) 𝑊) = ((𝑃 𝑇) 𝑊))
3938oveq2d 7424 . . . . . . 7 (𝑅 = 𝑃 → (𝐷 ((𝑅 𝑇) 𝑊)) = (𝐷 ((𝑃 𝑇) 𝑊)))
4039oveq2d 7424 . . . . . 6 (𝑅 = 𝑃 → ((𝑃 𝑄) (𝐷 ((𝑅 𝑇) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑃 𝑇) 𝑊))))
4136, 40eqeq12d 2785 . . . . 5 (𝑅 = 𝑃 → (((𝑃 𝑄) (𝐹 ((𝑅 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑅 𝑇) 𝑊))) ↔ ((𝑃 𝑄) (𝐹 ((𝑃 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑃 𝑇) 𝑊)))))
4232, 41bitrid 286 . . . 4 (𝑅 = 𝑃 → (𝐺 = 𝐸 ↔ ((𝑃 𝑄) (𝐹 ((𝑃 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑃 𝑇) 𝑊)))))
4329, 42sylibrd 262 . . 3 (𝑅 = 𝑃 → ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐺 = 𝐸))
4443com12 33 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑅 = 𝑃𝐺 = 𝐸))
45 eleq1 2857 . . . . . . . 8 (𝑅 = 𝑄 → (𝑅𝐴𝑄𝐴))
46 breq1 5113 . . . . . . . . 9 (𝑅 = 𝑄 → (𝑅 𝑊𝑄 𝑊))
4746notbid 321 . . . . . . . 8 (𝑅 = 𝑄 → (¬ 𝑅 𝑊 ↔ ¬ 𝑄 𝑊))
4845, 47anbi12d 643 . . . . . . 7 (𝑅 = 𝑄 → ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ↔ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)))
49483anbi1d 1466 . . . . . 6 (𝑅 = 𝑄 → (((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ↔ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊))))
50 breq1 5113 . . . . . . . 8 (𝑅 = 𝑄 → (𝑅 (𝑃 𝑄) ↔ 𝑄 (𝑃 𝑄)))
51503anbi1d 1466 . . . . . . 7 (𝑅 = 𝑄 → ((𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ↔ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄))))
52513anbi2d 1467 . . . . . 6 (𝑅 = 𝑄 → ((𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟))) ↔ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))))
5349, 523anbi23d 1465 . . . . 5 (𝑅 = 𝑄 → ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ↔ (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟))))))
54 simp11l 1301 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐾 ∈ HL)
55 simp11r 1302 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑊𝐻)
56 simp12 1221 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
57 simp21 1223 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
58 simp22 1224 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑆𝐴 ∧ ¬ 𝑆 𝑊))
59 simp31 1226 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑃𝑄)
60 simp322 1341 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ¬ 𝑆 (𝑃 𝑄))
61 simp33 1228 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))
62 eqid 2769 . . . . . . . 8 ((𝑃 𝑄) (𝐹 ((𝑄 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐹 ((𝑄 𝑆) 𝑊)))
6312, 13, 14, 15, 16, 17, 18, 62cdleme18c 40952 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 𝑄) (𝐹 ((𝑄 𝑆) 𝑊))) = 𝑃)
6454, 55, 56, 57, 58, 59, 60, 61, 63syl233anc 1424 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 𝑄) (𝐹 ((𝑄 𝑆) 𝑊))) = 𝑃)
65 simp23 1225 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑇𝐴 ∧ ¬ 𝑇 𝑊))
66 simp323 1342 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ¬ 𝑇 (𝑃 𝑄))
67 eqid 2769 . . . . . . . 8 ((𝑃 𝑄) (𝐷 ((𝑄 𝑇) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑄 𝑇) 𝑊)))
6812, 13, 14, 15, 16, 17, 24, 67cdleme18c 40952 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ ¬ 𝑇 (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 𝑄) (𝐷 ((𝑄 𝑇) 𝑊))) = 𝑃)
6954, 55, 56, 57, 65, 59, 66, 61, 68syl233anc 1424 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 𝑄) (𝐷 ((𝑄 𝑇) 𝑊))) = 𝑃)
7064, 69eqtr4d 2807 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑄 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 𝑄) (𝐹 ((𝑄 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑄 𝑇) 𝑊))))
7153, 70biimtrdi 256 . . . 4 (𝑅 = 𝑄 → ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 𝑄) (𝐹 ((𝑄 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑄 𝑇) 𝑊)))))
72 oveq1 7415 . . . . . . . . 9 (𝑅 = 𝑄 → (𝑅 𝑆) = (𝑄 𝑆))
7372oveq1d 7423 . . . . . . . 8 (𝑅 = 𝑄 → ((𝑅 𝑆) 𝑊) = ((𝑄 𝑆) 𝑊))
7473oveq2d 7424 . . . . . . 7 (𝑅 = 𝑄 → (𝐹 ((𝑅 𝑆) 𝑊)) = (𝐹 ((𝑄 𝑆) 𝑊)))
7574oveq2d 7424 . . . . . 6 (𝑅 = 𝑄 → ((𝑃 𝑄) (𝐹 ((𝑅 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐹 ((𝑄 𝑆) 𝑊))))
76 oveq1 7415 . . . . . . . . 9 (𝑅 = 𝑄 → (𝑅 𝑇) = (𝑄 𝑇))
7776oveq1d 7423 . . . . . . . 8 (𝑅 = 𝑄 → ((𝑅 𝑇) 𝑊) = ((𝑄 𝑇) 𝑊))
7877oveq2d 7424 . . . . . . 7 (𝑅 = 𝑄 → (𝐷 ((𝑅 𝑇) 𝑊)) = (𝐷 ((𝑄 𝑇) 𝑊)))
7978oveq2d 7424 . . . . . 6 (𝑅 = 𝑄 → ((𝑃 𝑄) (𝐷 ((𝑅 𝑇) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑄 𝑇) 𝑊))))
8075, 79eqeq12d 2785 . . . . 5 (𝑅 = 𝑄 → (((𝑃 𝑄) (𝐹 ((𝑅 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑅 𝑇) 𝑊))) ↔ ((𝑃 𝑄) (𝐹 ((𝑄 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑄 𝑇) 𝑊)))))
8132, 80bitrid 286 . . . 4 (𝑅 = 𝑄 → (𝐺 = 𝐸 ↔ ((𝑃 𝑄) (𝐹 ((𝑄 𝑆) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑄 𝑇) 𝑊)))))
8271, 81sylibrd 262 . . 3 (𝑅 = 𝑄 → ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐺 = 𝐸))
8382com12 33 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑅 = 𝑄𝐺 = 𝐸))
84 simp11l 1301 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐾 ∈ HL)
85 simp321 1340 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑅 (𝑃 𝑄))
86 simp33 1228 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))
87 simp12l 1303 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑃𝐴)
88 simp13l 1305 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑄𝐴)
89 simp31 1226 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑃𝑄)
90 simp21l 1307 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑅𝐴)
91 simp21r 1308 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ¬ 𝑅 𝑊)
9212, 13, 15cdleme0nex 40949 . . 3 (((𝐾 ∈ HL ∧ 𝑅 (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟))) ∧ (𝑃𝐴𝑄𝐴𝑃𝑄) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) → (𝑅 = 𝑃𝑅 = 𝑄))
9384, 85, 86, 87, 88, 89, 90, 91, 92syl332anc 1426 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑅 = 𝑃𝑅 = 𝑄))
9444, 83, 93mpjaod 873 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑇𝐴 ∧ ¬ 𝑇 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 (𝑃 𝑄)) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐺 = 𝐸)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 400  wo 860  w3a 1101   = wceq 1567  wcel 2149  wne 2964  wrex 3095   class class class wbr 5110  cfv 6533  (class class class)co 7408  lecple 17313  joincjn 18363  meetcmee 18364  Atomscatm 39922  HLchlt 40009  LHypclh 40643
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5239  ax-sep 5258  ax-nul 5268  ax-pow 5334  ax-pr 5402  ax-un 7730
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-nul 4295  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4874  df-iun 4959  df-iin 4960  df-br 5111  df-opab 5175  df-mpt 5194  df-id 5554  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7365  df-ov 7411  df-oprab 7412  df-mpo 7413  df-1st 7982  df-2nd 7983  df-proset 18346  df-poset 18365  df-plt 18380  df-lub 18396  df-glb 18397  df-join 18398  df-meet 18399  df-p0 18475  df-p1 18476  df-lat 18484  df-clat 18551  df-oposet 39835  df-ol 39837  df-oml 39838  df-covers 39925  df-ats 39926  df-atl 39957  df-cvlat 39981  df-hlat 40010  df-llines 40157  df-lines 40160  df-psubsp 40162  df-pmap 40163  df-padd 40455  df-lhyp 40647
This theorem is referenced by:  cdleme21  40996
  Copyright terms: Public domain W3C validator