Step | Hyp | Ref
| Expression |
1 | | simp11 1203 |
. . 3
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β πΎ β HL) |
2 | | simp12 1204 |
. . . 4
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β π β π΄) |
3 | | simp13 1205 |
. . . 4
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β π β π΄) |
4 | | simp21 1206 |
. . . 4
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β π
β π΄) |
5 | 2, 3, 4 | 3jca 1128 |
. . 3
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β (π β π΄ β§ π β π΄ β§ π
β π΄)) |
6 | | simp22 1207 |
. . . 4
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β π β π΄) |
7 | | simp23 1208 |
. . . 4
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β π β π΄) |
8 | 6, 7 | jca 512 |
. . 3
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β (π β π΄ β§ π β π΄)) |
9 | | simp31 1209 |
. . . 4
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β Β¬ π β€ (π β¨ π
)) |
10 | | simp32 1210 |
. . . 4
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β π β π) |
11 | 9, 10 | jca 512 |
. . 3
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β (Β¬ π β€ (π β¨ π
) β§ π β π)) |
12 | | simp33 1211 |
. . 3
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β (π β€ (π β¨ π) β§ π β€ (π β¨ π
))) |
13 | | ps-2b.l |
. . . 4
β’ β€ =
(leβπΎ) |
14 | | ps-2b.j |
. . . 4
β’ β¨ =
(joinβπΎ) |
15 | | ps-2b.a |
. . . 4
β’ π΄ = (AtomsβπΎ) |
16 | 13, 14, 15 | ps-2 38652 |
. . 3
β’ (((πΎ β HL β§ (π β π΄ β§ π β π΄ β§ π
β π΄) β§ (π β π΄ β§ π β π΄)) β§ ((Β¬ π β€ (π β¨ π
) β§ π β π) β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β βπ’ β π΄ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) |
17 | 1, 5, 8, 11, 12, 16 | syl32anc 1378 |
. 2
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β βπ’ β π΄ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) |
18 | | simp111 1302 |
. . . . 5
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β πΎ β HL) |
19 | | hlatl 38533 |
. . . . 5
β’ (πΎ β HL β πΎ β AtLat) |
20 | 18, 19 | syl 17 |
. . . 4
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β πΎ β AtLat) |
21 | 18 | hllatd 38537 |
. . . . 5
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β πΎ β Lat) |
22 | | simp112 1303 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β π β π΄) |
23 | | simp121 1305 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β π
β π΄) |
24 | | eqid 2732 |
. . . . . . 7
β’
(BaseβπΎ) =
(BaseβπΎ) |
25 | 24, 14, 15 | hlatjcl 38540 |
. . . . . 6
β’ ((πΎ β HL β§ π β π΄ β§ π
β π΄) β (π β¨ π
) β (BaseβπΎ)) |
26 | 18, 22, 23, 25 | syl3anc 1371 |
. . . . 5
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β (π β¨ π
) β (BaseβπΎ)) |
27 | | simp122 1306 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β π β π΄) |
28 | | simp123 1307 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β π β π΄) |
29 | 24, 14, 15 | hlatjcl 38540 |
. . . . . 6
β’ ((πΎ β HL β§ π β π΄ β§ π β π΄) β (π β¨ π) β (BaseβπΎ)) |
30 | 18, 27, 28, 29 | syl3anc 1371 |
. . . . 5
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β (π β¨ π) β (BaseβπΎ)) |
31 | | ps-2b.m |
. . . . . 6
β’ β§ =
(meetβπΎ) |
32 | 24, 31 | latmcl 18397 |
. . . . 5
β’ ((πΎ β Lat β§ (π β¨ π
) β (BaseβπΎ) β§ (π β¨ π) β (BaseβπΎ)) β ((π β¨ π
) β§ (π β¨ π)) β (BaseβπΎ)) |
33 | 21, 26, 30, 32 | syl3anc 1371 |
. . . 4
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β ((π β¨ π
) β§ (π β¨ π)) β (BaseβπΎ)) |
34 | | simp2 1137 |
. . . 4
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β π’ β π΄) |
35 | | simp3 1138 |
. . . . 5
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) |
36 | 24, 15 | atbase 38462 |
. . . . . . 7
β’ (π’ β π΄ β π’ β (BaseβπΎ)) |
37 | 34, 36 | syl 17 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β π’ β (BaseβπΎ)) |
38 | 24, 13, 31 | latlem12 18423 |
. . . . . 6
β’ ((πΎ β Lat β§ (π’ β (BaseβπΎ) β§ (π β¨ π
) β (BaseβπΎ) β§ (π β¨ π) β (BaseβπΎ))) β ((π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π)) β π’ β€ ((π β¨ π
) β§ (π β¨ π)))) |
39 | 21, 37, 26, 30, 38 | syl13anc 1372 |
. . . . 5
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β ((π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π)) β π’ β€ ((π β¨ π
) β§ (π β¨ π)))) |
40 | 35, 39 | mpbid 231 |
. . . 4
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β π’ β€ ((π β¨ π
) β§ (π β¨ π))) |
41 | | ps-2b.z |
. . . . 5
β’ 0 =
(0.βπΎ) |
42 | 24, 13, 41, 15 | atlen0 38483 |
. . . 4
β’ (((πΎ β AtLat β§ ((π β¨ π
) β§ (π β¨ π)) β (BaseβπΎ) β§ π’ β π΄) β§ π’ β€ ((π β¨ π
) β§ (π β¨ π))) β ((π β¨ π
) β§ (π β¨ π)) β 0 ) |
43 | 20, 33, 34, 40, 42 | syl31anc 1373 |
. . 3
β’ ((((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β§ π’ β π΄ β§ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π))) β ((π β¨ π
) β§ (π β¨ π)) β 0 ) |
44 | 43 | rexlimdv3a 3159 |
. 2
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β (βπ’ β π΄ (π’ β€ (π β¨ π
) β§ π’ β€ (π β¨ π)) β ((π β¨ π
) β§ (π β¨ π)) β 0 )) |
45 | 17, 44 | mpd 15 |
1
β’ (((πΎ β HL β§ π β π΄ β§ π β π΄) β§ (π
β π΄ β§ π β π΄ β§ π β π΄) β§ (Β¬ π β€ (π β¨ π
) β§ π β π β§ (π β€ (π β¨ π) β§ π β€ (π β¨ π
)))) β ((π β¨ π
) β§ (π β¨ π)) β 0 ) |