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

Theorem dalawlem11 37822
Description: Lemma for dalaw 37827. First part of dalawlem13 37824. (Contributed by NM, 17-Sep-2012.)
Hypotheses
Ref Expression
dalawlem.l = (le‘𝐾)
dalawlem.j = (join‘𝐾)
dalawlem.m = (meet‘𝐾)
dalawlem.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
dalawlem11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))))

Proof of Theorem dalawlem11
StepHypRef Expression
1 eqid 2738 . . . 4 (Base‘𝐾) = (Base‘𝐾)
2 dalawlem.l . . . 4 = (le‘𝐾)
3 simp11 1201 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ HL)
43hllatd 37305 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ Lat)
5 simp21 1204 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃𝐴)
6 simp22 1205 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑄𝐴)
7 dalawlem.j . . . . . . 7 = (join‘𝐾)
8 dalawlem.a . . . . . . 7 𝐴 = (Atoms‘𝐾)
91, 7, 8hlatjcl 37308 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
103, 5, 6, 9syl3anc 1369 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑄) ∈ (Base‘𝐾))
11 simp31 1207 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆𝐴)
12 simp32 1208 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇𝐴)
131, 7, 8hlatjcl 37308 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑆𝐴𝑇𝐴) → (𝑆 𝑇) ∈ (Base‘𝐾))
143, 11, 12, 13syl3anc 1369 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑆 𝑇) ∈ (Base‘𝐾))
15 dalawlem.m . . . . . 6 = (meet‘𝐾)
161, 15latmcl 18073 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ (𝑆 𝑇) ∈ (Base‘𝐾)) → ((𝑃 𝑄) (𝑆 𝑇)) ∈ (Base‘𝐾))
174, 10, 14, 16syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) ∈ (Base‘𝐾))
18 simp23 1206 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅𝐴)
191, 7, 8hlatjcl 37308 . . . . 5 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑅𝐴) → (𝑄 𝑅) ∈ (Base‘𝐾))
203, 6, 18, 19syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑄 𝑅) ∈ (Base‘𝐾))
211, 2, 15latmle1 18097 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ (𝑆 𝑇) ∈ (Base‘𝐾)) → ((𝑃 𝑄) (𝑆 𝑇)) (𝑃 𝑄))
224, 10, 14, 21syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) (𝑃 𝑄))
23 simp12 1202 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 (𝑄 𝑅))
241, 8atbase 37230 . . . . . . 7 (𝑄𝐴𝑄 ∈ (Base‘𝐾))
256, 24syl 17 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑄 ∈ (Base‘𝐾))
261, 8atbase 37230 . . . . . . 7 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
2718, 26syl 17 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅 ∈ (Base‘𝐾))
281, 2, 7latlej1 18081 . . . . . 6 ((𝐾 ∈ Lat ∧ 𝑄 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → 𝑄 (𝑄 𝑅))
294, 25, 27, 28syl3anc 1369 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑄 (𝑄 𝑅))
301, 8atbase 37230 . . . . . . 7 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
315, 30syl 17 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 ∈ (Base‘𝐾))
321, 2, 7latjle12 18083 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑃 ∈ (Base‘𝐾) ∧ 𝑄 ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾))) → ((𝑃 (𝑄 𝑅) ∧ 𝑄 (𝑄 𝑅)) ↔ (𝑃 𝑄) (𝑄 𝑅)))
334, 31, 25, 20, 32syl13anc 1370 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 (𝑄 𝑅) ∧ 𝑄 (𝑄 𝑅)) ↔ (𝑃 𝑄) (𝑄 𝑅)))
3423, 29, 33mpbi2and 708 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑄) (𝑄 𝑅))
351, 2, 4, 17, 10, 20, 22, 34lattrd 18079 . . 3 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) (𝑄 𝑅))
361, 8atbase 37230 . . . . . . . 8 (𝑇𝐴𝑇 ∈ (Base‘𝐾))
3712, 36syl 17 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇 ∈ (Base‘𝐾))
381, 7latjcl 18072 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾))
394, 10, 37, 38syl3anc 1369 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾))
401, 15latmcl 18073 . . . . . 6 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ (𝑆 𝑇) ∈ (Base‘𝐾)) → (((𝑃 𝑄) 𝑇) (𝑆 𝑇)) ∈ (Base‘𝐾))
414, 39, 14, 40syl3anc 1369 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) (𝑆 𝑇)) ∈ (Base‘𝐾))
421, 7, 8hlatjcl 37308 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑃𝐴) → (𝑅 𝑃) ∈ (Base‘𝐾))
433, 18, 5, 42syl3anc 1369 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑃) ∈ (Base‘𝐾))
44 simp33 1209 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈𝐴)
451, 7, 8hlatjcl 37308 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑈𝐴𝑆𝐴) → (𝑈 𝑆) ∈ (Base‘𝐾))
463, 44, 11, 45syl3anc 1369 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑈 𝑆) ∈ (Base‘𝐾))
471, 15latmcl 18073 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) → ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))
484, 43, 46, 47syl3anc 1369 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))
491, 8atbase 37230 . . . . . . . 8 (𝑈𝐴𝑈 ∈ (Base‘𝐾))
5044, 49syl 17 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈 ∈ (Base‘𝐾))
511, 7latjcl 18072 . . . . . . 7 ((𝐾 ∈ Lat ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) → (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) ∈ (Base‘𝐾))
524, 48, 50, 51syl3anc 1369 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) ∈ (Base‘𝐾))
531, 7latjcl 18072 . . . . . 6 ((𝐾 ∈ Lat ∧ (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇) ∈ (Base‘𝐾))
544, 52, 37, 53syl3anc 1369 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇) ∈ (Base‘𝐾))
551, 2, 7latlej1 18081 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → (𝑃 𝑄) ((𝑃 𝑄) 𝑇))
564, 10, 37, 55syl3anc 1369 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑄) ((𝑃 𝑄) 𝑇))
571, 2, 15latmlem1 18102 . . . . . . 7 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) ∈ (Base‘𝐾) ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ (𝑆 𝑇) ∈ (Base‘𝐾))) → ((𝑃 𝑄) ((𝑃 𝑄) 𝑇) → ((𝑃 𝑄) (𝑆 𝑇)) (((𝑃 𝑄) 𝑇) (𝑆 𝑇))))
584, 10, 39, 14, 57syl13anc 1370 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) ((𝑃 𝑄) 𝑇) → ((𝑃 𝑄) (𝑆 𝑇)) (((𝑃 𝑄) 𝑇) (𝑆 𝑇))))
5956, 58mpd 15 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) (((𝑃 𝑄) 𝑇) (𝑆 𝑇)))
601, 2, 7latlej2 18082 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → 𝑇 ((𝑃 𝑄) 𝑇))
614, 10, 37, 60syl3anc 1369 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇 ((𝑃 𝑄) 𝑇))
621, 2, 7, 15, 8atmod2i2 37803 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑆𝐴 ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) ∧ 𝑇 ((𝑃 𝑄) 𝑇)) → ((((𝑃 𝑄) 𝑇) 𝑆) 𝑇) = (((𝑃 𝑄) 𝑇) (𝑆 𝑇)))
633, 11, 39, 37, 61, 62syl131anc 1381 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑃 𝑄) 𝑇) 𝑆) 𝑇) = (((𝑃 𝑄) 𝑇) (𝑆 𝑇)))
641, 7, 8hlatjcl 37308 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑇𝐴) → (𝑄 𝑇) ∈ (Base‘𝐾))
653, 6, 12, 64syl3anc 1369 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑄 𝑇) ∈ (Base‘𝐾))
661, 7, 8hlatjcl 37308 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → (𝑃 𝑆) ∈ (Base‘𝐾))
673, 5, 11, 66syl3anc 1369 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑆) ∈ (Base‘𝐾))
681, 15latmcom 18096 . . . . . . . . . . . . 13 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) = ((𝑃 𝑆) (𝑄 𝑇)))
694, 65, 67, 68syl3anc 1369 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) = ((𝑃 𝑆) (𝑄 𝑇)))
70 simp13 1203 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈))
7169, 70eqbrtrd 5092 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑅 𝑈))
721, 15latmcl 18073 . . . . . . . . . . . . 13 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾))
734, 65, 67, 72syl3anc 1369 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾))
741, 7, 8hlatjcl 37308 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑈𝐴) → (𝑅 𝑈) ∈ (Base‘𝐾))
753, 18, 44, 74syl3anc 1369 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑈) ∈ (Base‘𝐾))
761, 2, 7latjlej2 18087 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ (((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾) ∧ (𝑅 𝑈) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → (((𝑄 𝑇) (𝑃 𝑆)) (𝑅 𝑈) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 (𝑅 𝑈))))
774, 73, 75, 31, 76syl13anc 1370 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑇) (𝑃 𝑆)) (𝑅 𝑈) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 (𝑅 𝑈))))
7871, 77mpd 15 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 (𝑅 𝑈)))
791, 8atbase 37230 . . . . . . . . . . . . 13 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
8011, 79syl 17 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 ∈ (Base‘𝐾))
811, 2, 7latlej1 18081 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → 𝑃 (𝑃 𝑆))
824, 31, 80, 81syl3anc 1369 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 (𝑃 𝑆))
831, 2, 7, 15, 8atmod1i1 37798 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ (𝑃𝐴 ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) ∧ 𝑃 (𝑃 𝑆)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) = ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
843, 5, 65, 67, 82, 83syl131anc 1381 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) = ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
857, 8hlatjass 37311 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑅𝐴𝑈𝐴)) → ((𝑃 𝑅) 𝑈) = (𝑃 (𝑅 𝑈)))
863, 5, 18, 44, 85syl13anc 1370 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑅) 𝑈) = (𝑃 (𝑅 𝑈)))
877, 8hlatjcom 37309 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑅𝐴) → (𝑃 𝑅) = (𝑅 𝑃))
883, 5, 18, 87syl3anc 1369 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑅) = (𝑅 𝑃))
8988oveq1d 7270 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑅) 𝑈) = ((𝑅 𝑃) 𝑈))
9086, 89eqtr3d 2780 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑅 𝑈)) = ((𝑅 𝑃) 𝑈))
9178, 84, 903brtr3d 5101 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ((𝑅 𝑃) 𝑈))
921, 2, 7latlej2 18082 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑈 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → 𝑆 (𝑈 𝑆))
934, 50, 80, 92syl3anc 1369 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 (𝑈 𝑆))
941, 7latjcl 18072 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾)) → (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))
954, 31, 65, 94syl3anc 1369 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))
961, 15latmcl 18073 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ∈ (Base‘𝐾))
974, 95, 67, 96syl3anc 1369 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ∈ (Base‘𝐾))
981, 7latjcl 18072 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) → ((𝑅 𝑃) 𝑈) ∈ (Base‘𝐾))
994, 43, 50, 98syl3anc 1369 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 𝑃) 𝑈) ∈ (Base‘𝐾))
1001, 2, 15latmlem12 18104 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) 𝑈) ∈ (Base‘𝐾)) ∧ (𝑆 ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾))) → ((((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ((𝑅 𝑃) 𝑈) ∧ 𝑆 (𝑈 𝑆)) → (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆) (((𝑅 𝑃) 𝑈) (𝑈 𝑆))))
1014, 97, 99, 80, 46, 100syl122anc 1377 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ((𝑅 𝑃) 𝑈) ∧ 𝑆 (𝑈 𝑆)) → (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆) (((𝑅 𝑃) 𝑈) (𝑈 𝑆))))
10291, 93, 101mp2and 695 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆) (((𝑅 𝑃) 𝑈) (𝑈 𝑆)))
103 hlol 37302 . . . . . . . . . . 11 (𝐾 ∈ HL → 𝐾 ∈ OL)
1043, 103syl 17 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ OL)
1051, 15latmassOLD 37170 . . . . . . . . . 10 ((𝐾 ∈ OL ∧ ((𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾))) → (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆) = ((𝑃 (𝑄 𝑇)) ((𝑃 𝑆) 𝑆)))
106104, 95, 67, 80, 105syl13anc 1370 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆) = ((𝑃 (𝑄 𝑇)) ((𝑃 𝑆) 𝑆)))
1077, 8hlatjass 37311 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑇𝐴)) → ((𝑃 𝑄) 𝑇) = (𝑃 (𝑄 𝑇)))
1083, 5, 6, 12, 107syl13anc 1370 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) 𝑇) = (𝑃 (𝑄 𝑇)))
109108eqcomd 2744 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑄 𝑇)) = ((𝑃 𝑄) 𝑇))
1101, 2, 7latlej2 18082 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → 𝑆 (𝑃 𝑆))
1114, 31, 80, 110syl3anc 1369 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 (𝑃 𝑆))
1121, 2, 15latleeqm2 18101 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ 𝑆 ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → (𝑆 (𝑃 𝑆) ↔ ((𝑃 𝑆) 𝑆) = 𝑆))
1134, 80, 67, 112syl3anc 1369 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑆 (𝑃 𝑆) ↔ ((𝑃 𝑆) 𝑆) = 𝑆))
114111, 113mpbid 231 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) 𝑆) = 𝑆)
115109, 114oveq12d 7273 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 (𝑄 𝑇)) ((𝑃 𝑆) 𝑆)) = (((𝑃 𝑄) 𝑇) 𝑆))
116106, 115eqtr2d 2779 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) = (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆))
1171, 2, 7latlej1 18081 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑈 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → 𝑈 (𝑈 𝑆))
1184, 50, 80, 117syl3anc 1369 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈 (𝑈 𝑆))
1191, 2, 7, 15, 8atmod4i1 37807 . . . . . . . . 9 ((𝐾 ∈ HL ∧ (𝑈𝐴 ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) ∧ 𝑈 (𝑈 𝑆)) → (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) = (((𝑅 𝑃) 𝑈) (𝑈 𝑆)))
1203, 44, 43, 46, 118, 119syl131anc 1381 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) = (((𝑅 𝑃) 𝑈) (𝑈 𝑆)))
121102, 116, 1203brtr4d 5102 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑅 𝑃) (𝑈 𝑆)) 𝑈))
1221, 15latmcl 18073 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → (((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾))
1234, 39, 80, 122syl3anc 1369 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾))
1241, 2, 7latjlej1 18086 . . . . . . . 8 ((𝐾 ∈ Lat ∧ ((((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾) ∧ (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾))) → ((((𝑃 𝑄) 𝑇) 𝑆) (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) → ((((𝑃 𝑄) 𝑇) 𝑆) 𝑇) ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇)))
1254, 123, 52, 37, 124syl13anc 1370 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑃 𝑄) 𝑇) 𝑆) (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) → ((((𝑃 𝑄) 𝑇) 𝑆) 𝑇) ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇)))
126121, 125mpd 15 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑃 𝑄) 𝑇) 𝑆) 𝑇) ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇))
12763, 126eqbrtrrd 5094 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) (𝑆 𝑇)) ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇))
1281, 2, 4, 17, 41, 54, 59, 127lattrd 18079 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇))
1291, 7latj31 18120 . . . . 5 ((𝐾 ∈ Lat ∧ (((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾))) → ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇) = ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))
1304, 48, 50, 37, 129syl13anc 1370 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇) = ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))
131128, 130breqtrd 5096 . . 3 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))
1321, 7, 8hlatjcl 37308 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑇𝐴𝑈𝐴) → (𝑇 𝑈) ∈ (Base‘𝐾))
1333, 12, 44, 132syl3anc 1369 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑇 𝑈) ∈ (Base‘𝐾))
1341, 7latjcl 18072 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑇 𝑈) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾)) → ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
1354, 133, 48, 134syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
1361, 2, 15latlem12 18099 . . . 4 ((𝐾 ∈ Lat ∧ (((𝑃 𝑄) (𝑆 𝑇)) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))) → ((((𝑃 𝑄) (𝑆 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑄) (𝑆 𝑇)) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆)))) ↔ ((𝑃 𝑄) (𝑆 𝑇)) ((𝑄 𝑅) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))))
1374, 17, 20, 135, 136syl13anc 1370 . . 3 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑃 𝑄) (𝑆 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑄) (𝑆 𝑇)) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆)))) ↔ ((𝑃 𝑄) (𝑆 𝑇)) ((𝑄 𝑅) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))))
13835, 131, 137mpbi2and 708 . 2 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) ((𝑄 𝑅) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆)))))
1391, 2, 15latmle1 18097 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) → ((𝑅 𝑃) (𝑈 𝑆)) (𝑅 𝑃))
1404, 43, 46, 139syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 𝑃) (𝑈 𝑆)) (𝑅 𝑃))
1411, 2, 7latlej2 18082 . . . . . 6 ((𝐾 ∈ Lat ∧ 𝑄 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → 𝑅 (𝑄 𝑅))
1424, 25, 27, 141syl3anc 1369 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅 (𝑄 𝑅))
1431, 2, 7latjle12 18083 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑅 ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾))) → ((𝑅 (𝑄 𝑅) ∧ 𝑃 (𝑄 𝑅)) ↔ (𝑅 𝑃) (𝑄 𝑅)))
1444, 27, 31, 20, 143syl13anc 1370 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 (𝑄 𝑅) ∧ 𝑃 (𝑄 𝑅)) ↔ (𝑅 𝑃) (𝑄 𝑅)))
145142, 23, 144mpbi2and 708 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑃) (𝑄 𝑅))
1461, 2, 4, 48, 43, 20, 140, 145lattrd 18079 . . 3 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 𝑃) (𝑈 𝑆)) (𝑄 𝑅))
1471, 2, 7, 15, 8llnmod2i2 37804 . . 3 (((𝐾 ∈ HL ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾)) ∧ (𝑇𝐴𝑈𝐴) ∧ ((𝑅 𝑃) (𝑈 𝑆)) (𝑄 𝑅)) → (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))) = ((𝑄 𝑅) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆)))))
1483, 20, 48, 12, 44, 146, 147syl321anc 1390 . 2 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))) = ((𝑄 𝑅) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆)))))
149138, 148breqtrrd 5098 1 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395  w3a 1085   = wceq 1539  wcel 2108   class class class wbr 5070  cfv 6418  (class class class)co 7255  Basecbs 16840  lecple 16895  joincjn 17944  meetcmee 17945  Latclat 18064  OLcol 37115  Atomscatm 37204  HLchlt 37291
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-reu 3070  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-op 4565  df-uni 4837  df-iun 4923  df-iin 4924  df-br 5071  df-opab 5133  df-mpt 5154  df-id 5480  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-1st 7804  df-2nd 7805  df-proset 17928  df-poset 17946  df-plt 17963  df-lub 17979  df-glb 17980  df-join 17981  df-meet 17982  df-p0 18058  df-lat 18065  df-clat 18132  df-oposet 37117  df-ol 37119  df-oml 37120  df-covers 37207  df-ats 37208  df-atl 37239  df-cvlat 37263  df-hlat 37292  df-psubsp 37444  df-pmap 37445  df-padd 37737
This theorem is referenced by:  dalawlem13  37824
  Copyright terms: Public domain W3C validator