Proof of Theorem 2atm
Step | Hyp | Ref
| Expression |
1 | | simp31 1090 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑇 ≤ (𝑃 ∨ 𝑄)) |
2 | | simp32 1091 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑇 ≤ (𝑅 ∨ 𝑆)) |
3 | | simp11 1084 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝐾 ∈ HL) |
4 | | hllat 33668 |
. . . . 5
⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat) |
5 | 3, 4 | syl 17 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝐾 ∈ Lat) |
6 | | simp23 1089 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑇 ∈ 𝐴) |
7 | | eqid 2610 |
. . . . . 6
⊢
(Base‘𝐾) =
(Base‘𝐾) |
8 | | 2atm.a |
. . . . . 6
⊢ 𝐴 = (Atoms‘𝐾) |
9 | 7, 8 | atbase 33594 |
. . . . 5
⊢ (𝑇 ∈ 𝐴 → 𝑇 ∈ (Base‘𝐾)) |
10 | 6, 9 | syl 17 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑇 ∈ (Base‘𝐾)) |
11 | | simp12 1085 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑃 ∈ 𝐴) |
12 | 7, 8 | atbase 33594 |
. . . . . 6
⊢ (𝑃 ∈ 𝐴 → 𝑃 ∈ (Base‘𝐾)) |
13 | 11, 12 | syl 17 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑃 ∈ (Base‘𝐾)) |
14 | | simp13 1086 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑄 ∈ 𝐴) |
15 | 7, 8 | atbase 33594 |
. . . . . 6
⊢ (𝑄 ∈ 𝐴 → 𝑄 ∈ (Base‘𝐾)) |
16 | 14, 15 | syl 17 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑄 ∈ (Base‘𝐾)) |
17 | | 2atm.j |
. . . . . 6
⊢ ∨ =
(join‘𝐾) |
18 | 7, 17 | latjcl 16874 |
. . . . 5
⊢ ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑄 ∈ (Base‘𝐾)) → (𝑃 ∨ 𝑄) ∈ (Base‘𝐾)) |
19 | 5, 13, 16, 18 | syl3anc 1318 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → (𝑃 ∨ 𝑄) ∈ (Base‘𝐾)) |
20 | | simp21 1087 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑅 ∈ 𝐴) |
21 | | simp22 1088 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑆 ∈ 𝐴) |
22 | 7, 17, 8 | hlatjcl 33671 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ 𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) → (𝑅 ∨ 𝑆) ∈ (Base‘𝐾)) |
23 | 3, 20, 21, 22 | syl3anc 1318 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → (𝑅 ∨ 𝑆) ∈ (Base‘𝐾)) |
24 | | 2atm.l |
. . . . 5
⊢ ≤ =
(le‘𝐾) |
25 | | 2atm.m |
. . . . 5
⊢ ∧ =
(meet‘𝐾) |
26 | 7, 24, 25 | latlem12 16901 |
. . . 4
⊢ ((𝐾 ∈ Lat ∧ (𝑇 ∈ (Base‘𝐾) ∧ (𝑃 ∨ 𝑄) ∈ (Base‘𝐾) ∧ (𝑅 ∨ 𝑆) ∈ (Base‘𝐾))) → ((𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆)) ↔ 𝑇 ≤ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)))) |
27 | 5, 10, 19, 23, 26 | syl13anc 1320 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → ((𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆)) ↔ 𝑇 ≤ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)))) |
28 | 1, 2, 27 | mpbi2and 958 |
. 2
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑇 ≤ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆))) |
29 | | hlatl 33665 |
. . . 4
⊢ (𝐾 ∈ HL → 𝐾 ∈ AtLat) |
30 | 3, 29 | syl 17 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝐾 ∈ AtLat) |
31 | 7, 25 | latmcl 16875 |
. . . . . . 7
⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑄) ∈ (Base‘𝐾) ∧ (𝑅 ∨ 𝑆) ∈ (Base‘𝐾)) → ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ∈ (Base‘𝐾)) |
32 | 5, 19, 23, 31 | syl3anc 1318 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ∈ (Base‘𝐾)) |
33 | | eqid 2610 |
. . . . . . 7
⊢
(0.‘𝐾) =
(0.‘𝐾) |
34 | 7, 24, 33, 8 | atlen0 33615 |
. . . . . 6
⊢ (((𝐾 ∈ AtLat ∧ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ∈ (Base‘𝐾) ∧ 𝑇 ∈ 𝐴) ∧ 𝑇 ≤ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆))) → ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ≠ (0.‘𝐾)) |
35 | 30, 32, 6, 28, 34 | syl31anc 1321 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ≠ (0.‘𝐾)) |
36 | 35 | neneqd 2787 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → ¬ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) = (0.‘𝐾)) |
37 | | simp33 1092 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆)) |
38 | 17, 25, 33, 8 | 2atmat0 33830 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → (((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ∈ 𝐴 ∨ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) = (0.‘𝐾))) |
39 | 3, 11, 14, 20, 21, 37, 38 | syl33anc 1333 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → (((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ∈ 𝐴 ∨ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) = (0.‘𝐾))) |
40 | 39 | ord 391 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → (¬ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ∈ 𝐴 → ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) = (0.‘𝐾))) |
41 | 36, 40 | mt3d 139 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ∈ 𝐴) |
42 | 24, 8 | atcmp 33616 |
. . 3
⊢ ((𝐾 ∈ AtLat ∧ 𝑇 ∈ 𝐴 ∧ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ∈ 𝐴) → (𝑇 ≤ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ↔ 𝑇 = ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)))) |
43 | 30, 6, 41, 42 | syl3anc 1318 |
. 2
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → (𝑇 ≤ ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)) ↔ 𝑇 = ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆)))) |
44 | 28, 43 | mpbid 221 |
1
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑇 ≤ (𝑃 ∨ 𝑄) ∧ 𝑇 ≤ (𝑅 ∨ 𝑆) ∧ (𝑃 ∨ 𝑄) ≠ (𝑅 ∨ 𝑆))) → 𝑇 = ((𝑃 ∨ 𝑄) ∧ (𝑅 ∨ 𝑆))) |