Proof of Theorem paddasslem2
Step | Hyp | Ref
| Expression |
1 | | simp1l 1078 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝐾 ∈ HL) |
2 | | simp1r 1079 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝑟 ∈ 𝐴) |
3 | | simp23 1089 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝑧 ∈ 𝐴) |
4 | | simp22 1088 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝑦 ∈ 𝐴) |
5 | 2, 3, 4 | 3jca 1235 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → (𝑟 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴)) |
6 | | simp21 1087 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝑥 ∈ 𝐴) |
7 | | simp3l 1082 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → ¬ 𝑟 ≤ (𝑥 ∨ 𝑦)) |
8 | | paddasslem.l |
. . . . . 6
⊢ ≤ =
(le‘𝐾) |
9 | | paddasslem.j |
. . . . . 6
⊢ ∨ =
(join‘𝐾) |
10 | | paddasslem.a |
. . . . . 6
⊢ 𝐴 = (Atoms‘𝐾) |
11 | 8, 9, 10 | atnlej2 33684 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ (𝑟 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑟 ≤ (𝑥 ∨ 𝑦)) → 𝑟 ≠ 𝑦) |
12 | 1, 2, 6, 4, 7, 11 | syl131anc 1331 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝑟 ≠ 𝑦) |
13 | 1, 5, 12 | 3jca 1235 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → (𝐾 ∈ HL ∧ (𝑟 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ 𝑟 ≠ 𝑦)) |
14 | | simp3r 1083 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝑟 ≤ (𝑦 ∨ 𝑧)) |
15 | 8, 9, 10 | hlatexch1 33699 |
. . 3
⊢ ((𝐾 ∈ HL ∧ (𝑟 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ 𝑟 ≠ 𝑦) → (𝑟 ≤ (𝑦 ∨ 𝑧) → 𝑧 ≤ (𝑦 ∨ 𝑟))) |
16 | 13, 14, 15 | sylc 63 |
. 2
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝑧 ≤ (𝑦 ∨ 𝑟)) |
17 | | hllat 33668 |
. . . 4
⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat) |
18 | 1, 17 | syl 17 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝐾 ∈ Lat) |
19 | | eqid 2610 |
. . . . 5
⊢
(Base‘𝐾) =
(Base‘𝐾) |
20 | 19, 10 | atbase 33594 |
. . . 4
⊢ (𝑟 ∈ 𝐴 → 𝑟 ∈ (Base‘𝐾)) |
21 | 2, 20 | syl 17 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝑟 ∈ (Base‘𝐾)) |
22 | 19, 10 | atbase 33594 |
. . . 4
⊢ (𝑦 ∈ 𝐴 → 𝑦 ∈ (Base‘𝐾)) |
23 | 4, 22 | syl 17 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝑦 ∈ (Base‘𝐾)) |
24 | 19, 9 | latjcom 16882 |
. . 3
⊢ ((𝐾 ∈ Lat ∧ 𝑟 ∈ (Base‘𝐾) ∧ 𝑦 ∈ (Base‘𝐾)) → (𝑟 ∨ 𝑦) = (𝑦 ∨ 𝑟)) |
25 | 18, 21, 23, 24 | syl3anc 1318 |
. 2
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → (𝑟 ∨ 𝑦) = (𝑦 ∨ 𝑟)) |
26 | 16, 25 | breqtrrd 4611 |
1
⊢ (((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (¬ 𝑟 ≤ (𝑥 ∨ 𝑦) ∧ 𝑟 ≤ (𝑦 ∨ 𝑧))) → 𝑧 ≤ (𝑟 ∨ 𝑦)) |