Proof of Theorem dalawlem2
Step | Hyp | Ref
| Expression |
1 | | simp1 1061 |
. . . . . 6
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → 𝐾 ∈ HL) |
2 | | hllat 34650 |
. . . . . 6
⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat) |
3 | 1, 2 | syl 17 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → 𝐾 ∈ Lat) |
4 | | simp2l 1087 |
. . . . . 6
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → 𝑃 ∈ 𝐴) |
5 | | simp2r 1088 |
. . . . . 6
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → 𝑄 ∈ 𝐴) |
6 | | eqid 2622 |
. . . . . . 7
⊢
(Base‘𝐾) =
(Base‘𝐾) |
7 | | dalawlem.j |
. . . . . . 7
⊢ ∨ =
(join‘𝐾) |
8 | | dalawlem.a |
. . . . . . 7
⊢ 𝐴 = (Atoms‘𝐾) |
9 | 6, 7, 8 | hlatjcl 34653 |
. . . . . 6
⊢ ((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) → (𝑃 ∨ 𝑄) ∈ (Base‘𝐾)) |
10 | 1, 4, 5, 9 | syl3anc 1326 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → (𝑃 ∨ 𝑄) ∈ (Base‘𝐾)) |
11 | | simp3r 1090 |
. . . . . 6
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → 𝑇 ∈ 𝐴) |
12 | 6, 8 | atbase 34576 |
. . . . . 6
⊢ (𝑇 ∈ 𝐴 → 𝑇 ∈ (Base‘𝐾)) |
13 | 11, 12 | syl 17 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → 𝑇 ∈ (Base‘𝐾)) |
14 | | dalawlem.l |
. . . . . 6
⊢ ≤ =
(le‘𝐾) |
15 | 6, 14, 7 | latlej1 17060 |
. . . . 5
⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑄) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → (𝑃 ∨ 𝑄) ≤ ((𝑃 ∨ 𝑄) ∨ 𝑇)) |
16 | 3, 10, 13, 15 | syl3anc 1326 |
. . . 4
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → (𝑃 ∨ 𝑄) ≤ ((𝑃 ∨ 𝑄) ∨ 𝑇)) |
17 | | simp3l 1089 |
. . . . . 6
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → 𝑆 ∈ 𝐴) |
18 | 6, 8 | atbase 34576 |
. . . . . 6
⊢ (𝑆 ∈ 𝐴 → 𝑆 ∈ (Base‘𝐾)) |
19 | 17, 18 | syl 17 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → 𝑆 ∈ (Base‘𝐾)) |
20 | 6, 14, 7 | latlej1 17060 |
. . . . 5
⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑄) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → (𝑃 ∨ 𝑄) ≤ ((𝑃 ∨ 𝑄) ∨ 𝑆)) |
21 | 3, 10, 19, 20 | syl3anc 1326 |
. . . 4
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → (𝑃 ∨ 𝑄) ≤ ((𝑃 ∨ 𝑄) ∨ 𝑆)) |
22 | 6, 7 | latjcl 17051 |
. . . . . 6
⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑄) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → ((𝑃 ∨ 𝑄) ∨ 𝑇) ∈ (Base‘𝐾)) |
23 | 3, 10, 13, 22 | syl3anc 1326 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → ((𝑃 ∨ 𝑄) ∨ 𝑇) ∈ (Base‘𝐾)) |
24 | 6, 7 | latjcl 17051 |
. . . . . 6
⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑄) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → ((𝑃 ∨ 𝑄) ∨ 𝑆) ∈ (Base‘𝐾)) |
25 | 3, 10, 19, 24 | syl3anc 1326 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → ((𝑃 ∨ 𝑄) ∨ 𝑆) ∈ (Base‘𝐾)) |
26 | | dalawlem.m |
. . . . . 6
⊢ ∧ =
(meet‘𝐾) |
27 | 6, 14, 26 | latlem12 17078 |
. . . . 5
⊢ ((𝐾 ∈ Lat ∧ ((𝑃 ∨ 𝑄) ∈ (Base‘𝐾) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑇) ∈ (Base‘𝐾) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆) ∈ (Base‘𝐾))) → (((𝑃 ∨ 𝑄) ≤ ((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ (𝑃 ∨ 𝑄) ≤ ((𝑃 ∨ 𝑄) ∨ 𝑆)) ↔ (𝑃 ∨ 𝑄) ≤ (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)))) |
28 | 3, 10, 23, 25, 27 | syl13anc 1328 |
. . . 4
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → (((𝑃 ∨ 𝑄) ≤ ((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ (𝑃 ∨ 𝑄) ≤ ((𝑃 ∨ 𝑄) ∨ 𝑆)) ↔ (𝑃 ∨ 𝑄) ≤ (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)))) |
29 | 16, 21, 28 | mpbi2and 956 |
. . 3
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → (𝑃 ∨ 𝑄) ≤ (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆))) |
30 | 6, 26 | latmcl 17052 |
. . . . 5
⊢ ((𝐾 ∈ Lat ∧ ((𝑃 ∨ 𝑄) ∨ 𝑇) ∈ (Base‘𝐾) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆) ∈ (Base‘𝐾)) → (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)) ∈ (Base‘𝐾)) |
31 | 3, 23, 25, 30 | syl3anc 1326 |
. . . 4
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)) ∈ (Base‘𝐾)) |
32 | 6, 7, 8 | hlatjcl 34653 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) → (𝑆 ∨ 𝑇) ∈ (Base‘𝐾)) |
33 | 1, 17, 11, 32 | syl3anc 1326 |
. . . 4
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → (𝑆 ∨ 𝑇) ∈ (Base‘𝐾)) |
34 | 6, 14, 26 | latmlem1 17081 |
. . . 4
⊢ ((𝐾 ∈ Lat ∧ ((𝑃 ∨ 𝑄) ∈ (Base‘𝐾) ∧ (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)) ∈ (Base‘𝐾) ∧ (𝑆 ∨ 𝑇) ∈ (Base‘𝐾))) → ((𝑃 ∨ 𝑄) ≤ (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)) → ((𝑃 ∨ 𝑄) ∧ (𝑆 ∨ 𝑇)) ≤ ((((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)) ∧ (𝑆 ∨ 𝑇)))) |
35 | 3, 10, 31, 33, 34 | syl13anc 1328 |
. . 3
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → ((𝑃 ∨ 𝑄) ≤ (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)) → ((𝑃 ∨ 𝑄) ∧ (𝑆 ∨ 𝑇)) ≤ ((((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)) ∧ (𝑆 ∨ 𝑇)))) |
36 | 29, 35 | mpd 15 |
. 2
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → ((𝑃 ∨ 𝑄) ∧ (𝑆 ∨ 𝑇)) ≤ ((((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)) ∧ (𝑆 ∨ 𝑇))) |
37 | 6, 14, 7 | latlej2 17061 |
. . . . . 6
⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑄) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → 𝑆 ≤ ((𝑃 ∨ 𝑄) ∨ 𝑆)) |
38 | 3, 10, 19, 37 | syl3anc 1326 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → 𝑆 ≤ ((𝑃 ∨ 𝑄) ∨ 𝑆)) |
39 | 6, 14, 7, 26, 8 | atmod3i1 35150 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ (𝑆 ∈ 𝐴 ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) ∧ 𝑆 ≤ ((𝑃 ∨ 𝑄) ∨ 𝑆)) → (𝑆 ∨ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇)) = (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ (𝑆 ∨ 𝑇))) |
40 | 1, 17, 25, 13, 38, 39 | syl131anc 1339 |
. . . 4
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → (𝑆 ∨ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇)) = (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ (𝑆 ∨ 𝑇))) |
41 | 40 | oveq2d 6666 |
. . 3
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ (𝑆 ∨ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇))) = (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ (𝑆 ∨ 𝑇)))) |
42 | 6, 26 | latmcl 17052 |
. . . . 5
⊢ ((𝐾 ∈ Lat ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆) ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) → (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇) ∈ (Base‘𝐾)) |
43 | 3, 25, 13, 42 | syl3anc 1326 |
. . . 4
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇) ∈ (Base‘𝐾)) |
44 | 6, 14, 7, 26 | latmlej22 17093 |
. . . . 5
⊢ ((𝐾 ∈ Lat ∧ (𝑇 ∈ (Base‘𝐾) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆) ∈ (Base‘𝐾) ∧ (𝑃 ∨ 𝑄) ∈ (Base‘𝐾))) → (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇) ≤ ((𝑃 ∨ 𝑄) ∨ 𝑇)) |
45 | 3, 13, 25, 10, 44 | syl13anc 1328 |
. . . 4
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇) ≤ ((𝑃 ∨ 𝑄) ∨ 𝑇)) |
46 | 6, 14, 7, 26, 8 | atmod2i2 35148 |
. . . 4
⊢ ((𝐾 ∈ HL ∧ (𝑆 ∈ 𝐴 ∧ ((𝑃 ∨ 𝑄) ∨ 𝑇) ∈ (Base‘𝐾) ∧ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇) ∈ (Base‘𝐾)) ∧ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇) ≤ ((𝑃 ∨ 𝑄) ∨ 𝑇)) → ((((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ 𝑆) ∨ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇)) = (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ (𝑆 ∨ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇)))) |
47 | 1, 17, 23, 43, 45, 46 | syl131anc 1339 |
. . 3
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → ((((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ 𝑆) ∨ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇)) = (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ (𝑆 ∨ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇)))) |
48 | | hlol 34648 |
. . . . 5
⊢ (𝐾 ∈ HL → 𝐾 ∈ OL) |
49 | 1, 48 | syl 17 |
. . . 4
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → 𝐾 ∈ OL) |
50 | 6, 26 | latmassOLD 34516 |
. . . 4
⊢ ((𝐾 ∈ OL ∧ (((𝑃 ∨ 𝑄) ∨ 𝑇) ∈ (Base‘𝐾) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆) ∈ (Base‘𝐾) ∧ (𝑆 ∨ 𝑇) ∈ (Base‘𝐾))) → ((((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)) ∧ (𝑆 ∨ 𝑇)) = (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ (𝑆 ∨ 𝑇)))) |
51 | 49, 23, 25, 33, 50 | syl13anc 1328 |
. . 3
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → ((((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)) ∧ (𝑆 ∨ 𝑇)) = (((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ (𝑆 ∨ 𝑇)))) |
52 | 41, 47, 51 | 3eqtr4rd 2667 |
. 2
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → ((((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ ((𝑃 ∨ 𝑄) ∨ 𝑆)) ∧ (𝑆 ∨ 𝑇)) = ((((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ 𝑆) ∨ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇))) |
53 | 36, 52 | breqtrd 4679 |
1
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → ((𝑃 ∨ 𝑄) ∧ (𝑆 ∨ 𝑇)) ≤ ((((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ 𝑆) ∨ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇))) |