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 40506
Description: Lemma for dalaw 40511. First part of dalawlem13 40508. (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 2763 . . . 4 (Base‘𝐾) = (Base‘𝐾)
2 dalawlem.l . . . 4 = (le‘𝐾)
3 simp11 1218 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ HL)
43hllatd 39989 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ Lat)
5 simp21 1221 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃𝐴)
6 simp22 1222 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑄𝐴)
7 dalawlem.j . . . . . . 7 = (join‘𝐾)
8 dalawlem.a . . . . . . 7 𝐴 = (Atoms‘𝐾)
91, 7, 8hlatjcl 39992 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
103, 5, 6, 9syl3anc 1391 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑄) ∈ (Base‘𝐾))
11 simp31 1224 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆𝐴)
12 simp32 1225 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇𝐴)
131, 7, 8hlatjcl 39992 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑆𝐴𝑇𝐴) → (𝑆 𝑇) ∈ (Base‘𝐾))
143, 11, 12, 13syl3anc 1391 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑆 𝑇) ∈ (Base‘𝐾))
15 dalawlem.m . . . . . 6 = (meet‘𝐾)
161, 15latmcl 18473 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ (𝑆 𝑇) ∈ (Base‘𝐾)) → ((𝑃 𝑄) (𝑆 𝑇)) ∈ (Base‘𝐾))
174, 10, 14, 16syl3anc 1391 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) ∈ (Base‘𝐾))
18 simp23 1223 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅𝐴)
191, 7, 8hlatjcl 39992 . . . . 5 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑅𝐴) → (𝑄 𝑅) ∈ (Base‘𝐾))
203, 6, 18, 19syl3anc 1391 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑄 𝑅) ∈ (Base‘𝐾))
211, 2, 15latmle1 18497 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ (𝑆 𝑇) ∈ (Base‘𝐾)) → ((𝑃 𝑄) (𝑆 𝑇)) (𝑃 𝑄))
224, 10, 14, 21syl3anc 1391 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) (𝑃 𝑄))
23 simp12 1219 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 (𝑄 𝑅))
241, 8atbase 39914 . . . . . . 7 (𝑄𝐴𝑄 ∈ (Base‘𝐾))
256, 24syl 17 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑄 ∈ (Base‘𝐾))
261, 8atbase 39914 . . . . . . 7 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
2718, 26syl 17 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅 ∈ (Base‘𝐾))
281, 2, 7latlej1 18481 . . . . . 6 ((𝐾 ∈ Lat ∧ 𝑄 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → 𝑄 (𝑄 𝑅))
294, 25, 27, 28syl3anc 1391 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑄 (𝑄 𝑅))
301, 8atbase 39914 . . . . . . 7 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
315, 30syl 17 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 ∈ (Base‘𝐾))
321, 2, 7latjle12 18483 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑃 ∈ (Base‘𝐾) ∧ 𝑄 ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾))) → ((𝑃 (𝑄 𝑅) ∧ 𝑄 (𝑄 𝑅)) ↔ (𝑃 𝑄) (𝑄 𝑅)))
334, 31, 25, 20, 32syl13anc 1392 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 (𝑄 𝑅) ∧ 𝑄 (𝑄 𝑅)) ↔ (𝑃 𝑄) (𝑄 𝑅)))
3423, 29, 33mpbi2and 722 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑄) (𝑄 𝑅))
351, 2, 4, 17, 10, 20, 22, 34lattrd 18479 . . 3 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) (𝑄 𝑅))
361, 8atbase 39914 . . . . . . . 8 (𝑇𝐴𝑇 ∈ (Base‘𝐾))
3712, 36syl 17 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇 ∈ (Base‘𝐾))
381, 7latjcl 18472 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾))
394, 10, 37, 38syl3anc 1391 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾))
401, 15latmcl 18473 . . . . . 6 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ (𝑆 𝑇) ∈ (Base‘𝐾)) → (((𝑃 𝑄) 𝑇) (𝑆 𝑇)) ∈ (Base‘𝐾))
414, 39, 14, 40syl3anc 1391 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) (𝑆 𝑇)) ∈ (Base‘𝐾))
421, 7, 8hlatjcl 39992 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑃𝐴) → (𝑅 𝑃) ∈ (Base‘𝐾))
433, 18, 5, 42syl3anc 1391 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑃) ∈ (Base‘𝐾))
44 simp33 1226 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈𝐴)
451, 7, 8hlatjcl 39992 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑈𝐴𝑆𝐴) → (𝑈 𝑆) ∈ (Base‘𝐾))
463, 44, 11, 45syl3anc 1391 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑈 𝑆) ∈ (Base‘𝐾))
471, 15latmcl 18473 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) → ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))
484, 43, 46, 47syl3anc 1391 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))
491, 8atbase 39914 . . . . . . . 8 (𝑈𝐴𝑈 ∈ (Base‘𝐾))
5044, 49syl 17 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈 ∈ (Base‘𝐾))
511, 7latjcl 18472 . . . . . . 7 ((𝐾 ∈ Lat ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) → (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) ∈ (Base‘𝐾))
524, 48, 50, 51syl3anc 1391 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) ∈ (Base‘𝐾))
531, 7latjcl 18472 . . . . . 6 ((𝐾 ∈ Lat ∧ (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇) ∈ (Base‘𝐾))
544, 52, 37, 53syl3anc 1391 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇) ∈ (Base‘𝐾))
551, 2, 7latlej1 18481 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → (𝑃 𝑄) ((𝑃 𝑄) 𝑇))
564, 10, 37, 55syl3anc 1391 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑄) ((𝑃 𝑄) 𝑇))
571, 2, 15latmlem1 18502 . . . . . . 7 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) ∈ (Base‘𝐾) ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ (𝑆 𝑇) ∈ (Base‘𝐾))) → ((𝑃 𝑄) ((𝑃 𝑄) 𝑇) → ((𝑃 𝑄) (𝑆 𝑇)) (((𝑃 𝑄) 𝑇) (𝑆 𝑇))))
584, 10, 39, 14, 57syl13anc 1392 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) ((𝑃 𝑄) 𝑇) → ((𝑃 𝑄) (𝑆 𝑇)) (((𝑃 𝑄) 𝑇) (𝑆 𝑇))))
5956, 58mpd 15 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) (((𝑃 𝑄) 𝑇) (𝑆 𝑇)))
601, 2, 7latlej2 18482 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → 𝑇 ((𝑃 𝑄) 𝑇))
614, 10, 37, 60syl3anc 1391 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇 ((𝑃 𝑄) 𝑇))
621, 2, 7, 15, 8atmod2i2 40487 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑆𝐴 ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) ∧ 𝑇 ((𝑃 𝑄) 𝑇)) → ((((𝑃 𝑄) 𝑇) 𝑆) 𝑇) = (((𝑃 𝑄) 𝑇) (𝑆 𝑇)))
633, 11, 39, 37, 61, 62syl131anc 1403 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑃 𝑄) 𝑇) 𝑆) 𝑇) = (((𝑃 𝑄) 𝑇) (𝑆 𝑇)))
641, 7, 8hlatjcl 39992 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑇𝐴) → (𝑄 𝑇) ∈ (Base‘𝐾))
653, 6, 12, 64syl3anc 1391 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑄 𝑇) ∈ (Base‘𝐾))
661, 7, 8hlatjcl 39992 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → (𝑃 𝑆) ∈ (Base‘𝐾))
673, 5, 11, 66syl3anc 1391 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑆) ∈ (Base‘𝐾))
681, 15latmcom 18496 . . . . . . . . . . . . 13 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) = ((𝑃 𝑆) (𝑄 𝑇)))
694, 65, 67, 68syl3anc 1391 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) = ((𝑃 𝑆) (𝑄 𝑇)))
70 simp13 1220 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈))
7169, 70eqbrtrd 5123 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑅 𝑈))
721, 15latmcl 18473 . . . . . . . . . . . . 13 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾))
734, 65, 67, 72syl3anc 1391 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾))
741, 7, 8hlatjcl 39992 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑈𝐴) → (𝑅 𝑈) ∈ (Base‘𝐾))
753, 18, 44, 74syl3anc 1391 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑈) ∈ (Base‘𝐾))
761, 2, 7latjlej2 18487 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ (((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾) ∧ (𝑅 𝑈) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → (((𝑄 𝑇) (𝑃 𝑆)) (𝑅 𝑈) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 (𝑅 𝑈))))
774, 73, 75, 31, 76syl13anc 1392 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑇) (𝑃 𝑆)) (𝑅 𝑈) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 (𝑅 𝑈))))
7871, 77mpd 15 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 (𝑅 𝑈)))
791, 8atbase 39914 . . . . . . . . . . . . 13 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
8011, 79syl 17 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 ∈ (Base‘𝐾))
811, 2, 7latlej1 18481 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → 𝑃 (𝑃 𝑆))
824, 31, 80, 81syl3anc 1391 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 (𝑃 𝑆))
831, 2, 7, 15, 8atmod1i1 40482 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ (𝑃𝐴 ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) ∧ 𝑃 (𝑃 𝑆)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) = ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
843, 5, 65, 67, 82, 83syl131anc 1403 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) = ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
857, 8hlatjass 39995 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑅𝐴𝑈𝐴)) → ((𝑃 𝑅) 𝑈) = (𝑃 (𝑅 𝑈)))
863, 5, 18, 44, 85syl13anc 1392 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑅) 𝑈) = (𝑃 (𝑅 𝑈)))
877, 8hlatjcom 39993 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑅𝐴) → (𝑃 𝑅) = (𝑅 𝑃))
883, 5, 18, 87syl3anc 1391 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑅) = (𝑅 𝑃))
8988oveq1d 7412 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑅) 𝑈) = ((𝑅 𝑃) 𝑈))
9086, 89eqtr3d 2800 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑅 𝑈)) = ((𝑅 𝑃) 𝑈))
9178, 84, 903brtr3d 5132 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ((𝑅 𝑃) 𝑈))
921, 2, 7latlej2 18482 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑈 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → 𝑆 (𝑈 𝑆))
934, 50, 80, 92syl3anc 1391 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 (𝑈 𝑆))
941, 7latjcl 18472 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾)) → (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))
954, 31, 65, 94syl3anc 1391 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))
961, 15latmcl 18473 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ∈ (Base‘𝐾))
974, 95, 67, 96syl3anc 1391 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ∈ (Base‘𝐾))
981, 7latjcl 18472 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) → ((𝑅 𝑃) 𝑈) ∈ (Base‘𝐾))
994, 43, 50, 98syl3anc 1391 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 𝑃) 𝑈) ∈ (Base‘𝐾))
1001, 2, 15latmlem12 18504 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) 𝑈) ∈ (Base‘𝐾)) ∧ (𝑆 ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾))) → ((((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ((𝑅 𝑃) 𝑈) ∧ 𝑆 (𝑈 𝑆)) → (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆) (((𝑅 𝑃) 𝑈) (𝑈 𝑆))))
1014, 97, 99, 80, 46, 100syl122anc 1399 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) ((𝑅 𝑃) 𝑈) ∧ 𝑆 (𝑈 𝑆)) → (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆) (((𝑅 𝑃) 𝑈) (𝑈 𝑆))))
10291, 93, 101mp2and 709 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆) (((𝑅 𝑃) 𝑈) (𝑈 𝑆)))
103 hlol 39986 . . . . . . . . . . 11 (𝐾 ∈ HL → 𝐾 ∈ OL)
1043, 103syl 17 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ OL)
1051, 15latmassOLD 39854 . . . . . . . . . 10 ((𝐾 ∈ OL ∧ ((𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾))) → (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆) = ((𝑃 (𝑄 𝑇)) ((𝑃 𝑆) 𝑆)))
106104, 95, 67, 80, 105syl13anc 1392 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆) = ((𝑃 (𝑄 𝑇)) ((𝑃 𝑆) 𝑆)))
1077, 8hlatjass 39995 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑇𝐴)) → ((𝑃 𝑄) 𝑇) = (𝑃 (𝑄 𝑇)))
1083, 5, 6, 12, 107syl13anc 1392 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) 𝑇) = (𝑃 (𝑄 𝑇)))
109108eqcomd 2769 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑄 𝑇)) = ((𝑃 𝑄) 𝑇))
1101, 2, 7latlej2 18482 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → 𝑆 (𝑃 𝑆))
1114, 31, 80, 110syl3anc 1391 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 (𝑃 𝑆))
1121, 2, 15latleeqm2 18501 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ 𝑆 ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → (𝑆 (𝑃 𝑆) ↔ ((𝑃 𝑆) 𝑆) = 𝑆))
1134, 80, 67, 112syl3anc 1391 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑆 (𝑃 𝑆) ↔ ((𝑃 𝑆) 𝑆) = 𝑆))
114111, 113mpbid 234 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) 𝑆) = 𝑆)
115109, 114oveq12d 7415 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 (𝑄 𝑇)) ((𝑃 𝑆) 𝑆)) = (((𝑃 𝑄) 𝑇) 𝑆))
116106, 115eqtr2d 2799 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) = (((𝑃 (𝑄 𝑇)) (𝑃 𝑆)) 𝑆))
1171, 2, 7latlej1 18481 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑈 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → 𝑈 (𝑈 𝑆))
1184, 50, 80, 117syl3anc 1391 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈 (𝑈 𝑆))
1191, 2, 7, 15, 8atmod4i1 40491 . . . . . . . . 9 ((𝐾 ∈ HL ∧ (𝑈𝐴 ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) ∧ 𝑈 (𝑈 𝑆)) → (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) = (((𝑅 𝑃) 𝑈) (𝑈 𝑆)))
1203, 44, 43, 46, 118, 119syl131anc 1403 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) = (((𝑅 𝑃) 𝑈) (𝑈 𝑆)))
121102, 116, 1203brtr4d 5133 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑅 𝑃) (𝑈 𝑆)) 𝑈))
1221, 15latmcl 18473 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → (((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾))
1234, 39, 80, 122syl3anc 1391 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾))
1241, 2, 7latjlej1 18486 . . . . . . . 8 ((𝐾 ∈ Lat ∧ ((((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾) ∧ (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾))) → ((((𝑃 𝑄) 𝑇) 𝑆) (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) → ((((𝑃 𝑄) 𝑇) 𝑆) 𝑇) ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇)))
1254, 123, 52, 37, 124syl13anc 1392 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑃 𝑄) 𝑇) 𝑆) (((𝑅 𝑃) (𝑈 𝑆)) 𝑈) → ((((𝑃 𝑄) 𝑇) 𝑆) 𝑇) ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇)))
126121, 125mpd 15 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑃 𝑄) 𝑇) 𝑆) 𝑇) ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇))
12763, 126eqbrtrrd 5125 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) (𝑆 𝑇)) ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇))
1281, 2, 4, 17, 41, 54, 59, 127lattrd 18479 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇))
1291, 7latj31 18520 . . . . 5 ((𝐾 ∈ Lat ∧ (((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾))) → ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇) = ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))
1304, 48, 50, 37, 129syl13anc 1392 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑅 𝑃) (𝑈 𝑆)) 𝑈) 𝑇) = ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))
131128, 130breqtrd 5127 . . 3 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))
1321, 7, 8hlatjcl 39992 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑇𝐴𝑈𝐴) → (𝑇 𝑈) ∈ (Base‘𝐾))
1333, 12, 44, 132syl3anc 1391 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑇 𝑈) ∈ (Base‘𝐾))
1341, 7latjcl 18472 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑇 𝑈) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾)) → ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
1354, 133, 48, 134syl3anc 1391 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
1361, 2, 15latlem12 18499 . . . 4 ((𝐾 ∈ Lat ∧ (((𝑃 𝑄) (𝑆 𝑇)) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))) → ((((𝑃 𝑄) (𝑆 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑄) (𝑆 𝑇)) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆)))) ↔ ((𝑃 𝑄) (𝑆 𝑇)) ((𝑄 𝑅) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))))
1374, 17, 20, 135, 136syl13anc 1392 . . 3 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑃 𝑄) (𝑆 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑄) (𝑆 𝑇)) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆)))) ↔ ((𝑃 𝑄) (𝑆 𝑇)) ((𝑄 𝑅) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))))
13835, 131, 137mpbi2and 722 . 2 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) ((𝑄 𝑅) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆)))))
1391, 2, 15latmle1 18497 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) → ((𝑅 𝑃) (𝑈 𝑆)) (𝑅 𝑃))
1404, 43, 46, 139syl3anc 1391 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 𝑃) (𝑈 𝑆)) (𝑅 𝑃))
1411, 2, 7latlej2 18482 . . . . . 6 ((𝐾 ∈ Lat ∧ 𝑄 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → 𝑅 (𝑄 𝑅))
1424, 25, 27, 141syl3anc 1391 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅 (𝑄 𝑅))
1431, 2, 7latjle12 18483 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑅 ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾))) → ((𝑅 (𝑄 𝑅) ∧ 𝑃 (𝑄 𝑅)) ↔ (𝑅 𝑃) (𝑄 𝑅)))
1444, 27, 31, 20, 143syl13anc 1392 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 (𝑄 𝑅) ∧ 𝑃 (𝑄 𝑅)) ↔ (𝑅 𝑃) (𝑄 𝑅)))
145142, 23, 144mpbi2and 722 . . . 4 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑃) (𝑄 𝑅))
1461, 2, 4, 48, 43, 20, 140, 145lattrd 18479 . . 3 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 𝑃) (𝑈 𝑆)) (𝑄 𝑅))
1471, 2, 7, 15, 8llnmod2i2 40488 . . 3 (((𝐾 ∈ HL ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾)) ∧ (𝑇𝐴𝑈𝐴) ∧ ((𝑅 𝑃) (𝑈 𝑆)) (𝑄 𝑅)) → (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))) = ((𝑄 𝑅) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆)))))
1483, 20, 48, 12, 44, 146, 147syl321anc 1412 . 2 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))) = ((𝑄 𝑅) ((𝑇 𝑈) ((𝑅 𝑃) (𝑈 𝑆)))))
149138, 148breqtrrd 5129 1 (((𝐾 ∈ HL ∧ 𝑃 (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) (𝑆 𝑇)) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 399  w3a 1099   = wceq 1561  wcel 2143   class class class wbr 5101  cfv 6522  (class class class)co 7397  Basecbs 17246  lecple 17294  joincjn 18344  meetcmee 18345  Latclat 18464  OLcol 39799  Atomscatm 39888  HLchlt 39975
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1816  ax-4 1830  ax-5 1931  ax-6 1988  ax-7 2029  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5228  ax-sep 5247  ax-nul 5257  ax-pow 5323  ax-pr 5391  ax-un 7719
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1101  df-tru 1564  df-fal 1574  df-ex 1801  df-nf 1805  df-sb 2092  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3078  df-rex 3088  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3457  df-sbc 3746  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-iun 4952  df-iin 4953  df-br 5102  df-opab 5164  df-mpt 5183  df-id 5543  df-xp 5654  df-rel 5655  df-cnv 5656  df-co 5657  df-dm 5658  df-rn 5659  df-res 5660  df-ima 5661  df-iota 6478  df-fun 6524  df-fn 6525  df-f 6526  df-f1 6527  df-fo 6528  df-f1o 6529  df-fv 6530  df-riota 7354  df-ov 7400  df-oprab 7401  df-mpo 7402  df-1st 7971  df-2nd 7972  df-proset 18327  df-poset 18346  df-plt 18361  df-lub 18377  df-glb 18378  df-join 18379  df-meet 18380  df-p0 18456  df-lat 18465  df-clat 18532  df-oposet 39801  df-ol 39803  df-oml 39804  df-covers 39891  df-ats 39892  df-atl 39923  df-cvlat 39947  df-hlat 39976  df-psubsp 40128  df-pmap 40129  df-padd 40421
This theorem is referenced by:  dalawlem13  40508
  Copyright terms: Public domain W3C validator