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 ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴)) → ((𝑃 ∨ 𝑄) ∧ (𝑆 ∨ 𝑇)) ≤ ((((𝑃 ∨ 𝑄) ∨ 𝑇) ∧ 𝑆) ∨ (((𝑃 ∨ 𝑄) ∨ 𝑆) ∧ 𝑇))) |