Proof of Theorem pl42lem1N
Step | Hyp | Ref
| Expression |
1 | | simp11 1201 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝐾 ∈ HL) |
2 | 1 | hllatd 37305 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝐾 ∈ Lat) |
3 | | simp12 1202 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑋 ∈ 𝐵) |
4 | | simp13 1203 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑌 ∈ 𝐵) |
5 | | pl42lem.b |
. . . . . . . 8
⊢ 𝐵 = (Base‘𝐾) |
6 | | pl42lem.j |
. . . . . . . 8
⊢ ∨ =
(join‘𝐾) |
7 | 5, 6 | latjcl 18072 |
. . . . . . 7
⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∨ 𝑌) ∈ 𝐵) |
8 | 2, 3, 4, 7 | syl3anc 1369 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝑋 ∨ 𝑌) ∈ 𝐵) |
9 | | simp21 1204 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑍 ∈ 𝐵) |
10 | | pl42lem.m |
. . . . . . 7
⊢ ∧ =
(meet‘𝐾) |
11 | 5, 10 | latmcl 18073 |
. . . . . 6
⊢ ((𝐾 ∈ Lat ∧ (𝑋 ∨ 𝑌) ∈ 𝐵 ∧ 𝑍 ∈ 𝐵) → ((𝑋 ∨ 𝑌) ∧ 𝑍) ∈ 𝐵) |
12 | 2, 8, 9, 11 | syl3anc 1369 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝑋 ∨ 𝑌) ∧ 𝑍) ∈ 𝐵) |
13 | | simp22 1205 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑊 ∈ 𝐵) |
14 | 5, 6 | latjcl 18072 |
. . . . 5
⊢ ((𝐾 ∈ Lat ∧ ((𝑋 ∨ 𝑌) ∧ 𝑍) ∈ 𝐵 ∧ 𝑊 ∈ 𝐵) → (((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∈ 𝐵) |
15 | 2, 12, 13, 14 | syl3anc 1369 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∈ 𝐵) |
16 | | simp23 1206 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑉 ∈ 𝐵) |
17 | | eqid 2738 |
. . . . 5
⊢
(Atoms‘𝐾) =
(Atoms‘𝐾) |
18 | | pl42lem.f |
. . . . 5
⊢ 𝐹 = (pmap‘𝐾) |
19 | 5, 10, 17, 18 | pmapmeet 37714 |
. . . 4
⊢ ((𝐾 ∈ HL ∧ (((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) → (𝐹‘((((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∧ 𝑉)) = ((𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) ∩ (𝐹‘𝑉))) |
20 | 1, 15, 16, 19 | syl3anc 1369 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘((((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∧ 𝑉)) = ((𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) ∩ (𝐹‘𝑉))) |
21 | | pl42lem.l |
. . . . . . 7
⊢ ≤ =
(le‘𝐾) |
22 | | hlop 37303 |
. . . . . . . . 9
⊢ (𝐾 ∈ HL → 𝐾 ∈ OP) |
23 | 1, 22 | syl 17 |
. . . . . . . 8
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝐾 ∈ OP) |
24 | | pl42lem.o |
. . . . . . . . 9
⊢ ⊥ =
(oc‘𝐾) |
25 | 5, 24 | opoccl 37135 |
. . . . . . . 8
⊢ ((𝐾 ∈ OP ∧ 𝑊 ∈ 𝐵) → ( ⊥ ‘𝑊) ∈ 𝐵) |
26 | 23, 13, 25 | syl2anc 583 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ( ⊥ ‘𝑊) ∈ 𝐵) |
27 | 5, 21, 10 | latmle2 18098 |
. . . . . . . 8
⊢ ((𝐾 ∈ Lat ∧ (𝑋 ∨ 𝑌) ∈ 𝐵 ∧ 𝑍 ∈ 𝐵) → ((𝑋 ∨ 𝑌) ∧ 𝑍) ≤ 𝑍) |
28 | 2, 8, 9, 27 | syl3anc 1369 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝑋 ∨ 𝑌) ∧ 𝑍) ≤ 𝑍) |
29 | | simp3r 1200 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑍 ≤ ( ⊥ ‘𝑊)) |
30 | 5, 21, 2, 12, 9, 26, 28, 29 | lattrd 18079 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝑋 ∨ 𝑌) ∧ 𝑍) ≤ ( ⊥ ‘𝑊)) |
31 | | pl42lem.p |
. . . . . . 7
⊢ + =
(+𝑃‘𝐾) |
32 | 5, 21, 6, 18, 24, 31 | pmapojoinN 37909 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ ((𝑋 ∨ 𝑌) ∧ 𝑍) ∈ 𝐵 ∧ 𝑊 ∈ 𝐵) ∧ ((𝑋 ∨ 𝑌) ∧ 𝑍) ≤ ( ⊥ ‘𝑊)) → (𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) = ((𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) + (𝐹‘𝑊))) |
33 | 1, 12, 13, 30, 32 | syl31anc 1371 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) = ((𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) + (𝐹‘𝑊))) |
34 | 5, 10, 17, 18 | pmapmeet 37714 |
. . . . . . . 8
⊢ ((𝐾 ∈ HL ∧ (𝑋 ∨ 𝑌) ∈ 𝐵 ∧ 𝑍 ∈ 𝐵) → (𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) = ((𝐹‘(𝑋 ∨ 𝑌)) ∩ (𝐹‘𝑍))) |
35 | 1, 8, 9, 34 | syl3anc 1369 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) = ((𝐹‘(𝑋 ∨ 𝑌)) ∩ (𝐹‘𝑍))) |
36 | | simp3l 1199 |
. . . . . . . . 9
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑋 ≤ ( ⊥ ‘𝑌)) |
37 | 5, 21, 6, 18, 24, 31 | pmapojoinN 37909 |
. . . . . . . . 9
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋 ≤ ( ⊥ ‘𝑌)) → (𝐹‘(𝑋 ∨ 𝑌)) = ((𝐹‘𝑋) + (𝐹‘𝑌))) |
38 | 1, 3, 4, 36, 37 | syl31anc 1371 |
. . . . . . . 8
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘(𝑋 ∨ 𝑌)) = ((𝐹‘𝑋) + (𝐹‘𝑌))) |
39 | 38 | ineq1d 4142 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝐹‘(𝑋 ∨ 𝑌)) ∩ (𝐹‘𝑍)) = (((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍))) |
40 | 35, 39 | eqtrd 2778 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) = (((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍))) |
41 | 40 | oveq1d 7270 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) + (𝐹‘𝑊)) = ((((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)) + (𝐹‘𝑊))) |
42 | 33, 41 | eqtrd 2778 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) = ((((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)) + (𝐹‘𝑊))) |
43 | 42 | ineq1d 4142 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) ∩ (𝐹‘𝑉)) = (((((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)) + (𝐹‘𝑊)) ∩ (𝐹‘𝑉))) |
44 | 20, 43 | eqtrd 2778 |
. 2
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘((((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∧ 𝑉)) = (((((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)) + (𝐹‘𝑊)) ∩ (𝐹‘𝑉))) |
45 | 44 | 3expia 1119 |
1
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵)) → ((𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊)) → (𝐹‘((((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∧ 𝑉)) = (((((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)) + (𝐹‘𝑊)) ∩ (𝐹‘𝑉)))) |