Proof of Theorem mod2ile
Step | Hyp | Ref
| Expression |
1 | | simpll 763 |
. . . . 5
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → 𝐾 ∈ Lat) |
2 | | simplr3 1215 |
. . . . . 6
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → 𝑍 ∈ 𝐵) |
3 | | simplr2 1214 |
. . . . . 6
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → 𝑌 ∈ 𝐵) |
4 | | simplr1 1213 |
. . . . . 6
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → 𝑋 ∈ 𝐵) |
5 | 2, 3, 4 | 3jca 1126 |
. . . . 5
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → (𝑍 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵)) |
6 | 1, 5 | jca 511 |
. . . 4
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → (𝐾 ∈ Lat ∧ (𝑍 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵))) |
7 | | simpr 484 |
. . . 4
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → 𝑍 ≤ 𝑋) |
8 | | modle.b |
. . . . 5
⊢ 𝐵 = (Base‘𝐾) |
9 | | modle.l |
. . . . 5
⊢ ≤ =
(le‘𝐾) |
10 | | modle.j |
. . . . 5
⊢ ∨ =
(join‘𝐾) |
11 | | modle.m |
. . . . 5
⊢ ∧ =
(meet‘𝐾) |
12 | 8, 9, 10, 11 | mod1ile 18126 |
. . . 4
⊢ ((𝐾 ∈ Lat ∧ (𝑍 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵)) → (𝑍 ≤ 𝑋 → (𝑍 ∨ (𝑌 ∧ 𝑋)) ≤ ((𝑍 ∨ 𝑌) ∧ 𝑋))) |
13 | 6, 7, 12 | sylc 65 |
. . 3
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → (𝑍 ∨ (𝑌 ∧ 𝑋)) ≤ ((𝑍 ∨ 𝑌) ∧ 𝑋)) |
14 | 8, 11 | latmcom 18096 |
. . . . . 6
⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ 𝑌) = (𝑌 ∧ 𝑋)) |
15 | 1, 4, 3, 14 | syl3anc 1369 |
. . . . 5
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → (𝑋 ∧ 𝑌) = (𝑌 ∧ 𝑋)) |
16 | 15 | oveq1d 7270 |
. . . 4
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → ((𝑋 ∧ 𝑌) ∨ 𝑍) = ((𝑌 ∧ 𝑋) ∨ 𝑍)) |
17 | 8, 11 | latmcl 18073 |
. . . . . 6
⊢ ((𝐾 ∈ Lat ∧ 𝑌 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵) → (𝑌 ∧ 𝑋) ∈ 𝐵) |
18 | 1, 3, 4, 17 | syl3anc 1369 |
. . . . 5
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → (𝑌 ∧ 𝑋) ∈ 𝐵) |
19 | 8, 10 | latjcom 18080 |
. . . . 5
⊢ ((𝐾 ∈ Lat ∧ (𝑌 ∧ 𝑋) ∈ 𝐵 ∧ 𝑍 ∈ 𝐵) → ((𝑌 ∧ 𝑋) ∨ 𝑍) = (𝑍 ∨ (𝑌 ∧ 𝑋))) |
20 | 1, 18, 2, 19 | syl3anc 1369 |
. . . 4
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → ((𝑌 ∧ 𝑋) ∨ 𝑍) = (𝑍 ∨ (𝑌 ∧ 𝑋))) |
21 | 16, 20 | eqtrd 2778 |
. . 3
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → ((𝑋 ∧ 𝑌) ∨ 𝑍) = (𝑍 ∨ (𝑌 ∧ 𝑋))) |
22 | 8, 10 | latjcom 18080 |
. . . . . 6
⊢ ((𝐾 ∈ Lat ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵) → (𝑌 ∨ 𝑍) = (𝑍 ∨ 𝑌)) |
23 | 1, 3, 2, 22 | syl3anc 1369 |
. . . . 5
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → (𝑌 ∨ 𝑍) = (𝑍 ∨ 𝑌)) |
24 | 23 | oveq2d 7271 |
. . . 4
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → (𝑋 ∧ (𝑌 ∨ 𝑍)) = (𝑋 ∧ (𝑍 ∨ 𝑌))) |
25 | 8, 10 | latjcl 18072 |
. . . . . 6
⊢ ((𝐾 ∈ Lat ∧ 𝑍 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑍 ∨ 𝑌) ∈ 𝐵) |
26 | 1, 2, 3, 25 | syl3anc 1369 |
. . . . 5
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → (𝑍 ∨ 𝑌) ∈ 𝐵) |
27 | 8, 11 | latmcom 18096 |
. . . . 5
⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ (𝑍 ∨ 𝑌) ∈ 𝐵) → (𝑋 ∧ (𝑍 ∨ 𝑌)) = ((𝑍 ∨ 𝑌) ∧ 𝑋)) |
28 | 1, 4, 26, 27 | syl3anc 1369 |
. . . 4
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → (𝑋 ∧ (𝑍 ∨ 𝑌)) = ((𝑍 ∨ 𝑌) ∧ 𝑋)) |
29 | 24, 28 | eqtrd 2778 |
. . 3
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → (𝑋 ∧ (𝑌 ∨ 𝑍)) = ((𝑍 ∨ 𝑌) ∧ 𝑋)) |
30 | 13, 21, 29 | 3brtr4d 5102 |
. 2
⊢ (((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) ∧ 𝑍 ≤ 𝑋) → ((𝑋 ∧ 𝑌) ∨ 𝑍) ≤ (𝑋 ∧ (𝑌 ∨ 𝑍))) |
31 | 30 | ex 412 |
1
⊢ ((𝐾 ∈ Lat ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) → (𝑍 ≤ 𝑋 → ((𝑋 ∧ 𝑌) ∨ 𝑍) ≤ (𝑋 ∧ (𝑌 ∨ 𝑍)))) |