Step | Hyp | Ref
| Expression |
1 | | cdleme0.u |
. . . . 5
β’ π = ((π β¨ π) β§ π) |
2 | | cdleme0c.3 |
. . . . 5
β’ π = ((π β¨ π
) β§ π) |
3 | 1, 2 | oveq12i 7423 |
. . . 4
β’ (π β§ π) = (((π β¨ π) β§ π) β§ ((π β¨ π
) β§ π)) |
4 | | simp1l 1197 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β πΎ β HL) |
5 | | hlol 38534 |
. . . . . . 7
β’ (πΎ β HL β πΎ β OL) |
6 | 4, 5 | syl 17 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β πΎ β OL) |
7 | | simp21l 1290 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β π΄) |
8 | | simp22 1207 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β π΄) |
9 | | eqid 2732 |
. . . . . . . 8
β’
(BaseβπΎ) =
(BaseβπΎ) |
10 | | cdleme0.j |
. . . . . . . 8
β’ β¨ =
(joinβπΎ) |
11 | | cdleme0.a |
. . . . . . . 8
β’ π΄ = (AtomsβπΎ) |
12 | 9, 10, 11 | hlatjcl 38540 |
. . . . . . 7
β’ ((πΎ β HL β§ π β π΄ β§ π β π΄) β (π β¨ π) β (BaseβπΎ)) |
13 | 4, 7, 8, 12 | syl3anc 1371 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (π β¨ π) β (BaseβπΎ)) |
14 | | simp23l 1294 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π
β π΄) |
15 | 9, 10, 11 | hlatjcl 38540 |
. . . . . . 7
β’ ((πΎ β HL β§ π β π΄ β§ π
β π΄) β (π β¨ π
) β (BaseβπΎ)) |
16 | 4, 7, 14, 15 | syl3anc 1371 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (π β¨ π
) β (BaseβπΎ)) |
17 | | simp1r 1198 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β π») |
18 | | cdleme0.h |
. . . . . . . 8
β’ π» = (LHypβπΎ) |
19 | 9, 18 | lhpbase 39172 |
. . . . . . 7
β’ (π β π» β π β (BaseβπΎ)) |
20 | 17, 19 | syl 17 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β (BaseβπΎ)) |
21 | | cdleme0.m |
. . . . . . 7
β’ β§ =
(meetβπΎ) |
22 | 9, 21 | latmmdir 38408 |
. . . . . 6
β’ ((πΎ β OL β§ ((π β¨ π) β (BaseβπΎ) β§ (π β¨ π
) β (BaseβπΎ) β§ π β (BaseβπΎ))) β (((π β¨ π) β§ (π β¨ π
)) β§ π) = (((π β¨ π) β§ π) β§ ((π β¨ π
) β§ π))) |
23 | 6, 13, 16, 20, 22 | syl13anc 1372 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (((π β¨ π) β§ (π β¨ π
)) β§ π) = (((π β¨ π) β§ π) β§ ((π β¨ π
) β§ π))) |
24 | 4 | hllatd 38537 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β πΎ β Lat) |
25 | 9, 11 | atbase 38462 |
. . . . . . . . 9
β’ (π
β π΄ β π
β (BaseβπΎ)) |
26 | 14, 25 | syl 17 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π
β (BaseβπΎ)) |
27 | 9, 11 | atbase 38462 |
. . . . . . . . 9
β’ (π β π΄ β π β (BaseβπΎ)) |
28 | 7, 27 | syl 17 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β (BaseβπΎ)) |
29 | 9, 11 | atbase 38462 |
. . . . . . . . 9
β’ (π β π΄ β π β (BaseβπΎ)) |
30 | 8, 29 | syl 17 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β (BaseβπΎ)) |
31 | | simp3r 1202 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β Β¬ π
β€ (π β¨ π)) |
32 | | cdleme0.l |
. . . . . . . . . 10
β’ β€ =
(leβπΎ) |
33 | 9, 32, 10 | latnlej1r 18415 |
. . . . . . . . 9
β’ ((πΎ β Lat β§ (π
β (BaseβπΎ) β§ π β (BaseβπΎ) β§ π β (BaseβπΎ)) β§ Β¬ π
β€ (π β¨ π)) β π
β π) |
34 | 33 | necomd 2996 |
. . . . . . . 8
β’ ((πΎ β Lat β§ (π
β (BaseβπΎ) β§ π β (BaseβπΎ) β§ π β (BaseβπΎ)) β§ Β¬ π
β€ (π β¨ π)) β π β π
) |
35 | 24, 26, 28, 30, 31, 34 | syl131anc 1383 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β π
) |
36 | | simp3 1138 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (π β π β§ Β¬ π
β€ (π β¨ π))) |
37 | 32, 10, 11 | hlatcon3 38625 |
. . . . . . . 8
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΄ β§ π
β π΄) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β Β¬ π β€ (π β¨ π
)) |
38 | 4, 7, 8, 14, 36, 37 | syl131anc 1383 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β Β¬ π β€ (π β¨ π
)) |
39 | 32, 10, 21, 11 | 2llnma2 38963 |
. . . . . . 7
β’ ((πΎ β HL β§ (π β π΄ β§ π
β π΄ β§ π β π΄) β§ (π β π
β§ Β¬ π β€ (π β¨ π
))) β ((π β¨ π) β§ (π β¨ π
)) = π) |
40 | 4, 8, 14, 7, 35, 38, 39 | syl132anc 1388 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β ((π β¨ π) β§ (π β¨ π
)) = π) |
41 | 40 | oveq1d 7426 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (((π β¨ π) β§ (π β¨ π
)) β§ π) = (π β§ π)) |
42 | 23, 41 | eqtr3d 2774 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (((π β¨ π) β§ π) β§ ((π β¨ π
) β§ π)) = (π β§ π)) |
43 | 3, 42 | eqtrid 2784 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (π β§ π) = (π β§ π)) |
44 | | simp1 1136 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (πΎ β HL β§ π β π»)) |
45 | | simp21 1206 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (π β π΄ β§ Β¬ π β€ π)) |
46 | | eqid 2732 |
. . . . 5
β’
(0.βπΎ) =
(0.βπΎ) |
47 | 32, 21, 46, 11, 18 | lhpmat 39204 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π)) β (π β§ π) = (0.βπΎ)) |
48 | 44, 45, 47 | syl2anc 584 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (π β§ π) = (0.βπΎ)) |
49 | 43, 48 | eqtrd 2772 |
. 2
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (π β§ π) = (0.βπΎ)) |
50 | | hlatl 38533 |
. . . 4
β’ (πΎ β HL β πΎ β AtLat) |
51 | 4, 50 | syl 17 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β πΎ β AtLat) |
52 | | simp3l 1201 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β π) |
53 | 32, 10, 21, 11, 18, 1 | lhpat2 39219 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ π β π)) β π β π΄) |
54 | 44, 45, 8, 52, 53 | syl112anc 1374 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β π΄) |
55 | 9, 32, 10 | latnlej1l 18414 |
. . . . . 6
β’ ((πΎ β Lat β§ (π
β (BaseβπΎ) β§ π β (BaseβπΎ) β§ π β (BaseβπΎ)) β§ Β¬ π
β€ (π β¨ π)) β π
β π) |
56 | 55 | necomd 2996 |
. . . . 5
β’ ((πΎ β Lat β§ (π
β (BaseβπΎ) β§ π β (BaseβπΎ) β§ π β (BaseβπΎ)) β§ Β¬ π
β€ (π β¨ π)) β π β π
) |
57 | 24, 26, 28, 30, 31, 56 | syl131anc 1383 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β π
) |
58 | 32, 10, 21, 11, 18, 2 | lhpat2 39219 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
β π΄ β§ π β π
)) β π β π΄) |
59 | 44, 45, 14, 57, 58 | syl112anc 1374 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β π΄) |
60 | 21, 46, 11 | atnem0 38491 |
. . 3
β’ ((πΎ β AtLat β§ π β π΄ β§ π β π΄) β (π β π β (π β§ π) = (0.βπΎ))) |
61 | 51, 54, 59, 60 | syl3anc 1371 |
. 2
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β (π β π β (π β§ π) = (0.βπΎ))) |
62 | 49, 61 | mpbird 256 |
1
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ (π β π β§ Β¬ π
β€ (π β¨ π))) β π β π) |