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

Theorem 4atlem12b 36751
Description: Lemma for 4at 36753. Substitute 𝑇 for 𝑃 (cont.). (Contributed by NM, 11-Jul-2012.)
Hypotheses
Ref Expression
4at.l = (le‘𝐾)
4at.j = (join‘𝐾)
4at.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
4atlem12b ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → ((𝑃 𝑄) (𝑅 𝑆)) = ((𝑇 𝑈) (𝑉 𝑊)))

Proof of Theorem 4atlem12b
StepHypRef Expression
1 simp11 1199 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴))
2 simp121 1301 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑅𝐴)
3 simp122 1302 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑆𝐴)
42, 3jca 514 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (𝑅𝐴𝑆𝐴))
5 simp13 1201 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (𝑈𝐴𝑉𝐴𝑊𝐴))
61, 4, 53jca 1124 . . . 4 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)))
7 simp2l 1195 . . . 4 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)))
86, 7jca 514 . . 3 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ (𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))))
9 simp3lr 1241 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑄 ((𝑇 𝑈) (𝑉 𝑊)))
10 simp3rl 1242 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑅 ((𝑇 𝑈) (𝑉 𝑊)))
11 simp3rr 1243 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑆 ((𝑇 𝑈) (𝑉 𝑊)))
12 simp111 1298 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝐾 ∈ HL)
1312hllatd 36504 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝐾 ∈ Lat)
14 eqid 2824 . . . . . . . . 9 (Base‘𝐾) = (Base‘𝐾)
15 4at.a . . . . . . . . 9 𝐴 = (Atoms‘𝐾)
1614, 15atbase 36429 . . . . . . . 8 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
172, 16syl 17 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑅 ∈ (Base‘𝐾))
1814, 15atbase 36429 . . . . . . . 8 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
193, 18syl 17 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑆 ∈ (Base‘𝐾))
20 simp123 1303 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑇𝐴)
21 simp131 1304 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑈𝐴)
22 4at.j . . . . . . . . . 10 = (join‘𝐾)
2314, 22, 15hlatjcl 36507 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑇𝐴𝑈𝐴) → (𝑇 𝑈) ∈ (Base‘𝐾))
2412, 20, 21, 23syl3anc 1367 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (𝑇 𝑈) ∈ (Base‘𝐾))
25 simp132 1305 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑉𝐴)
26 simp133 1306 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑊𝐴)
2714, 22, 15hlatjcl 36507 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑉𝐴𝑊𝐴) → (𝑉 𝑊) ∈ (Base‘𝐾))
2812, 25, 26, 27syl3anc 1367 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (𝑉 𝑊) ∈ (Base‘𝐾))
2914, 22latjcl 17664 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (𝑇 𝑈) ∈ (Base‘𝐾) ∧ (𝑉 𝑊) ∈ (Base‘𝐾)) → ((𝑇 𝑈) (𝑉 𝑊)) ∈ (Base‘𝐾))
3013, 24, 28, 29syl3anc 1367 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → ((𝑇 𝑈) (𝑉 𝑊)) ∈ (Base‘𝐾))
31 4at.l . . . . . . . 8 = (le‘𝐾)
3214, 31, 22latjle12 17675 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑅 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾) ∧ ((𝑇 𝑈) (𝑉 𝑊)) ∈ (Base‘𝐾))) → ((𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))) ↔ (𝑅 𝑆) ((𝑇 𝑈) (𝑉 𝑊))))
3313, 17, 19, 30, 32syl13anc 1368 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → ((𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))) ↔ (𝑅 𝑆) ((𝑇 𝑈) (𝑉 𝑊))))
3410, 11, 33mpbi2and 710 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (𝑅 𝑆) ((𝑇 𝑈) (𝑉 𝑊)))
35 simp113 1300 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑄𝐴)
3614, 15atbase 36429 . . . . . . 7 (𝑄𝐴𝑄 ∈ (Base‘𝐾))
3735, 36syl 17 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑄 ∈ (Base‘𝐾))
3814, 22, 15hlatjcl 36507 . . . . . . 7 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑆𝐴) → (𝑅 𝑆) ∈ (Base‘𝐾))
3912, 2, 3, 38syl3anc 1367 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (𝑅 𝑆) ∈ (Base‘𝐾))
4014, 31, 22latjle12 17675 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑄 ∈ (Base‘𝐾) ∧ (𝑅 𝑆) ∈ (Base‘𝐾) ∧ ((𝑇 𝑈) (𝑉 𝑊)) ∈ (Base‘𝐾))) → ((𝑄 ((𝑇 𝑈) (𝑉 𝑊)) ∧ (𝑅 𝑆) ((𝑇 𝑈) (𝑉 𝑊))) ↔ (𝑄 (𝑅 𝑆)) ((𝑇 𝑈) (𝑉 𝑊))))
4113, 37, 39, 30, 40syl13anc 1368 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → ((𝑄 ((𝑇 𝑈) (𝑉 𝑊)) ∧ (𝑅 𝑆) ((𝑇 𝑈) (𝑉 𝑊))) ↔ (𝑄 (𝑅 𝑆)) ((𝑇 𝑈) (𝑉 𝑊))))
429, 34, 41mpbi2and 710 . . . 4 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (𝑄 (𝑅 𝑆)) ((𝑇 𝑈) (𝑉 𝑊)))
43 simp3ll 1240 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑃 ((𝑇 𝑈) (𝑉 𝑊)))
44 simp112 1299 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → 𝑃𝐴)
45 simp2r 1196 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → ¬ 𝑃 ((𝑈 𝑉) 𝑊))
4631, 22, 154atlem12a 36750 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) → (𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ↔ ((𝑃 𝑈) (𝑉 𝑊)) = ((𝑇 𝑈) (𝑉 𝑊))))
4712, 44, 20, 5, 45, 46syl311anc 1380 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ↔ ((𝑃 𝑈) (𝑉 𝑊)) = ((𝑇 𝑈) (𝑉 𝑊))))
4843, 47mpbid 234 . . . 4 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → ((𝑃 𝑈) (𝑉 𝑊)) = ((𝑇 𝑈) (𝑉 𝑊)))
4942, 48breqtrrd 5097 . . 3 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → (𝑄 (𝑅 𝑆)) ((𝑃 𝑈) (𝑉 𝑊)))
5031, 22, 154atlem11 36749 . . 3 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ (𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → ((𝑄 (𝑅 𝑆)) ((𝑃 𝑈) (𝑉 𝑊)) → ((𝑃 𝑄) (𝑅 𝑆)) = ((𝑃 𝑈) (𝑉 𝑊))))
518, 49, 50sylc 65 . 2 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → ((𝑃 𝑄) (𝑅 𝑆)) = ((𝑃 𝑈) (𝑉 𝑊)))
5251, 48eqtrd 2859 1 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑈𝐴𝑉𝐴𝑊𝐴)) ∧ ((𝑃𝑄 ∧ ¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) ∧ ¬ 𝑃 ((𝑈 𝑉) 𝑊)) ∧ ((𝑃 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑄 ((𝑇 𝑈) (𝑉 𝑊))) ∧ (𝑅 ((𝑇 𝑈) (𝑉 𝑊)) ∧ 𝑆 ((𝑇 𝑈) (𝑉 𝑊))))) → ((𝑃 𝑄) (𝑅 𝑆)) = ((𝑇 𝑈) (𝑉 𝑊)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  w3a 1083   = wceq 1536  wcel 2113  wne 3019   class class class wbr 5069  cfv 6358  (class class class)co 7159  Basecbs 16486  lecple 16575  joincjn 17557  Latclat 17658  Atomscatm 36403  HLchlt 36490
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1969  ax-7 2014  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2160  ax-12 2176  ax-ext 2796  ax-rep 5193  ax-sep 5206  ax-nul 5213  ax-pow 5269  ax-pr 5333  ax-un 7464
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1539  df-ex 1780  df-nf 1784  df-sb 2069  df-mo 2621  df-eu 2653  df-clab 2803  df-cleq 2817  df-clel 2896  df-nfc 2966  df-ne 3020  df-ral 3146  df-rex 3147  df-reu 3148  df-rab 3150  df-v 3499  df-sbc 3776  df-csb 3887  df-dif 3942  df-un 3944  df-in 3946  df-ss 3955  df-nul 4295  df-if 4471  df-pw 4544  df-sn 4571  df-pr 4573  df-op 4577  df-uni 4842  df-iun 4924  df-br 5070  df-opab 5132  df-mpt 5150  df-id 5463  df-xp 5564  df-rel 5565  df-cnv 5566  df-co 5567  df-dm 5568  df-rn 5569  df-res 5570  df-ima 5571  df-iota 6317  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-fv 6366  df-riota 7117  df-ov 7162  df-oprab 7163  df-proset 17541  df-poset 17559  df-plt 17571  df-lub 17587  df-glb 17588  df-join 17589  df-meet 17590  df-p0 17652  df-lat 17659  df-clat 17721  df-oposet 36316  df-ol 36318  df-oml 36319  df-covers 36406  df-ats 36407  df-atl 36438  df-cvlat 36462  df-hlat 36491  df-llines 36638  df-lplanes 36639  df-lvols 36640
This theorem is referenced by:  4atlem12  36752
  Copyright terms: Public domain W3C validator