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

Theorem dalawlem6 39344
Description: Lemma for dalaw 39354. First piece of dalawlem8 39346. (Contributed by NM, 6-Oct-2012.)
Hypotheses
Ref Expression
dalawlem.l = (le‘𝐾)
dalawlem.j = (join‘𝐾)
dalawlem.m = (meet‘𝐾)
dalawlem.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
dalawlem6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))))

Proof of Theorem dalawlem6
StepHypRef Expression
1 eqid 2728 . 2 (Base‘𝐾) = (Base‘𝐾)
2 dalawlem.l . 2 = (le‘𝐾)
3 simp11 1201 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ HL)
43hllatd 38831 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ Lat)
5 simp21 1204 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃𝐴)
6 simp22 1205 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑄𝐴)
7 dalawlem.j . . . . . 6 = (join‘𝐾)
8 dalawlem.a . . . . . 6 𝐴 = (Atoms‘𝐾)
91, 7, 8hlatjcl 38834 . . . . 5 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
103, 5, 6, 9syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑄) ∈ (Base‘𝐾))
11 simp32 1208 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇𝐴)
121, 8atbase 38756 . . . . 5 (𝑇𝐴𝑇 ∈ (Base‘𝐾))
1311, 12syl 17 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇 ∈ (Base‘𝐾))
141, 7latjcl 18425 . . . 4 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾))
154, 10, 13, 14syl3anc 1369 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾))
16 simp31 1207 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆𝐴)
171, 8atbase 38756 . . . 4 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
1816, 17syl 17 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 ∈ (Base‘𝐾))
19 dalawlem.m . . . 4 = (meet‘𝐾)
201, 19latmcl 18426 . . 3 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → (((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾))
214, 15, 18, 20syl3anc 1369 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾))
22 simp23 1206 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅𝐴)
231, 7, 8hlatjcl 38834 . . . . 5 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑅𝐴) → (𝑄 𝑅) ∈ (Base‘𝐾))
243, 6, 22, 23syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑄 𝑅) ∈ (Base‘𝐾))
25 simp33 1209 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈𝐴)
261, 8atbase 38756 . . . . 5 (𝑈𝐴𝑈 ∈ (Base‘𝐾))
2725, 26syl 17 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈 ∈ (Base‘𝐾))
281, 19latmcl 18426 . . . 4 ((𝐾 ∈ Lat ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) → ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾))
294, 24, 27, 28syl3anc 1369 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾))
301, 7, 8hlatjcl 38834 . . . . 5 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑃𝐴) → (𝑅 𝑃) ∈ (Base‘𝐾))
313, 22, 5, 30syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑃) ∈ (Base‘𝐾))
321, 7, 8hlatjcl 38834 . . . . 5 ((𝐾 ∈ HL ∧ 𝑈𝐴𝑆𝐴) → (𝑈 𝑆) ∈ (Base‘𝐾))
333, 25, 16, 32syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑈 𝑆) ∈ (Base‘𝐾))
341, 19latmcl 18426 . . . 4 ((𝐾 ∈ Lat ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) → ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))
354, 31, 33, 34syl3anc 1369 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))
361, 7latjcl 18425 . . 3 ((𝐾 ∈ Lat ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
374, 29, 35, 36syl3anc 1369 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
381, 7, 8hlatjcl 38834 . . . . 5 ((𝐾 ∈ HL ∧ 𝑇𝐴𝑈𝐴) → (𝑇 𝑈) ∈ (Base‘𝐾))
393, 11, 25, 38syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑇 𝑈) ∈ (Base‘𝐾))
401, 19latmcl 18426 . . . 4 ((𝐾 ∈ Lat ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑇 𝑈) ∈ (Base‘𝐾)) → ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾))
414, 24, 39, 40syl3anc 1369 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾))
421, 7latjcl 18425 . . 3 ((𝐾 ∈ Lat ∧ ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾)) → (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
434, 41, 35, 42syl3anc 1369 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
441, 8atbase 38756 . . . . . . . 8 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
455, 44syl 17 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 ∈ (Base‘𝐾))
461, 7, 8hlatjcl 38834 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → (𝑃 𝑆) ∈ (Base‘𝐾))
473, 5, 16, 46syl3anc 1369 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑆) ∈ (Base‘𝐾))
481, 7, 8hlatjcl 38834 . . . . . . . . . 10 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑇𝐴) → (𝑄 𝑇) ∈ (Base‘𝐾))
493, 6, 11, 48syl3anc 1369 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑄 𝑇) ∈ (Base‘𝐾))
501, 19latmcl 18426 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾)) → ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾))
514, 24, 49, 50syl3anc 1369 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾))
521, 19latmcl 18426 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
534, 47, 51, 52syl3anc 1369 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
541, 7latjcl 18425 . . . . . . 7 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) ∈ (Base‘𝐾))
554, 45, 53, 54syl3anc 1369 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) ∈ (Base‘𝐾))
561, 8atbase 38756 . . . . . . . . 9 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
5722, 56syl 17 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅 ∈ (Base‘𝐾))
581, 7latjcl 18425 . . . . . . . 8 ((𝐾 ∈ Lat ∧ 𝑅 ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾)) → (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾))
594, 57, 29, 58syl3anc 1369 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾))
601, 7latjcl 18425 . . . . . . 7 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾)) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) ∈ (Base‘𝐾))
614, 45, 59, 60syl3anc 1369 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) ∈ (Base‘𝐾))
621, 2, 7, 19latmlej22 18467 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝑆 ∈ (Base‘𝐾) ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆))
634, 18, 15, 45, 62syl13anc 1370 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆))
641, 19latmcl 18426 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾))
654, 49, 47, 64syl3anc 1369 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾))
661, 7latjcl 18425 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) ∈ (Base‘𝐾))
674, 45, 65, 66syl3anc 1369 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) ∈ (Base‘𝐾))
681, 7latjcl 18425 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾)) → (𝑃 ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
694, 45, 51, 68syl3anc 1369 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
702, 7, 8hlatlej2 38843 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → 𝑆 (𝑃 𝑆))
713, 5, 16, 70syl3anc 1369 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 (𝑃 𝑆))
721, 7latjcl 18425 . . . . . . . . . . . . 13 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾)) → (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))
734, 45, 49, 72syl3anc 1369 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))
741, 2, 19latmlem2 18456 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ (𝑆 ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))) → (𝑆 (𝑃 𝑆) → ((𝑃 (𝑄 𝑇)) 𝑆) ((𝑃 (𝑄 𝑇)) (𝑃 𝑆))))
754, 18, 47, 73, 74syl13anc 1370 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑆 (𝑃 𝑆) → ((𝑃 (𝑄 𝑇)) 𝑆) ((𝑃 (𝑄 𝑇)) (𝑃 𝑆))))
7671, 75mpd 15 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 (𝑄 𝑇)) 𝑆) ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
777, 8hlatjass 38837 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑇𝐴)) → ((𝑃 𝑄) 𝑇) = (𝑃 (𝑄 𝑇)))
783, 5, 6, 11, 77syl13anc 1370 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) 𝑇) = (𝑃 (𝑄 𝑇)))
7978oveq1d 7430 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) = ((𝑃 (𝑄 𝑇)) 𝑆))
802, 7, 8hlatlej1 38842 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → 𝑃 (𝑃 𝑆))
813, 5, 16, 80syl3anc 1369 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 (𝑃 𝑆))
821, 2, 7, 19, 8atmod1i1 39325 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ (𝑃𝐴 ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) ∧ 𝑃 (𝑃 𝑆)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) = ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
833, 5, 49, 47, 81, 82syl131anc 1381 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) = ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
8476, 79, 833brtr4d 5175 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑇) (𝑃 𝑆))))
851, 19latmcom 18449 . . . . . . . . . . . . 13 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) = ((𝑃 𝑆) (𝑄 𝑇)))
864, 49, 47, 85syl3anc 1369 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) = ((𝑃 𝑆) (𝑄 𝑇)))
87 simp12 1202 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅))
8886, 87eqbrtrd 5165 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑅))
891, 2, 19latmle1 18450 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇))
904, 49, 47, 89syl3anc 1369 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇))
911, 2, 19latlem12 18452 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ (((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾))) → ((((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑅) ∧ ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇)) ↔ ((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇))))
924, 65, 24, 49, 91syl13anc 1370 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑅) ∧ ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇)) ↔ ((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇))))
9388, 90, 92mpbi2and 711 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇)))
941, 2, 7latjlej2 18440 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → (((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
954, 65, 51, 45, 94syl13anc 1370 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
9693, 95mpd 15 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))
971, 2, 4, 21, 67, 69, 84, 96lattrd 18432 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))
981, 2, 19latlem12 18452 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ ((((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑃 ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))) → (((((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))))
994, 21, 47, 69, 98syl13anc 1370 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))))
10063, 97, 99mpbi2and 711 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
1011, 2, 7, 19, 8atmod3i1 39332 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑃𝐴 ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾)) ∧ 𝑃 (𝑃 𝑆)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) = ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
1023, 5, 47, 51, 81, 101syl131anc 1381 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) = ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
103100, 102breqtrrd 5171 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))))
104 simp13 1203 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈))
1051, 19latmcl 18426 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾)) → ((𝑃 𝑆) (𝑄 𝑇)) ∈ (Base‘𝐾))
1064, 47, 49, 105syl3anc 1369 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) (𝑄 𝑇)) ∈ (Base‘𝐾))
1071, 7, 8hlatjcl 38834 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑈𝐴) → (𝑅 𝑈) ∈ (Base‘𝐾))
1083, 22, 25, 107syl3anc 1369 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑈) ∈ (Base‘𝐾))
1091, 2, 19latmlem2 18456 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ (((𝑃 𝑆) (𝑄 𝑇)) ∈ (Base‘𝐾) ∧ (𝑅 𝑈) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾))) → (((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈) → ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))) ((𝑄 𝑅) (𝑅 𝑈))))
1104, 106, 108, 24, 109syl13anc 1370 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈) → ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))) ((𝑄 𝑅) (𝑅 𝑈))))
111104, 110mpd 15 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))) ((𝑄 𝑅) (𝑅 𝑈)))
112 hlol 38828 . . . . . . . . . 10 (𝐾 ∈ HL → 𝐾 ∈ OL)
1133, 112syl 17 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ OL)
1141, 19latm12 38697 . . . . . . . . 9 ((𝐾 ∈ OL ∧ ((𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾))) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) = ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))))
115113, 47, 24, 49, 114syl13anc 1370 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) = ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))))
1162, 7, 8hlatlej2 38843 . . . . . . . . . 10 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑅𝐴) → 𝑅 (𝑄 𝑅))
1173, 6, 22, 116syl3anc 1369 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅 (𝑄 𝑅))
1181, 2, 7, 19, 8atmod3i1 39332 . . . . . . . . 9 ((𝐾 ∈ HL ∧ (𝑅𝐴 ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) ∧ 𝑅 (𝑄 𝑅)) → (𝑅 ((𝑄 𝑅) 𝑈)) = ((𝑄 𝑅) (𝑅 𝑈)))
1193, 22, 24, 27, 117, 118syl131anc 1381 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 ((𝑄 𝑅) 𝑈)) = ((𝑄 𝑅) (𝑅 𝑈)))
120111, 115, 1193brtr4d 5175 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) (𝑅 ((𝑄 𝑅) 𝑈)))
1211, 2, 7latjlej2 18440 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾) ∧ (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → (((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) (𝑅 ((𝑄 𝑅) 𝑈)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈)))))
1224, 53, 59, 45, 121syl13anc 1370 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) (𝑅 ((𝑄 𝑅) 𝑈)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈)))))
123120, 122mpd 15 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))))
1241, 2, 4, 21, 55, 61, 103, 123lattrd 18432 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))))
1251, 7latj13 18472 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑃 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾))) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) = (((𝑄 𝑅) 𝑈) (𝑅 𝑃)))
1264, 45, 57, 29, 125syl13anc 1370 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) = (((𝑄 𝑅) 𝑈) (𝑅 𝑃)))
127124, 126breqtrd 5169 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) (𝑅 𝑃)))
1281, 2, 7, 19latmlej22 18467 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑆 ∈ (Base‘𝐾) ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾))) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆))
1294, 18, 15, 27, 128syl13anc 1370 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆))
1301, 7latjcl 18425 . . . . . 6 ((𝐾 ∈ Lat ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾) ∧ (𝑅 𝑃) ∈ (Base‘𝐾)) → (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∈ (Base‘𝐾))
1314, 29, 31, 130syl3anc 1369 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∈ (Base‘𝐾))
1321, 2, 19latlem12 18452 . . . . 5 ((𝐾 ∈ Lat ∧ ((((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾) ∧ (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾))) → (((((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆)) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆))))
1334, 21, 131, 33, 132syl13anc 1370 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆)) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆))))
134127, 129, 133mpbi2and 711 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆)))
1351, 2, 7, 19latmlej21 18466 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑈 ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾))) → ((𝑄 𝑅) 𝑈) (𝑈 𝑆))
1364, 27, 24, 18, 135syl13anc 1370 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) 𝑈) (𝑈 𝑆))
1371, 2, 7, 19, 8atmod1i1m 39326 . . . 4 (((𝐾 ∈ HL ∧ 𝑈𝐴) ∧ ((𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) ∧ ((𝑄 𝑅) 𝑈) (𝑈 𝑆)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) = ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆)))
1383, 25, 24, 31, 33, 136, 137syl231anc 1388 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) = ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆)))
139134, 138breqtrrd 5171 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))
1402, 7, 8hlatlej2 38843 . . . . 5 ((𝐾 ∈ HL ∧ 𝑇𝐴𝑈𝐴) → 𝑈 (𝑇 𝑈))
1413, 11, 25, 140syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈 (𝑇 𝑈))
1421, 2, 19latmlem2 18456 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑈 ∈ (Base‘𝐾) ∧ (𝑇 𝑈) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾))) → (𝑈 (𝑇 𝑈) → ((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈))))
1434, 27, 39, 24, 142syl13anc 1370 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑈 (𝑇 𝑈) → ((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈))))
144141, 143mpd 15 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈)))
1451, 2, 7latjlej1 18439 . . . 4 ((𝐾 ∈ Lat ∧ (((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))) → (((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆)))))
1464, 29, 41, 35, 145syl13anc 1370 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆)))))
147144, 146mpd 15 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))))
1481, 2, 4, 21, 37, 43, 139, 147lattrd 18432 1 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395  w3a 1085   = wceq 1534  wcel 2099   class class class wbr 5143  cfv 6543  (class class class)co 7415  Basecbs 17174  lecple 17234  joincjn 18297  meetcmee 18298  Latclat 18417  OLcol 38641  Atomscatm 38730  HLchlt 38817
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2167  ax-ext 2699  ax-rep 5280  ax-sep 5294  ax-nul 5301  ax-pow 5360  ax-pr 5424  ax-un 7735
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 847  df-3an 1087  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2530  df-eu 2559  df-clab 2706  df-cleq 2720  df-clel 2806  df-nfc 2881  df-ne 2937  df-ral 3058  df-rex 3067  df-rmo 3372  df-reu 3373  df-rab 3429  df-v 3472  df-sbc 3776  df-csb 3891  df-dif 3948  df-un 3950  df-in 3952  df-ss 3962  df-nul 4320  df-if 4526  df-pw 4601  df-sn 4626  df-pr 4628  df-op 4632  df-uni 4905  df-iun 4994  df-iin 4995  df-br 5144  df-opab 5206  df-mpt 5227  df-id 5571  df-xp 5679  df-rel 5680  df-cnv 5681  df-co 5682  df-dm 5683  df-rn 5684  df-res 5685  df-ima 5686  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 7371  df-ov 7418  df-oprab 7419  df-mpo 7420  df-1st 7988  df-2nd 7989  df-proset 18281  df-poset 18299  df-plt 18316  df-lub 18332  df-glb 18333  df-join 18334  df-meet 18335  df-p0 18411  df-lat 18418  df-clat 18485  df-oposet 38643  df-ol 38645  df-oml 38646  df-covers 38733  df-ats 38734  df-atl 38765  df-cvlat 38789  df-hlat 38818  df-psubsp 38971  df-pmap 38972  df-padd 39264
This theorem is referenced by:  dalawlem8  39346
  Copyright terms: Public domain W3C validator