Step | Hyp | Ref
| Expression |
1 | | cdleme19.l |
. . 3
β’ β€ =
(leβπΎ) |
2 | | cdleme19.j |
. . 3
β’ β¨ =
(joinβπΎ) |
3 | | cdleme19.m |
. . 3
β’ β§ =
(meetβπΎ) |
4 | | cdleme19.a |
. . 3
β’ π΄ = (AtomsβπΎ) |
5 | | cdleme19.h |
. . 3
β’ π» = (LHypβπΎ) |
6 | | cdleme19.u |
. . 3
β’ π = ((π β¨ π) β§ π) |
7 | | cdleme19.f |
. . 3
β’ πΉ = ((π β¨ π) β§ (π β¨ ((π β¨ π) β§ π))) |
8 | | cdleme19.g |
. . 3
β’ πΊ = ((π β¨ π) β§ (π β¨ ((π β¨ π) β§ π))) |
9 | | cdleme19.d |
. . 3
β’ π· = ((π
β¨ π) β§ π) |
10 | | cdleme19.y |
. . 3
β’ π = ((π
β¨ π) β§ π) |
11 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 | cdleme19b 39163 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β π· β€ (πΉ β¨ πΊ)) |
12 | | simp11l 1284 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β πΎ β HL) |
13 | | hlcvl 38217 |
. . . 4
β’ (πΎ β HL β πΎ β CvLat) |
14 | 12, 13 | syl 17 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β πΎ β CvLat) |
15 | | simp11r 1285 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β π β π») |
16 | | simp21l 1290 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β π β π΄) |
17 | | simp21r 1291 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β Β¬ π β€ π) |
18 | | simp23 1208 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β π
β π΄) |
19 | | simp33l 1300 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β π
β€ (π β¨ π)) |
20 | | simp32l 1298 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β Β¬ π β€ (π β¨ π)) |
21 | 1, 2, 3, 4, 5, 9 | cdlemeda 39157 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
β π΄ β§ π
β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π))) β π· β π΄) |
22 | 12, 15, 16, 17, 18, 19, 20, 21 | syl223anc 1396 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β π· β π΄) |
23 | | simp11 1203 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β (πΎ β HL β§ π β π»)) |
24 | | simp12 1204 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β (π β π΄ β§ Β¬ π β€ π)) |
25 | | simp13 1205 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β (π β π΄ β§ Β¬ π β€ π)) |
26 | | simp22 1207 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β (π β π΄ β§ Β¬ π β€ π)) |
27 | | simp31l 1296 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β π β π) |
28 | | simp32r 1299 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β Β¬ π β€ (π β¨ π)) |
29 | 1, 2, 3, 4, 5, 6, 8 | cdleme3fa 39095 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ Β¬ π β€ (π β¨ π))) β πΊ β π΄) |
30 | 23, 24, 25, 26, 27, 28, 29 | syl132anc 1388 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β πΊ β π΄) |
31 | | simp21 1206 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β (π β π΄ β§ Β¬ π β€ π)) |
32 | 1, 2, 3, 4, 5, 6, 7 | cdleme3fa 39095 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ Β¬ π β€ (π β¨ π))) β πΉ β π΄) |
33 | 23, 24, 25, 31, 27, 20, 32 | syl132anc 1388 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β πΉ β π΄) |
34 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 | cdleme19c 39164 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π
β π΄ β§ π β π β§ Β¬ π β€ (π β¨ π))) β πΉ β π·) |
35 | 12, 15, 24, 25, 31, 18, 27, 20, 34 | syl233anc 1399 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β πΉ β π·) |
36 | 35 | necomd 2996 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β π· β πΉ) |
37 | 1, 2, 4 | cvlatexchb1 38192 |
. . 3
β’ ((πΎ β CvLat β§ (π· β π΄ β§ πΊ β π΄ β§ πΉ β π΄) β§ π· β πΉ) β (π· β€ (πΉ β¨ πΊ) β (πΉ β¨ π·) = (πΉ β¨ πΊ))) |
38 | 14, 22, 30, 33, 36, 37 | syl131anc 1383 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β (π· β€ (πΉ β¨ πΊ) β (πΉ β¨ π·) = (πΉ β¨ πΊ))) |
39 | 11, 38 | mpbid 231 |
1
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π
β π΄) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ (π
β€ (π β¨ π) β§ π
β€ (π β¨ π)))) β (πΉ β¨ π·) = (πΉ β¨ πΊ)) |