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

Theorem 3atlem2 40147
Description: Lemma for 3at 40153. (Contributed by NM, 22-Jun-2012.)
Hypotheses
Ref Expression
3at.l = (le‘𝐾)
3at.j = (join‘𝐾)
3at.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
3atlem2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑃 𝑄) 𝑅) = ((𝑆 𝑇) 𝑈))

Proof of Theorem 3atlem2
StepHypRef Expression
1 simp3 1154 . . . . . 6 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈))
2 simp11 1220 . . . . . . . 8 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝐾 ∈ HL)
32hllatd 40027 . . . . . . 7 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝐾 ∈ Lat)
4 simp121 1322 . . . . . . . 8 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑃𝐴)
5 simp122 1323 . . . . . . . 8 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑄𝐴)
6 eqid 2769 . . . . . . . . 9 (Base‘𝐾) = (Base‘𝐾)
7 3at.j . . . . . . . . 9 = (join‘𝐾)
8 3at.a . . . . . . . . 9 𝐴 = (Atoms‘𝐾)
96, 7, 8hlatjcl 40030 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
102, 4, 5, 9syl3anc 1396 . . . . . . 7 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑃 𝑄) ∈ (Base‘𝐾))
11 simp123 1324 . . . . . . . 8 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑅𝐴)
126, 8atbase 39952 . . . . . . . 8 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
1311, 12syl 18 . . . . . . 7 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑅 ∈ (Base‘𝐾))
14 simp131 1325 . . . . . . . . 9 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑆𝐴)
15 simp132 1326 . . . . . . . . 9 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑇𝐴)
166, 7, 8hlatjcl 40030 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑆𝐴𝑇𝐴) → (𝑆 𝑇) ∈ (Base‘𝐾))
172, 14, 15, 16syl3anc 1396 . . . . . . . 8 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑆 𝑇) ∈ (Base‘𝐾))
18 simp133 1327 . . . . . . . . 9 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑈𝐴)
196, 8atbase 39952 . . . . . . . . 9 (𝑈𝐴𝑈 ∈ (Base‘𝐾))
2018, 19syl 18 . . . . . . . 8 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑈 ∈ (Base‘𝐾))
216, 7latjcl 18494 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (𝑆 𝑇) ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) → ((𝑆 𝑇) 𝑈) ∈ (Base‘𝐾))
223, 17, 20, 21syl3anc 1396 . . . . . . 7 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑆 𝑇) 𝑈) ∈ (Base‘𝐾))
23 3at.l . . . . . . . 8 = (le‘𝐾)
246, 23, 7latjle12 18505 . . . . . . 7 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾) ∧ ((𝑆 𝑇) 𝑈) ∈ (Base‘𝐾))) → (((𝑃 𝑄) ((𝑆 𝑇) 𝑈) ∧ 𝑅 ((𝑆 𝑇) 𝑈)) ↔ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)))
253, 10, 13, 22, 24syl13anc 1397 . . . . . 6 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (((𝑃 𝑄) ((𝑆 𝑇) 𝑈) ∧ 𝑅 ((𝑆 𝑇) 𝑈)) ↔ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)))
261, 25mpbird 260 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑃 𝑄) ((𝑆 𝑇) 𝑈) ∧ 𝑅 ((𝑆 𝑇) 𝑈)))
2726simprd 500 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑅 ((𝑆 𝑇) 𝑈))
287, 8hlatjass 40033 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) → ((𝑆 𝑇) 𝑈) = (𝑆 (𝑇 𝑈)))
292, 14, 15, 18, 28syl13anc 1397 . . . . . 6 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑆 𝑇) 𝑈) = (𝑆 (𝑇 𝑈)))
30 simp22r 1310 . . . . . . . 8 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑃 (𝑇 𝑈))
31 simp22l 1309 . . . . . . . . 9 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑃𝑈)
3223, 7, 8hlatexchb2 40057 . . . . . . . . 9 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑇𝐴𝑈𝐴) ∧ 𝑃𝑈) → (𝑃 (𝑇 𝑈) ↔ (𝑃 𝑈) = (𝑇 𝑈)))
332, 4, 15, 18, 31, 32syl131anc 1408 . . . . . . . 8 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑃 (𝑇 𝑈) ↔ (𝑃 𝑈) = (𝑇 𝑈)))
3430, 33mpbid 235 . . . . . . 7 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑃 𝑈) = (𝑇 𝑈))
3534oveq2d 7427 . . . . . 6 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑆 (𝑃 𝑈)) = (𝑆 (𝑇 𝑈)))
3629, 35eqtr4d 2807 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑆 𝑇) 𝑈) = (𝑆 (𝑃 𝑈)))
377, 8hlatjass 40033 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑈𝐴)) → ((𝑃 𝑄) 𝑈) = (𝑃 (𝑄 𝑈)))
382, 4, 5, 18, 37syl13anc 1397 . . . . . 6 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑃 𝑄) 𝑈) = (𝑃 (𝑄 𝑈)))
397, 8hlatj12 40034 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑈𝐴)) → (𝑃 (𝑄 𝑈)) = (𝑄 (𝑃 𝑈)))
402, 4, 5, 18, 39syl13anc 1397 . . . . . 6 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑃 (𝑄 𝑈)) = (𝑄 (𝑃 𝑈)))
417, 8hlatj32 40035 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴)) → ((𝑃 𝑄) 𝑅) = ((𝑃 𝑅) 𝑄))
422, 4, 5, 11, 41syl13anc 1397 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑃 𝑄) 𝑅) = ((𝑃 𝑅) 𝑄))
431, 42, 293brtr3d 5146 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑃 𝑅) 𝑄) (𝑆 (𝑇 𝑈)))
446, 7, 8hlatjcl 40030 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑅𝐴) → (𝑃 𝑅) ∈ (Base‘𝐾))
452, 4, 11, 44syl3anc 1396 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑃 𝑅) ∈ (Base‘𝐾))
466, 8atbase 39952 . . . . . . . . . . . 12 (𝑄𝐴𝑄 ∈ (Base‘𝐾))
475, 46syl 18 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑄 ∈ (Base‘𝐾))
486, 8atbase 39952 . . . . . . . . . . . . 13 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
4914, 48syl 18 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑆 ∈ (Base‘𝐾))
506, 7, 8hlatjcl 40030 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ 𝑇𝐴𝑈𝐴) → (𝑇 𝑈) ∈ (Base‘𝐾))
512, 15, 18, 50syl3anc 1396 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑇 𝑈) ∈ (Base‘𝐾))
526, 7latjcl 18494 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ 𝑆 ∈ (Base‘𝐾) ∧ (𝑇 𝑈) ∈ (Base‘𝐾)) → (𝑆 (𝑇 𝑈)) ∈ (Base‘𝐾))
533, 49, 51, 52syl3anc 1396 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑆 (𝑇 𝑈)) ∈ (Base‘𝐾))
546, 23, 7latjle12 18505 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ ((𝑃 𝑅) ∈ (Base‘𝐾) ∧ 𝑄 ∈ (Base‘𝐾) ∧ (𝑆 (𝑇 𝑈)) ∈ (Base‘𝐾))) → (((𝑃 𝑅) (𝑆 (𝑇 𝑈)) ∧ 𝑄 (𝑆 (𝑇 𝑈))) ↔ ((𝑃 𝑅) 𝑄) (𝑆 (𝑇 𝑈))))
553, 45, 47, 53, 54syl13anc 1397 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (((𝑃 𝑅) (𝑆 (𝑇 𝑈)) ∧ 𝑄 (𝑆 (𝑇 𝑈))) ↔ ((𝑃 𝑅) 𝑄) (𝑆 (𝑇 𝑈))))
5643, 55mpbird 260 . . . . . . . . 9 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑃 𝑅) (𝑆 (𝑇 𝑈)) ∧ 𝑄 (𝑆 (𝑇 𝑈))))
5756simprd 500 . . . . . . . 8 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑄 (𝑆 (𝑇 𝑈)))
5857, 35breqtrrd 5143 . . . . . . 7 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑄 (𝑆 (𝑃 𝑈)))
596, 7, 8hlatjcl 40030 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑈𝐴) → (𝑃 𝑈) ∈ (Base‘𝐾))
602, 4, 18, 59syl3anc 1396 . . . . . . . 8 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑃 𝑈) ∈ (Base‘𝐾))
61 simp23 1225 . . . . . . . 8 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ¬ 𝑄 (𝑃 𝑈))
626, 23, 7, 8hlexchb2 40048 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑄𝐴𝑆𝐴 ∧ (𝑃 𝑈) ∈ (Base‘𝐾)) ∧ ¬ 𝑄 (𝑃 𝑈)) → (𝑄 (𝑆 (𝑃 𝑈)) ↔ (𝑄 (𝑃 𝑈)) = (𝑆 (𝑃 𝑈))))
632, 5, 14, 60, 61, 62syl131anc 1408 . . . . . . 7 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑄 (𝑆 (𝑃 𝑈)) ↔ (𝑄 (𝑃 𝑈)) = (𝑆 (𝑃 𝑈))))
6458, 63mpbid 235 . . . . . 6 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑄 (𝑃 𝑈)) = (𝑆 (𝑃 𝑈)))
6538, 40, 643eqtrd 2808 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑃 𝑄) 𝑈) = (𝑆 (𝑃 𝑈)))
6636, 65eqtr4d 2807 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑆 𝑇) 𝑈) = ((𝑃 𝑄) 𝑈))
6727, 66breqtrd 5141 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → 𝑅 ((𝑃 𝑄) 𝑈))
68 simp21 1223 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ¬ 𝑅 (𝑃 𝑄))
696, 23, 7, 8hlexchb1 40047 . . . 4 ((𝐾 ∈ HL ∧ (𝑅𝐴𝑈𝐴 ∧ (𝑃 𝑄) ∈ (Base‘𝐾)) ∧ ¬ 𝑅 (𝑃 𝑄)) → (𝑅 ((𝑃 𝑄) 𝑈) ↔ ((𝑃 𝑄) 𝑅) = ((𝑃 𝑄) 𝑈)))
702, 11, 18, 10, 68, 69syl131anc 1408 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → (𝑅 ((𝑃 𝑄) 𝑈) ↔ ((𝑃 𝑄) 𝑅) = ((𝑃 𝑄) 𝑈)))
7167, 70mpbid 235 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑃 𝑄) 𝑅) = ((𝑃 𝑄) 𝑈))
7271, 66eqtr4d 2807 1 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ (𝑃𝑈𝑃 (𝑇 𝑈)) ∧ ¬ 𝑄 (𝑃 𝑈)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑈)) → ((𝑃 𝑄) 𝑅) = ((𝑆 𝑇) 𝑈))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400  w3a 1101   = wceq 1567  wcel 2149  wne 2964   class class class wbr 5113  cfv 6537  (class class class)co 7411  Basecbs 17268  lecple 17316  joincjn 18366  Latclat 18486  Atomscatm 39926  HLchlt 40013
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-iun 4962  df-br 5114  df-opab 5178  df-mpt 5197  df-id 5557  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-riota 7368  df-ov 7414  df-oprab 7415  df-proset 18349  df-poset 18368  df-plt 18383  df-lub 18399  df-glb 18400  df-join 18401  df-meet 18402  df-p0 18478  df-lat 18487  df-covers 39929  df-ats 39930  df-atl 39961  df-cvlat 39985  df-hlat 40014
This theorem is referenced by:  3atlem3  40148
  Copyright terms: Public domain W3C validator