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 40500
Description: Lemma for dalaw 40510. First piece of dalawlem8 40502. (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 2762 . 2 (Base‘𝐾) = (Base‘𝐾)
2 dalawlem.l . 2 = (le‘𝐾)
3 simp11 1217 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ HL)
43hllatd 39988 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ Lat)
5 simp21 1220 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃𝐴)
6 simp22 1221 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑄𝐴)
7 dalawlem.j . . . . . 6 = (join‘𝐾)
8 dalawlem.a . . . . . 6 𝐴 = (Atoms‘𝐾)
91, 7, 8hlatjcl 39991 . . . . 5 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
103, 5, 6, 9syl3anc 1390 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑄) ∈ (Base‘𝐾))
11 simp32 1224 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇𝐴)
121, 8atbase 39913 . . . . 5 (𝑇𝐴𝑇 ∈ (Base‘𝐾))
1311, 12syl 17 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇 ∈ (Base‘𝐾))
141, 7latjcl 18471 . . . 4 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾))
154, 10, 13, 14syl3anc 1390 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾))
16 simp31 1223 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆𝐴)
171, 8atbase 39913 . . . 4 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
1816, 17syl 17 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 ∈ (Base‘𝐾))
19 dalawlem.m . . . 4 = (meet‘𝐾)
201, 19latmcl 18472 . . 3 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → (((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾))
214, 15, 18, 20syl3anc 1390 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾))
22 simp23 1222 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅𝐴)
231, 7, 8hlatjcl 39991 . . . . 5 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑅𝐴) → (𝑄 𝑅) ∈ (Base‘𝐾))
243, 6, 22, 23syl3anc 1390 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑄 𝑅) ∈ (Base‘𝐾))
25 simp33 1225 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈𝐴)
261, 8atbase 39913 . . . . 5 (𝑈𝐴𝑈 ∈ (Base‘𝐾))
2725, 26syl 17 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈 ∈ (Base‘𝐾))
281, 19latmcl 18472 . . . 4 ((𝐾 ∈ Lat ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) → ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾))
294, 24, 27, 28syl3anc 1390 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾))
301, 7, 8hlatjcl 39991 . . . . 5 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑃𝐴) → (𝑅 𝑃) ∈ (Base‘𝐾))
313, 22, 5, 30syl3anc 1390 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑃) ∈ (Base‘𝐾))
321, 7, 8hlatjcl 39991 . . . . 5 ((𝐾 ∈ HL ∧ 𝑈𝐴𝑆𝐴) → (𝑈 𝑆) ∈ (Base‘𝐾))
333, 25, 16, 32syl3anc 1390 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑈 𝑆) ∈ (Base‘𝐾))
341, 19latmcl 18472 . . . 4 ((𝐾 ∈ Lat ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) → ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))
354, 31, 33, 34syl3anc 1390 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))
361, 7latjcl 18471 . . 3 ((𝐾 ∈ Lat ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
374, 29, 35, 36syl3anc 1390 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
381, 7, 8hlatjcl 39991 . . . . 5 ((𝐾 ∈ HL ∧ 𝑇𝐴𝑈𝐴) → (𝑇 𝑈) ∈ (Base‘𝐾))
393, 11, 25, 38syl3anc 1390 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑇 𝑈) ∈ (Base‘𝐾))
401, 19latmcl 18472 . . . 4 ((𝐾 ∈ Lat ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑇 𝑈) ∈ (Base‘𝐾)) → ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾))
414, 24, 39, 40syl3anc 1390 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾))
421, 7latjcl 18471 . . 3 ((𝐾 ∈ Lat ∧ ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾)) → (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
434, 41, 35, 42syl3anc 1390 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
441, 8atbase 39913 . . . . . . . 8 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
455, 44syl 17 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 ∈ (Base‘𝐾))
461, 7, 8hlatjcl 39991 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → (𝑃 𝑆) ∈ (Base‘𝐾))
473, 5, 16, 46syl3anc 1390 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑆) ∈ (Base‘𝐾))
481, 7, 8hlatjcl 39991 . . . . . . . . . 10 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑇𝐴) → (𝑄 𝑇) ∈ (Base‘𝐾))
493, 6, 11, 48syl3anc 1390 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑄 𝑇) ∈ (Base‘𝐾))
501, 19latmcl 18472 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾)) → ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾))
514, 24, 49, 50syl3anc 1390 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾))
521, 19latmcl 18472 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
534, 47, 51, 52syl3anc 1390 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
541, 7latjcl 18471 . . . . . . 7 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) ∈ (Base‘𝐾))
554, 45, 53, 54syl3anc 1390 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) ∈ (Base‘𝐾))
561, 8atbase 39913 . . . . . . . . 9 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
5722, 56syl 17 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅 ∈ (Base‘𝐾))
581, 7latjcl 18471 . . . . . . . 8 ((𝐾 ∈ Lat ∧ 𝑅 ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾)) → (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾))
594, 57, 29, 58syl3anc 1390 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾))
601, 7latjcl 18471 . . . . . . 7 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾)) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) ∈ (Base‘𝐾))
614, 45, 59, 60syl3anc 1390 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) ∈ (Base‘𝐾))
621, 2, 7, 19latmlej22 18513 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝑆 ∈ (Base‘𝐾) ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆))
634, 18, 15, 45, 62syl13anc 1391 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆))
641, 19latmcl 18472 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾))
654, 49, 47, 64syl3anc 1390 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾))
661, 7latjcl 18471 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) ∈ (Base‘𝐾))
674, 45, 65, 66syl3anc 1390 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) ∈ (Base‘𝐾))
681, 7latjcl 18471 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾)) → (𝑃 ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
694, 45, 51, 68syl3anc 1390 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
702, 7, 8hlatlej2 40000 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → 𝑆 (𝑃 𝑆))
713, 5, 16, 70syl3anc 1390 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 (𝑃 𝑆))
721, 7latjcl 18471 . . . . . . . . . . . . 13 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾)) → (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))
734, 45, 49, 72syl3anc 1390 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))
741, 2, 19latmlem2 18502 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ (𝑆 ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))) → (𝑆 (𝑃 𝑆) → ((𝑃 (𝑄 𝑇)) 𝑆) ((𝑃 (𝑄 𝑇)) (𝑃 𝑆))))
754, 18, 47, 73, 74syl13anc 1391 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑆 (𝑃 𝑆) → ((𝑃 (𝑄 𝑇)) 𝑆) ((𝑃 (𝑄 𝑇)) (𝑃 𝑆))))
7671, 75mpd 15 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 (𝑄 𝑇)) 𝑆) ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
777, 8hlatjass 39994 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑇𝐴)) → ((𝑃 𝑄) 𝑇) = (𝑃 (𝑄 𝑇)))
783, 5, 6, 11, 77syl13anc 1391 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) 𝑇) = (𝑃 (𝑄 𝑇)))
7978oveq1d 7411 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) = ((𝑃 (𝑄 𝑇)) 𝑆))
802, 7, 8hlatlej1 39999 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → 𝑃 (𝑃 𝑆))
813, 5, 16, 80syl3anc 1390 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 (𝑃 𝑆))
821, 2, 7, 19, 8atmod1i1 40481 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ (𝑃𝐴 ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) ∧ 𝑃 (𝑃 𝑆)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) = ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
833, 5, 49, 47, 81, 82syl131anc 1402 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) = ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
8476, 79, 833brtr4d 5132 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑇) (𝑃 𝑆))))
851, 19latmcom 18495 . . . . . . . . . . . . 13 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) = ((𝑃 𝑆) (𝑄 𝑇)))
864, 49, 47, 85syl3anc 1390 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) = ((𝑃 𝑆) (𝑄 𝑇)))
87 simp12 1218 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅))
8886, 87eqbrtrd 5122 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑅))
891, 2, 19latmle1 18496 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇))
904, 49, 47, 89syl3anc 1390 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇))
911, 2, 19latlem12 18498 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ (((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾))) → ((((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑅) ∧ ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇)) ↔ ((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇))))
924, 65, 24, 49, 91syl13anc 1391 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑅) ∧ ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇)) ↔ ((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇))))
9388, 90, 92mpbi2and 722 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇)))
941, 2, 7latjlej2 18486 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → (((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
954, 65, 51, 45, 94syl13anc 1391 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
9693, 95mpd 15 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))
971, 2, 4, 21, 67, 69, 84, 96lattrd 18478 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))
981, 2, 19latlem12 18498 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ ((((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑃 ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))) → (((((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))))
994, 21, 47, 69, 98syl13anc 1391 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))))
10063, 97, 99mpbi2and 722 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
1011, 2, 7, 19, 8atmod3i1 40488 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑃𝐴 ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾)) ∧ 𝑃 (𝑃 𝑆)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) = ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
1023, 5, 47, 51, 81, 101syl131anc 1402 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) = ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
103100, 102breqtrrd 5128 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))))
104 simp13 1219 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈))
1051, 19latmcl 18472 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾)) → ((𝑃 𝑆) (𝑄 𝑇)) ∈ (Base‘𝐾))
1064, 47, 49, 105syl3anc 1390 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) (𝑄 𝑇)) ∈ (Base‘𝐾))
1071, 7, 8hlatjcl 39991 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑈𝐴) → (𝑅 𝑈) ∈ (Base‘𝐾))
1083, 22, 25, 107syl3anc 1390 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑈) ∈ (Base‘𝐾))
1091, 2, 19latmlem2 18502 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ (((𝑃 𝑆) (𝑄 𝑇)) ∈ (Base‘𝐾) ∧ (𝑅 𝑈) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾))) → (((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈) → ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))) ((𝑄 𝑅) (𝑅 𝑈))))
1104, 106, 108, 24, 109syl13anc 1391 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈) → ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))) ((𝑄 𝑅) (𝑅 𝑈))))
111104, 110mpd 15 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))) ((𝑄 𝑅) (𝑅 𝑈)))
112 hlol 39985 . . . . . . . . . 10 (𝐾 ∈ HL → 𝐾 ∈ OL)
1133, 112syl 17 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ OL)
1141, 19latm12 39854 . . . . . . . . 9 ((𝐾 ∈ OL ∧ ((𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾))) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) = ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))))
115113, 47, 24, 49, 114syl13anc 1391 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) = ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))))
1162, 7, 8hlatlej2 40000 . . . . . . . . . 10 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑅𝐴) → 𝑅 (𝑄 𝑅))
1173, 6, 22, 116syl3anc 1390 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅 (𝑄 𝑅))
1181, 2, 7, 19, 8atmod3i1 40488 . . . . . . . . 9 ((𝐾 ∈ HL ∧ (𝑅𝐴 ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) ∧ 𝑅 (𝑄 𝑅)) → (𝑅 ((𝑄 𝑅) 𝑈)) = ((𝑄 𝑅) (𝑅 𝑈)))
1193, 22, 24, 27, 117, 118syl131anc 1402 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 ((𝑄 𝑅) 𝑈)) = ((𝑄 𝑅) (𝑅 𝑈)))
120111, 115, 1193brtr4d 5132 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) (𝑅 ((𝑄 𝑅) 𝑈)))
1211, 2, 7latjlej2 18486 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾) ∧ (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → (((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) (𝑅 ((𝑄 𝑅) 𝑈)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈)))))
1224, 53, 59, 45, 121syl13anc 1391 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) (𝑅 ((𝑄 𝑅) 𝑈)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈)))))
123120, 122mpd 15 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))))
1241, 2, 4, 21, 55, 61, 103, 123lattrd 18478 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))))
1251, 7latj13 18518 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑃 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾))) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) = (((𝑄 𝑅) 𝑈) (𝑅 𝑃)))
1264, 45, 57, 29, 125syl13anc 1391 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) = (((𝑄 𝑅) 𝑈) (𝑅 𝑃)))
127124, 126breqtrd 5126 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) (𝑅 𝑃)))
1281, 2, 7, 19latmlej22 18513 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑆 ∈ (Base‘𝐾) ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾))) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆))
1294, 18, 15, 27, 128syl13anc 1391 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆))
1301, 7latjcl 18471 . . . . . 6 ((𝐾 ∈ Lat ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾) ∧ (𝑅 𝑃) ∈ (Base‘𝐾)) → (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∈ (Base‘𝐾))
1314, 29, 31, 130syl3anc 1390 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∈ (Base‘𝐾))
1321, 2, 19latlem12 18498 . . . . 5 ((𝐾 ∈ Lat ∧ ((((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾) ∧ (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾))) → (((((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆)) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆))))
1334, 21, 131, 33, 132syl13anc 1391 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆)) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆))))
134127, 129, 133mpbi2and 722 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆)))
1351, 2, 7, 19latmlej21 18512 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑈 ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾))) → ((𝑄 𝑅) 𝑈) (𝑈 𝑆))
1364, 27, 24, 18, 135syl13anc 1391 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) 𝑈) (𝑈 𝑆))
1371, 2, 7, 19, 8atmod1i1m 40482 . . . 4 (((𝐾 ∈ HL ∧ 𝑈𝐴) ∧ ((𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) ∧ ((𝑄 𝑅) 𝑈) (𝑈 𝑆)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) = ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆)))
1383, 25, 24, 31, 33, 136, 137syl231anc 1409 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) = ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆)))
139134, 138breqtrrd 5128 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))
1402, 7, 8hlatlej2 40000 . . . . 5 ((𝐾 ∈ HL ∧ 𝑇𝐴𝑈𝐴) → 𝑈 (𝑇 𝑈))
1413, 11, 25, 140syl3anc 1390 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈 (𝑇 𝑈))
1421, 2, 19latmlem2 18502 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑈 ∈ (Base‘𝐾) ∧ (𝑇 𝑈) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾))) → (𝑈 (𝑇 𝑈) → ((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈))))
1434, 27, 39, 24, 142syl13anc 1391 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑈 (𝑇 𝑈) → ((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈))))
144141, 143mpd 15 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈)))
1451, 2, 7latjlej1 18485 . . . 4 ((𝐾 ∈ Lat ∧ (((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))) → (((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆)))))
1464, 29, 41, 35, 145syl13anc 1391 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆)))))
147144, 146mpd 15 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))))
1481, 2, 4, 21, 37, 43, 139, 147lattrd 18478 1 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 399  w3a 1098   = wceq 1560  wcel 2142   class class class wbr 5100  cfv 6521  (class class class)co 7396  Basecbs 17245  lecple 17293  joincjn 18343  meetcmee 18344  Latclat 18463  OLcol 39798  Atomscatm 39887  HLchlt 39974
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pow 5322  ax-pr 5390  ax-un 7718
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3077  df-rex 3087  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-iun 4951  df-iin 4952  df-br 5101  df-opab 5163  df-mpt 5182  df-id 5542  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-riota 7353  df-ov 7399  df-oprab 7400  df-mpo 7401  df-1st 7970  df-2nd 7971  df-proset 18326  df-poset 18345  df-plt 18360  df-lub 18376  df-glb 18377  df-join 18378  df-meet 18379  df-p0 18455  df-lat 18464  df-clat 18531  df-oposet 39800  df-ol 39802  df-oml 39803  df-covers 39890  df-ats 39891  df-atl 39922  df-cvlat 39946  df-hlat 39975  df-psubsp 40127  df-pmap 40128  df-padd 40420
This theorem is referenced by:  dalawlem8  40502
  Copyright terms: Public domain W3C validator