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 39877
Description: Lemma for dalaw 39887. First piece of dalawlem8 39879. (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 2730 . 2 (Base‘𝐾) = (Base‘𝐾)
2 dalawlem.l . 2 = (le‘𝐾)
3 simp11 1204 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ HL)
43hllatd 39364 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ Lat)
5 simp21 1207 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃𝐴)
6 simp22 1208 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑄𝐴)
7 dalawlem.j . . . . . 6 = (join‘𝐾)
8 dalawlem.a . . . . . 6 𝐴 = (Atoms‘𝐾)
91, 7, 8hlatjcl 39367 . . . . 5 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
103, 5, 6, 9syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑄) ∈ (Base‘𝐾))
11 simp32 1211 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇𝐴)
121, 8atbase 39289 . . . . 5 (𝑇𝐴𝑇 ∈ (Base‘𝐾))
1311, 12syl 17 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑇 ∈ (Base‘𝐾))
141, 7latjcl 18405 . . . 4 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾))
154, 10, 13, 14syl3anc 1373 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾))
16 simp31 1210 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆𝐴)
171, 8atbase 39289 . . . 4 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
1816, 17syl 17 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 ∈ (Base‘𝐾))
19 dalawlem.m . . . 4 = (meet‘𝐾)
201, 19latmcl 18406 . . 3 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → (((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾))
214, 15, 18, 20syl3anc 1373 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾))
22 simp23 1209 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅𝐴)
231, 7, 8hlatjcl 39367 . . . . 5 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑅𝐴) → (𝑄 𝑅) ∈ (Base‘𝐾))
243, 6, 22, 23syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑄 𝑅) ∈ (Base‘𝐾))
25 simp33 1212 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈𝐴)
261, 8atbase 39289 . . . . 5 (𝑈𝐴𝑈 ∈ (Base‘𝐾))
2725, 26syl 17 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈 ∈ (Base‘𝐾))
281, 19latmcl 18406 . . . 4 ((𝐾 ∈ Lat ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) → ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾))
294, 24, 27, 28syl3anc 1373 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾))
301, 7, 8hlatjcl 39367 . . . . 5 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑃𝐴) → (𝑅 𝑃) ∈ (Base‘𝐾))
313, 22, 5, 30syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑃) ∈ (Base‘𝐾))
321, 7, 8hlatjcl 39367 . . . . 5 ((𝐾 ∈ HL ∧ 𝑈𝐴𝑆𝐴) → (𝑈 𝑆) ∈ (Base‘𝐾))
333, 25, 16, 32syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑈 𝑆) ∈ (Base‘𝐾))
341, 19latmcl 18406 . . . 4 ((𝐾 ∈ Lat ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) → ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))
354, 31, 33, 34syl3anc 1373 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))
361, 7latjcl 18405 . . 3 ((𝐾 ∈ Lat ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
374, 29, 35, 36syl3anc 1373 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
381, 7, 8hlatjcl 39367 . . . . 5 ((𝐾 ∈ HL ∧ 𝑇𝐴𝑈𝐴) → (𝑇 𝑈) ∈ (Base‘𝐾))
393, 11, 25, 38syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑇 𝑈) ∈ (Base‘𝐾))
401, 19latmcl 18406 . . . 4 ((𝐾 ∈ Lat ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑇 𝑈) ∈ (Base‘𝐾)) → ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾))
414, 24, 39, 40syl3anc 1373 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾))
421, 7latjcl 18405 . . 3 ((𝐾 ∈ Lat ∧ ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾)) → (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
434, 41, 35, 42syl3anc 1373 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))) ∈ (Base‘𝐾))
441, 8atbase 39289 . . . . . . . 8 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
455, 44syl 17 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 ∈ (Base‘𝐾))
461, 7, 8hlatjcl 39367 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → (𝑃 𝑆) ∈ (Base‘𝐾))
473, 5, 16, 46syl3anc 1373 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 𝑆) ∈ (Base‘𝐾))
481, 7, 8hlatjcl 39367 . . . . . . . . . 10 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑇𝐴) → (𝑄 𝑇) ∈ (Base‘𝐾))
493, 6, 11, 48syl3anc 1373 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑄 𝑇) ∈ (Base‘𝐾))
501, 19latmcl 18406 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾)) → ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾))
514, 24, 49, 50syl3anc 1373 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾))
521, 19latmcl 18406 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
534, 47, 51, 52syl3anc 1373 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
541, 7latjcl 18405 . . . . . . 7 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) ∈ (Base‘𝐾))
554, 45, 53, 54syl3anc 1373 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) ∈ (Base‘𝐾))
561, 8atbase 39289 . . . . . . . . 9 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
5722, 56syl 17 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅 ∈ (Base‘𝐾))
581, 7latjcl 18405 . . . . . . . 8 ((𝐾 ∈ Lat ∧ 𝑅 ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾)) → (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾))
594, 57, 29, 58syl3anc 1373 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾))
601, 7latjcl 18405 . . . . . . 7 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾)) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) ∈ (Base‘𝐾))
614, 45, 59, 60syl3anc 1373 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) ∈ (Base‘𝐾))
621, 2, 7, 19latmlej22 18447 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝑆 ∈ (Base‘𝐾) ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆))
634, 18, 15, 45, 62syl13anc 1374 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆))
641, 19latmcl 18406 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾))
654, 49, 47, 64syl3anc 1373 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾))
661, 7latjcl 18405 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ ((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) ∈ (Base‘𝐾))
674, 45, 65, 66syl3anc 1373 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) ∈ (Base‘𝐾))
681, 7latjcl 18405 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾)) → (𝑃 ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
694, 45, 51, 68syl3anc 1373 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))
702, 7, 8hlatlej2 39376 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → 𝑆 (𝑃 𝑆))
713, 5, 16, 70syl3anc 1373 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑆 (𝑃 𝑆))
721, 7latjcl 18405 . . . . . . . . . . . . 13 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾)) → (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))
734, 45, 49, 72syl3anc 1373 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))
741, 2, 19latmlem2 18436 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ (𝑆 ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑃 (𝑄 𝑇)) ∈ (Base‘𝐾))) → (𝑆 (𝑃 𝑆) → ((𝑃 (𝑄 𝑇)) 𝑆) ((𝑃 (𝑄 𝑇)) (𝑃 𝑆))))
754, 18, 47, 73, 74syl13anc 1374 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑆 (𝑃 𝑆) → ((𝑃 (𝑄 𝑇)) 𝑆) ((𝑃 (𝑄 𝑇)) (𝑃 𝑆))))
7671, 75mpd 15 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 (𝑄 𝑇)) 𝑆) ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
777, 8hlatjass 39370 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑇𝐴)) → ((𝑃 𝑄) 𝑇) = (𝑃 (𝑄 𝑇)))
783, 5, 6, 11, 77syl13anc 1374 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑄) 𝑇) = (𝑃 (𝑄 𝑇)))
7978oveq1d 7405 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) = ((𝑃 (𝑄 𝑇)) 𝑆))
802, 7, 8hlatlej1 39375 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → 𝑃 (𝑃 𝑆))
813, 5, 16, 80syl3anc 1373 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑃 (𝑃 𝑆))
821, 2, 7, 19, 8atmod1i1 39858 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ (𝑃𝐴 ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) ∧ 𝑃 (𝑃 𝑆)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) = ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
833, 5, 49, 47, 81, 82syl131anc 1385 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) = ((𝑃 (𝑄 𝑇)) (𝑃 𝑆)))
8476, 79, 833brtr4d 5142 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑇) (𝑃 𝑆))))
851, 19latmcom 18429 . . . . . . . . . . . . 13 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) = ((𝑃 𝑆) (𝑄 𝑇)))
864, 49, 47, 85syl3anc 1373 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) = ((𝑃 𝑆) (𝑄 𝑇)))
87 simp12 1205 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅))
8886, 87eqbrtrd 5132 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑅))
891, 2, 19latmle1 18430 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇))
904, 49, 47, 89syl3anc 1373 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇))
911, 2, 19latlem12 18432 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ (((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾))) → ((((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑅) ∧ ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇)) ↔ ((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇))))
924, 65, 24, 49, 91syl13anc 1374 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑅) ∧ ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇)) ↔ ((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇))))
9388, 90, 92mpbi2and 712 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇)))
941, 2, 7latjlej2 18420 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (((𝑄 𝑇) (𝑃 𝑆)) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → (((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
954, 65, 51, 45, 94syl13anc 1374 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑇) (𝑃 𝑆)) ((𝑄 𝑅) (𝑄 𝑇)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
9693, 95mpd 15 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑄 𝑇) (𝑃 𝑆))) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))
971, 2, 4, 21, 67, 69, 84, 96lattrd 18412 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))
981, 2, 19latlem12 18432 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ ((((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑃 ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾))) → (((((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))))
994, 21, 47, 69, 98syl13anc 1374 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((((𝑃 𝑄) 𝑇) 𝑆) (𝑃 𝑆) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇))))))
10063, 97, 99mpbi2and 712 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
1011, 2, 7, 19, 8atmod3i1 39865 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑃𝐴 ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑄 𝑇)) ∈ (Base‘𝐾)) ∧ 𝑃 (𝑃 𝑆)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) = ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
1023, 5, 47, 51, 81, 101syl131anc 1385 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) = ((𝑃 𝑆) (𝑃 ((𝑄 𝑅) (𝑄 𝑇)))))
103100, 102breqtrrd 5138 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))))
104 simp13 1206 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈))
1051, 19latmcl 18406 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾)) → ((𝑃 𝑆) (𝑄 𝑇)) ∈ (Base‘𝐾))
1064, 47, 49, 105syl3anc 1373 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) (𝑄 𝑇)) ∈ (Base‘𝐾))
1071, 7, 8hlatjcl 39367 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑈𝐴) → (𝑅 𝑈) ∈ (Base‘𝐾))
1083, 22, 25, 107syl3anc 1373 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 𝑈) ∈ (Base‘𝐾))
1091, 2, 19latmlem2 18436 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ (((𝑃 𝑆) (𝑄 𝑇)) ∈ (Base‘𝐾) ∧ (𝑅 𝑈) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾))) → (((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈) → ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))) ((𝑄 𝑅) (𝑅 𝑈))))
1104, 106, 108, 24, 109syl13anc 1374 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈) → ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))) ((𝑄 𝑅) (𝑅 𝑈))))
111104, 110mpd 15 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))) ((𝑄 𝑅) (𝑅 𝑈)))
112 hlol 39361 . . . . . . . . . 10 (𝐾 ∈ HL → 𝐾 ∈ OL)
1133, 112syl 17 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝐾 ∈ OL)
1141, 19latm12 39230 . . . . . . . . 9 ((𝐾 ∈ OL ∧ ((𝑃 𝑆) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑄 𝑇) ∈ (Base‘𝐾))) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) = ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))))
115113, 47, 24, 49, 114syl13anc 1374 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) = ((𝑄 𝑅) ((𝑃 𝑆) (𝑄 𝑇))))
1162, 7, 8hlatlej2 39376 . . . . . . . . . 10 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑅𝐴) → 𝑅 (𝑄 𝑅))
1173, 6, 22, 116syl3anc 1373 . . . . . . . . 9 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑅 (𝑄 𝑅))
1181, 2, 7, 19, 8atmod3i1 39865 . . . . . . . . 9 ((𝐾 ∈ HL ∧ (𝑅𝐴 ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) ∧ 𝑅 (𝑄 𝑅)) → (𝑅 ((𝑄 𝑅) 𝑈)) = ((𝑄 𝑅) (𝑅 𝑈)))
1193, 22, 24, 27, 117, 118syl131anc 1385 . . . . . . . 8 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑅 ((𝑄 𝑅) 𝑈)) = ((𝑄 𝑅) (𝑅 𝑈)))
120111, 115, 1193brtr4d 5142 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) (𝑅 ((𝑄 𝑅) 𝑈)))
1211, 2, 7latjlej2 18420 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) ∈ (Base‘𝐾) ∧ (𝑅 ((𝑄 𝑅) 𝑈)) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾))) → (((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) (𝑅 ((𝑄 𝑅) 𝑈)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈)))))
1224, 53, 59, 45, 121syl13anc 1374 . . . . . . 7 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇))) (𝑅 ((𝑄 𝑅) 𝑈)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈)))))
123120, 122mpd 15 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 ((𝑃 𝑆) ((𝑄 𝑅) (𝑄 𝑇)))) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))))
1241, 2, 4, 21, 55, 61, 103, 123lattrd 18412 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))))
1251, 7latj13 18452 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑃 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾))) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) = (((𝑄 𝑅) 𝑈) (𝑅 𝑃)))
1264, 45, 57, 29, 125syl13anc 1374 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑃 (𝑅 ((𝑄 𝑅) 𝑈))) = (((𝑄 𝑅) 𝑈) (𝑅 𝑃)))
127124, 126breqtrd 5136 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) (𝑅 𝑃)))
1281, 2, 7, 19latmlej22 18447 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑆 ∈ (Base‘𝐾) ∧ ((𝑃 𝑄) 𝑇) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾))) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆))
1294, 18, 15, 27, 128syl13anc 1374 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆))
1301, 7latjcl 18405 . . . . . 6 ((𝐾 ∈ Lat ∧ ((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾) ∧ (𝑅 𝑃) ∈ (Base‘𝐾)) → (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∈ (Base‘𝐾))
1314, 29, 31, 130syl3anc 1373 . . . . 5 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∈ (Base‘𝐾))
1321, 2, 19latlem12 18432 . . . . 5 ((𝐾 ∈ Lat ∧ ((((𝑃 𝑄) 𝑇) 𝑆) ∈ (Base‘𝐾) ∧ (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾))) → (((((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆)) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆))))
1334, 21, 131, 33, 132syl13anc 1374 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) (𝑅 𝑃)) ∧ (((𝑃 𝑄) 𝑇) 𝑆) (𝑈 𝑆)) ↔ (((𝑃 𝑄) 𝑇) 𝑆) ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆))))
134127, 129, 133mpbi2and 712 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆)))
1351, 2, 7, 19latmlej21 18446 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑈 ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾))) → ((𝑄 𝑅) 𝑈) (𝑈 𝑆))
1364, 27, 24, 18, 135syl13anc 1374 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) 𝑈) (𝑈 𝑆))
1371, 2, 7, 19, 8atmod1i1m 39859 . . . 4 (((𝐾 ∈ HL ∧ 𝑈𝐴) ∧ ((𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑅 𝑃) ∈ (Base‘𝐾) ∧ (𝑈 𝑆) ∈ (Base‘𝐾)) ∧ ((𝑄 𝑅) 𝑈) (𝑈 𝑆)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) = ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆)))
1383, 25, 24, 31, 33, 136, 137syl231anc 1392 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) = ((((𝑄 𝑅) 𝑈) (𝑅 𝑃)) (𝑈 𝑆)))
139134, 138breqtrrd 5138 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))))
1402, 7, 8hlatlej2 39376 . . . . 5 ((𝐾 ∈ HL ∧ 𝑇𝐴𝑈𝐴) → 𝑈 (𝑇 𝑈))
1413, 11, 25, 140syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → 𝑈 (𝑇 𝑈))
1421, 2, 19latmlem2 18436 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑈 ∈ (Base‘𝐾) ∧ (𝑇 𝑈) ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾))) → (𝑈 (𝑇 𝑈) → ((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈))))
1434, 27, 39, 24, 142syl13anc 1374 . . . 4 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (𝑈 (𝑇 𝑈) → ((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈))))
144141, 143mpd 15 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈)))
1451, 2, 7latjlej1 18419 . . . 4 ((𝐾 ∈ Lat ∧ (((𝑄 𝑅) 𝑈) ∈ (Base‘𝐾) ∧ ((𝑄 𝑅) (𝑇 𝑈)) ∈ (Base‘𝐾) ∧ ((𝑅 𝑃) (𝑈 𝑆)) ∈ (Base‘𝐾))) → (((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆)))))
1464, 29, 41, 35, 145syl13anc 1374 . . 3 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑄 𝑅) (𝑇 𝑈)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆)))))
147144, 146mpd 15 . 2 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑄 𝑅) 𝑈) ((𝑅 𝑃) (𝑈 𝑆))) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))))
1481, 2, 4, 21, 37, 43, 139, 147lattrd 18412 1 (((𝐾 ∈ HL ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑄 𝑅) ∧ ((𝑃 𝑆) (𝑄 𝑇)) (𝑅 𝑈)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → (((𝑃 𝑄) 𝑇) 𝑆) (((𝑄 𝑅) (𝑇 𝑈)) ((𝑅 𝑃) (𝑈 𝑆))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1540  wcel 2109   class class class wbr 5110  cfv 6514  (class class class)co 7390  Basecbs 17186  lecple 17234  joincjn 18279  meetcmee 18280  Latclat 18397  OLcol 39174  Atomscatm 39263  HLchlt 39350
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 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-rep 5237  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-rmo 3356  df-reu 3357  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-op 4599  df-uni 4875  df-iun 4960  df-iin 4961  df-br 5111  df-opab 5173  df-mpt 5192  df-id 5536  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-res 5653  df-ima 5654  df-iota 6467  df-fun 6516  df-fn 6517  df-f 6518  df-f1 6519  df-fo 6520  df-f1o 6521  df-fv 6522  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-1st 7971  df-2nd 7972  df-proset 18262  df-poset 18281  df-plt 18296  df-lub 18312  df-glb 18313  df-join 18314  df-meet 18315  df-p0 18391  df-lat 18398  df-clat 18465  df-oposet 39176  df-ol 39178  df-oml 39179  df-covers 39266  df-ats 39267  df-atl 39298  df-cvlat 39322  df-hlat 39351  df-psubsp 39504  df-pmap 39505  df-padd 39797
This theorem is referenced by:  dalawlem8  39879
  Copyright terms: Public domain W3C validator