Step | Hyp | Ref
| Expression |
1 | | cdleme22eALT.n |
. . 3
β’ π = ((π β¨ π) β§ (πΉ β¨ ((π β¨ π¦) β§ π))) |
2 | | simp11 1204 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β πΎ β HL) |
3 | 2 | hllatd 38172 |
. . . 4
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β πΎ β Lat) |
4 | | simp21l 1291 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β π΄) |
5 | | simp22l 1293 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β π΄) |
6 | | eqid 2733 |
. . . . . 6
β’
(BaseβπΎ) =
(BaseβπΎ) |
7 | | cdleme22.j |
. . . . . 6
β’ β¨ =
(joinβπΎ) |
8 | | cdleme22.a |
. . . . . 6
β’ π΄ = (AtomsβπΎ) |
9 | 6, 7, 8 | hlatjcl 38175 |
. . . . 5
β’ ((πΎ β HL β§ π β π΄ β§ π β π΄) β (π β¨ π) β (BaseβπΎ)) |
10 | 2, 4, 5, 9 | syl3anc 1372 |
. . . 4
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) β (BaseβπΎ)) |
11 | | simp12 1205 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β π») |
12 | | simp3ll 1245 |
. . . . . . 7
β’ ((π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π))) β π¦ β π΄) |
13 | 12 | 3ad2ant3 1136 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π¦ β π΄) |
14 | | cdleme22.l |
. . . . . . 7
β’ β€ =
(leβπΎ) |
15 | | cdleme22.m |
. . . . . . 7
β’ β§ =
(meetβπΎ) |
16 | | cdleme22.h |
. . . . . . 7
β’ π» = (LHypβπΎ) |
17 | | cdleme22eALT.u |
. . . . . . 7
β’ π = ((π β¨ π) β§ π) |
18 | | cdleme22eALT.f |
. . . . . . 7
β’ πΉ = ((π¦ β¨ π) β§ (π β¨ ((π β¨ π¦) β§ π))) |
19 | 14, 7, 15, 8, 16, 17, 18, 6 | cdleme1b 39035 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ π β π΄ β§ π¦ β π΄)) β πΉ β (BaseβπΎ)) |
20 | 2, 11, 4, 5, 13, 19 | syl23anc 1378 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β πΉ β (BaseβπΎ)) |
21 | | simp31 1210 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β π΄) |
22 | 6, 7, 8 | hlatjcl 38175 |
. . . . . . 7
β’ ((πΎ β HL β§ π β π΄ β§ π¦ β π΄) β (π β¨ π¦) β (BaseβπΎ)) |
23 | 2, 21, 13, 22 | syl3anc 1372 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π¦) β (BaseβπΎ)) |
24 | 6, 16 | lhpbase 38807 |
. . . . . . 7
β’ (π β π» β π β (BaseβπΎ)) |
25 | 11, 24 | syl 17 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β (BaseβπΎ)) |
26 | 6, 15 | latmcl 18389 |
. . . . . 6
β’ ((πΎ β Lat β§ (π β¨ π¦) β (BaseβπΎ) β§ π β (BaseβπΎ)) β ((π β¨ π¦) β§ π) β (BaseβπΎ)) |
27 | 3, 23, 25, 26 | syl3anc 1372 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π¦) β§ π) β (BaseβπΎ)) |
28 | 6, 7 | latjcl 18388 |
. . . . 5
β’ ((πΎ β Lat β§ πΉ β (BaseβπΎ) β§ ((π β¨ π¦) β§ π) β (BaseβπΎ)) β (πΉ β¨ ((π β¨ π¦) β§ π)) β (BaseβπΎ)) |
29 | 3, 20, 27, 28 | syl3anc 1372 |
. . . 4
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (πΉ β¨ ((π β¨ π¦) β§ π)) β (BaseβπΎ)) |
30 | 6, 14, 15 | latmle1 18413 |
. . . 4
β’ ((πΎ β Lat β§ (π β¨ π) β (BaseβπΎ) β§ (πΉ β¨ ((π β¨ π¦) β§ π)) β (BaseβπΎ)) β ((π β¨ π) β§ (πΉ β¨ ((π β¨ π¦) β§ π))) β€ (π β¨ π)) |
31 | 3, 10, 29, 30 | syl3anc 1372 |
. . 3
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β§ (πΉ β¨ ((π β¨ π¦) β§ π))) β€ (π β¨ π)) |
32 | 1, 31 | eqbrtrid 5182 |
. 2
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β€ (π β¨ π)) |
33 | | simp21 1207 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β π΄ β§ Β¬ π β€ π)) |
34 | | simp13 1206 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β π΄) |
35 | | simp321 1324 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β π΄) |
36 | | simp322 1325 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β€ π) |
37 | 35, 36 | jca 513 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β π΄ β§ π β€ π)) |
38 | | simp23 1209 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β π) |
39 | | simp323 1326 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) = (π β¨ π)) |
40 | 14, 7, 15, 8, 16, 17 | cdleme22a 39149 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ π β π΄ β§ π β π΄) β§ ((π β π΄ β§ π β€ π) β§ π β π β§ (π β¨ π) = (π β¨ π))) β π = π) |
41 | 2, 11, 33, 5, 34, 37, 38, 39, 40 | syl233anc 1400 |
. . . 4
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π = π) |
42 | 41 | oveq2d 7420 |
. . 3
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) = (π β¨ π)) |
43 | | cdleme22eALT.o |
. . . . 5
β’ π = ((π β¨ π) β§ (πΊ β¨ ((π β¨ π§) β§ π))) |
44 | 43 | oveq1i 7414 |
. . . 4
β’ (π β¨ π) = (((π β¨ π) β§ (πΊ β¨ ((π β¨ π§) β§ π))) β¨ π) |
45 | | simp21r 1292 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β Β¬ π β€ π) |
46 | 14, 7, 15, 8, 16, 17 | cdleme0a 39020 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ π β π)) β π β π΄) |
47 | 2, 11, 4, 45, 5, 38, 46 | syl222anc 1387 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β π΄) |
48 | | simp3rl 1247 |
. . . . . . . 8
β’ ((π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π))) β π§ β π΄) |
49 | 48 | 3ad2ant3 1136 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π§ β π΄) |
50 | | cdleme22eALT.g |
. . . . . . . 8
β’ πΊ = ((π§ β¨ π) β§ (π β¨ ((π β¨ π§) β§ π))) |
51 | 14, 7, 15, 8, 16, 17, 50, 6 | cdleme1b 39035 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ π β π΄ β§ π§ β π΄)) β πΊ β (BaseβπΎ)) |
52 | 2, 11, 4, 5, 49, 51 | syl23anc 1378 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β πΊ β (BaseβπΎ)) |
53 | 6, 7, 8 | hlatjcl 38175 |
. . . . . . . 8
β’ ((πΎ β HL β§ π β π΄ β§ π§ β π΄) β (π β¨ π§) β (BaseβπΎ)) |
54 | 2, 34, 49, 53 | syl3anc 1372 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π§) β (BaseβπΎ)) |
55 | 6, 15 | latmcl 18389 |
. . . . . . 7
β’ ((πΎ β Lat β§ (π β¨ π§) β (BaseβπΎ) β§ π β (BaseβπΎ)) β ((π β¨ π§) β§ π) β (BaseβπΎ)) |
56 | 3, 54, 25, 55 | syl3anc 1372 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π§) β§ π) β (BaseβπΎ)) |
57 | 6, 7 | latjcl 18388 |
. . . . . 6
β’ ((πΎ β Lat β§ πΊ β (BaseβπΎ) β§ ((π β¨ π§) β§ π) β (BaseβπΎ)) β (πΊ β¨ ((π β¨ π§) β§ π)) β (BaseβπΎ)) |
58 | 3, 52, 56, 57 | syl3anc 1372 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (πΊ β¨ ((π β¨ π§) β§ π)) β (BaseβπΎ)) |
59 | 14, 7, 15, 8, 16, 17 | cdlemeulpq 39029 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ π β π΄)) β π β€ (π β¨ π)) |
60 | 2, 11, 4, 5, 59 | syl22anc 838 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β€ (π β¨ π)) |
61 | 6, 14, 7, 15, 8 | atmod2i1 38670 |
. . . . 5
β’ ((πΎ β HL β§ (π β π΄ β§ (π β¨ π) β (BaseβπΎ) β§ (πΊ β¨ ((π β¨ π§) β§ π)) β (BaseβπΎ)) β§ π β€ (π β¨ π)) β (((π β¨ π) β§ (πΊ β¨ ((π β¨ π§) β§ π))) β¨ π) = ((π β¨ π) β§ ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π))) |
62 | 2, 47, 10, 58, 60, 61 | syl131anc 1384 |
. . . 4
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (((π β¨ π) β§ (πΊ β¨ ((π β¨ π§) β§ π))) β¨ π) = ((π β¨ π) β§ ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π))) |
63 | 44, 62 | eqtr2id 2786 |
. . 3
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β§ ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π)) = (π β¨ π)) |
64 | 41 | oveq2d 7420 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) = (π β¨ π)) |
65 | 39, 64 | eqtr3d 2775 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) = (π β¨ π)) |
66 | 6, 7, 8 | hlatjcl 38175 |
. . . . . . . 8
β’ ((πΎ β HL β§ π β π΄ β§ π β π΄) β (π β¨ π) β (BaseβπΎ)) |
67 | 2, 34, 47, 66 | syl3anc 1372 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) β (BaseβπΎ)) |
68 | 6, 8 | atbase 38097 |
. . . . . . . 8
β’ (π§ β π΄ β π§ β (BaseβπΎ)) |
69 | 49, 68 | syl 17 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π§ β (BaseβπΎ)) |
70 | 6, 14, 7 | latlej1 18397 |
. . . . . . 7
β’ ((πΎ β Lat β§ (π β¨ π) β (BaseβπΎ) β§ π§ β (BaseβπΎ)) β (π β¨ π) β€ ((π β¨ π) β¨ π§)) |
71 | 3, 67, 69, 70 | syl3anc 1372 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) β€ ((π β¨ π) β¨ π§)) |
72 | 7, 8 | hlatj32 38180 |
. . . . . . . 8
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΄ β§ π§ β π΄)) β ((π β¨ π) β¨ π§) = ((π β¨ π§) β¨ π)) |
73 | 2, 34, 47, 49, 72 | syl13anc 1373 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β¨ π§) = ((π β¨ π§) β¨ π)) |
74 | 6, 8 | atbase 38097 |
. . . . . . . . . 10
β’ (π β π΄ β π β (BaseβπΎ)) |
75 | 47, 74 | syl 17 |
. . . . . . . . 9
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β (BaseβπΎ)) |
76 | 6, 7 | latj32 18434 |
. . . . . . . . 9
β’ ((πΎ β Lat β§ (π§ β (BaseβπΎ) β§ π β (BaseβπΎ) β§ ((π β¨ π§) β§ π) β (BaseβπΎ))) β ((π§ β¨ π) β¨ ((π β¨ π§) β§ π)) = ((π§ β¨ ((π β¨ π§) β§ π)) β¨ π)) |
77 | 3, 69, 75, 56, 76 | syl13anc 1373 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π§ β¨ π) β¨ ((π β¨ π§) β§ π)) = ((π§ β¨ ((π β¨ π§) β§ π)) β¨ π)) |
78 | 6, 7 | latj32 18434 |
. . . . . . . . . 10
β’ ((πΎ β Lat β§ (πΊ β (BaseβπΎ) β§ ((π β¨ π§) β§ π) β (BaseβπΎ) β§ π β (BaseβπΎ))) β ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π) = ((πΊ β¨ π) β¨ ((π β¨ π§) β§ π))) |
79 | 3, 52, 56, 75, 78 | syl13anc 1373 |
. . . . . . . . 9
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π) = ((πΊ β¨ π) β¨ ((π β¨ π§) β§ π))) |
80 | 6, 7, 8 | hlatjcl 38175 |
. . . . . . . . . . . . . . . . . . 19
β’ ((πΎ β HL β§ π β π΄ β§ π§ β π΄) β (π β¨ π§) β (BaseβπΎ)) |
81 | 2, 4, 49, 80 | syl3anc 1372 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π§) β (BaseβπΎ)) |
82 | 14, 7, 8 | hlatlej1 38183 |
. . . . . . . . . . . . . . . . . . 19
β’ ((πΎ β HL β§ π β π΄ β§ π§ β π΄) β π β€ (π β¨ π§)) |
83 | 2, 4, 49, 82 | syl3anc 1372 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β€ (π β¨ π§)) |
84 | 6, 14, 7, 15, 8 | atmod3i1 38673 |
. . . . . . . . . . . . . . . . . 18
β’ ((πΎ β HL β§ (π β π΄ β§ (π β¨ π§) β (BaseβπΎ) β§ π β (BaseβπΎ)) β§ π β€ (π β¨ π§)) β (π β¨ ((π β¨ π§) β§ π)) = ((π β¨ π§) β§ (π β¨ π))) |
85 | 2, 4, 81, 25, 83, 84 | syl131anc 1384 |
. . . . . . . . . . . . . . . . 17
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ ((π β¨ π§) β§ π)) = ((π β¨ π§) β§ (π β¨ π))) |
86 | | eqid 2733 |
. . . . . . . . . . . . . . . . . . . 20
β’
(1.βπΎ) =
(1.βπΎ) |
87 | 14, 7, 86, 8, 16 | lhpjat2 38830 |
. . . . . . . . . . . . . . . . . . 19
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π)) β (π β¨ π) = (1.βπΎ)) |
88 | 2, 11, 33, 87 | syl21anc 837 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) = (1.βπΎ)) |
89 | 88 | oveq2d 7420 |
. . . . . . . . . . . . . . . . 17
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π§) β§ (π β¨ π)) = ((π β¨ π§) β§ (1.βπΎ))) |
90 | | hlol 38169 |
. . . . . . . . . . . . . . . . . . 19
β’ (πΎ β HL β πΎ β OL) |
91 | 2, 90 | syl 17 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β πΎ β OL) |
92 | 6, 15, 86 | olm11 38035 |
. . . . . . . . . . . . . . . . . 18
β’ ((πΎ β OL β§ (π β¨ π§) β (BaseβπΎ)) β ((π β¨ π§) β§ (1.βπΎ)) = (π β¨ π§)) |
93 | 91, 81, 92 | syl2anc 585 |
. . . . . . . . . . . . . . . . 17
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π§) β§ (1.βπΎ)) = (π β¨ π§)) |
94 | 85, 89, 93 | 3eqtrd 2777 |
. . . . . . . . . . . . . . . 16
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ ((π β¨ π§) β§ π)) = (π β¨ π§)) |
95 | 94 | oveq1d 7419 |
. . . . . . . . . . . . . . 15
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ ((π β¨ π§) β§ π)) β¨ π) = ((π β¨ π§) β¨ π)) |
96 | 17 | oveq2i 7415 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β¨ π) = (π β¨ ((π β¨ π) β§ π)) |
97 | 14, 7, 8 | hlatlej2 38184 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((πΎ β HL β§ π β π΄ β§ π β π΄) β π β€ (π β¨ π)) |
98 | 2, 4, 5, 97 | syl3anc 1372 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β€ (π β¨ π)) |
99 | 6, 14, 7, 15, 8 | atmod3i1 38673 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((πΎ β HL β§ (π β π΄ β§ (π β¨ π) β (BaseβπΎ) β§ π β (BaseβπΎ)) β§ π β€ (π β¨ π)) β (π β¨ ((π β¨ π) β§ π)) = ((π β¨ π) β§ (π β¨ π))) |
100 | 2, 5, 10, 25, 98, 99 | syl131anc 1384 |
. . . . . . . . . . . . . . . . . . 19
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ ((π β¨ π) β§ π)) = ((π β¨ π) β§ (π β¨ π))) |
101 | 96, 100 | eqtrid 2785 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) = ((π β¨ π) β§ (π β¨ π))) |
102 | | simp22 1208 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β π΄ β§ Β¬ π β€ π)) |
103 | 14, 7, 86, 8, 16 | lhpjat2 38830 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π)) β (π β¨ π) = (1.βπΎ)) |
104 | 2, 11, 102, 103 | syl21anc 837 |
. . . . . . . . . . . . . . . . . . 19
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) = (1.βπΎ)) |
105 | 104 | oveq2d 7420 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β§ (π β¨ π)) = ((π β¨ π) β§ (1.βπΎ))) |
106 | 6, 15, 86 | olm11 38035 |
. . . . . . . . . . . . . . . . . . 19
β’ ((πΎ β OL β§ (π β¨ π) β (BaseβπΎ)) β ((π β¨ π) β§ (1.βπΎ)) = (π β¨ π)) |
107 | 91, 10, 106 | syl2anc 585 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β§ (1.βπΎ)) = (π β¨ π)) |
108 | 101, 105,
107 | 3eqtrd 2777 |
. . . . . . . . . . . . . . . . 17
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) = (π β¨ π)) |
109 | 108 | oveq1d 7419 |
. . . . . . . . . . . . . . . 16
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β¨ ((π β¨ π§) β§ π)) = ((π β¨ π) β¨ ((π β¨ π§) β§ π))) |
110 | 6, 8 | atbase 38097 |
. . . . . . . . . . . . . . . . . 18
β’ (π β π΄ β π β (BaseβπΎ)) |
111 | 4, 110 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β (BaseβπΎ)) |
112 | 6, 15 | latmcl 18389 |
. . . . . . . . . . . . . . . . . 18
β’ ((πΎ β Lat β§ (π β¨ π§) β (BaseβπΎ) β§ π β (BaseβπΎ)) β ((π β¨ π§) β§ π) β (BaseβπΎ)) |
113 | 3, 81, 25, 112 | syl3anc 1372 |
. . . . . . . . . . . . . . . . 17
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π§) β§ π) β (BaseβπΎ)) |
114 | 6, 8 | atbase 38097 |
. . . . . . . . . . . . . . . . . 18
β’ (π β π΄ β π β (BaseβπΎ)) |
115 | 5, 114 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β (BaseβπΎ)) |
116 | 6, 7 | latj32 18434 |
. . . . . . . . . . . . . . . . 17
β’ ((πΎ β Lat β§ (π β (BaseβπΎ) β§ ((π β¨ π§) β§ π) β (BaseβπΎ) β§ π β (BaseβπΎ))) β ((π β¨ ((π β¨ π§) β§ π)) β¨ π) = ((π β¨ π) β¨ ((π β¨ π§) β§ π))) |
117 | 3, 111, 113, 115, 116 | syl13anc 1373 |
. . . . . . . . . . . . . . . 16
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ ((π β¨ π§) β§ π)) β¨ π) = ((π β¨ π) β¨ ((π β¨ π§) β§ π))) |
118 | 109, 117 | eqtr4d 2776 |
. . . . . . . . . . . . . . 15
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β¨ ((π β¨ π§) β§ π)) = ((π β¨ ((π β¨ π§) β§ π)) β¨ π)) |
119 | 7, 8 | hlatj32 38180 |
. . . . . . . . . . . . . . . 16
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΄ β§ π§ β π΄)) β ((π β¨ π) β¨ π§) = ((π β¨ π§) β¨ π)) |
120 | 2, 4, 5, 49, 119 | syl13anc 1373 |
. . . . . . . . . . . . . . 15
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β¨ π§) = ((π β¨ π§) β¨ π)) |
121 | 95, 118, 120 | 3eqtr4rd 2784 |
. . . . . . . . . . . . . 14
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β¨ π§) = ((π β¨ π) β¨ ((π β¨ π§) β§ π))) |
122 | 6, 7 | latj32 18434 |
. . . . . . . . . . . . . . 15
β’ ((πΎ β Lat β§ (π β (BaseβπΎ) β§ π β (BaseβπΎ) β§ ((π β¨ π§) β§ π) β (BaseβπΎ))) β ((π β¨ π) β¨ ((π β¨ π§) β§ π)) = ((π β¨ ((π β¨ π§) β§ π)) β¨ π)) |
123 | 3, 115, 75, 113, 122 | syl13anc 1373 |
. . . . . . . . . . . . . 14
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β¨ ((π β¨ π§) β§ π)) = ((π β¨ ((π β¨ π§) β§ π)) β¨ π)) |
124 | 121, 123 | eqtrd 2773 |
. . . . . . . . . . . . 13
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β¨ π§) = ((π β¨ ((π β¨ π§) β§ π)) β¨ π)) |
125 | 124 | oveq2d 7420 |
. . . . . . . . . . . 12
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π§ β¨ π) β§ ((π β¨ π) β¨ π§)) = ((π§ β¨ π) β§ ((π β¨ ((π β¨ π§) β§ π)) β¨ π))) |
126 | 6, 7 | latjcl 18388 |
. . . . . . . . . . . . . 14
β’ ((πΎ β Lat β§ (π β¨ π) β (BaseβπΎ) β§ π§ β (BaseβπΎ)) β ((π β¨ π) β¨ π§) β (BaseβπΎ)) |
127 | 3, 10, 69, 126 | syl3anc 1372 |
. . . . . . . . . . . . 13
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β¨ π§) β (BaseβπΎ)) |
128 | 6, 14, 7 | latlej2 18398 |
. . . . . . . . . . . . . 14
β’ ((πΎ β Lat β§ (π β¨ π) β (BaseβπΎ) β§ π§ β (BaseβπΎ)) β π§ β€ ((π β¨ π) β¨ π§)) |
129 | 3, 10, 69, 128 | syl3anc 1372 |
. . . . . . . . . . . . 13
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π§ β€ ((π β¨ π) β¨ π§)) |
130 | 6, 14, 7, 15, 8 | atmod1i1 38666 |
. . . . . . . . . . . . 13
β’ ((πΎ β HL β§ (π§ β π΄ β§ π β (BaseβπΎ) β§ ((π β¨ π) β¨ π§) β (BaseβπΎ)) β§ π§ β€ ((π β¨ π) β¨ π§)) β (π§ β¨ (π β§ ((π β¨ π) β¨ π§))) = ((π§ β¨ π) β§ ((π β¨ π) β¨ π§))) |
131 | 2, 49, 75, 127, 129, 130 | syl131anc 1384 |
. . . . . . . . . . . 12
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π§ β¨ (π β§ ((π β¨ π) β¨ π§))) = ((π§ β¨ π) β§ ((π β¨ π) β¨ π§))) |
132 | 50 | oveq1i 7414 |
. . . . . . . . . . . . 13
β’ (πΊ β¨ π) = (((π§ β¨ π) β§ (π β¨ ((π β¨ π§) β§ π))) β¨ π) |
133 | 6, 7, 8 | hlatjcl 38175 |
. . . . . . . . . . . . . . 15
β’ ((πΎ β HL β§ π§ β π΄ β§ π β π΄) β (π§ β¨ π) β (BaseβπΎ)) |
134 | 2, 49, 47, 133 | syl3anc 1372 |
. . . . . . . . . . . . . 14
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π§ β¨ π) β (BaseβπΎ)) |
135 | 6, 7 | latjcl 18388 |
. . . . . . . . . . . . . . 15
β’ ((πΎ β Lat β§ π β (BaseβπΎ) β§ ((π β¨ π§) β§ π) β (BaseβπΎ)) β (π β¨ ((π β¨ π§) β§ π)) β (BaseβπΎ)) |
136 | 3, 115, 113, 135 | syl3anc 1372 |
. . . . . . . . . . . . . 14
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ ((π β¨ π§) β§ π)) β (BaseβπΎ)) |
137 | 14, 7, 8 | hlatlej2 38184 |
. . . . . . . . . . . . . . 15
β’ ((πΎ β HL β§ π§ β π΄ β§ π β π΄) β π β€ (π§ β¨ π)) |
138 | 2, 49, 47, 137 | syl3anc 1372 |
. . . . . . . . . . . . . 14
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β€ (π§ β¨ π)) |
139 | 6, 14, 7, 15, 8 | atmod2i1 38670 |
. . . . . . . . . . . . . 14
β’ ((πΎ β HL β§ (π β π΄ β§ (π§ β¨ π) β (BaseβπΎ) β§ (π β¨ ((π β¨ π§) β§ π)) β (BaseβπΎ)) β§ π β€ (π§ β¨ π)) β (((π§ β¨ π) β§ (π β¨ ((π β¨ π§) β§ π))) β¨ π) = ((π§ β¨ π) β§ ((π β¨ ((π β¨ π§) β§ π)) β¨ π))) |
140 | 2, 47, 134, 136, 138, 139 | syl131anc 1384 |
. . . . . . . . . . . . 13
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (((π§ β¨ π) β§ (π β¨ ((π β¨ π§) β§ π))) β¨ π) = ((π§ β¨ π) β§ ((π β¨ ((π β¨ π§) β§ π)) β¨ π))) |
141 | 132, 140 | eqtrid 2785 |
. . . . . . . . . . . 12
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (πΊ β¨ π) = ((π§ β¨ π) β§ ((π β¨ ((π β¨ π§) β§ π)) β¨ π))) |
142 | 125, 131,
141 | 3eqtr4rd 2784 |
. . . . . . . . . . 11
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (πΊ β¨ π) = (π§ β¨ (π β§ ((π β¨ π) β¨ π§)))) |
143 | 6, 14, 7 | latlej1 18397 |
. . . . . . . . . . . . . . 15
β’ ((πΎ β Lat β§ (π β¨ π) β (BaseβπΎ) β§ π§ β (BaseβπΎ)) β (π β¨ π) β€ ((π β¨ π) β¨ π§)) |
144 | 3, 10, 69, 143 | syl3anc 1372 |
. . . . . . . . . . . . . 14
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) β€ ((π β¨ π) β¨ π§)) |
145 | 6, 14, 3, 75, 10, 127, 60, 144 | lattrd 18395 |
. . . . . . . . . . . . 13
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β€ ((π β¨ π) β¨ π§)) |
146 | 6, 14, 15 | latleeqm1 18416 |
. . . . . . . . . . . . . 14
β’ ((πΎ β Lat β§ π β (BaseβπΎ) β§ ((π β¨ π) β¨ π§) β (BaseβπΎ)) β (π β€ ((π β¨ π) β¨ π§) β (π β§ ((π β¨ π) β¨ π§)) = π)) |
147 | 3, 75, 127, 146 | syl3anc 1372 |
. . . . . . . . . . . . 13
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β€ ((π β¨ π) β¨ π§) β (π β§ ((π β¨ π) β¨ π§)) = π)) |
148 | 145, 147 | mpbid 231 |
. . . . . . . . . . . 12
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β§ ((π β¨ π) β¨ π§)) = π) |
149 | 148 | oveq2d 7420 |
. . . . . . . . . . 11
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π§ β¨ (π β§ ((π β¨ π) β¨ π§))) = (π§ β¨ π)) |
150 | 142, 149 | eqtrd 2773 |
. . . . . . . . . 10
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (πΊ β¨ π) = (π§ β¨ π)) |
151 | 150 | oveq1d 7419 |
. . . . . . . . 9
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((πΊ β¨ π) β¨ ((π β¨ π§) β§ π)) = ((π§ β¨ π) β¨ ((π β¨ π§) β§ π))) |
152 | 79, 151 | eqtrd 2773 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π) = ((π§ β¨ π) β¨ ((π β¨ π§) β§ π))) |
153 | 14, 7, 8 | hlatlej2 38184 |
. . . . . . . . . . . 12
β’ ((πΎ β HL β§ π β π΄ β§ π§ β π΄) β π§ β€ (π β¨ π§)) |
154 | 2, 34, 49, 153 | syl3anc 1372 |
. . . . . . . . . . 11
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π§ β€ (π β¨ π§)) |
155 | 6, 14, 7, 15, 8 | atmod3i1 38673 |
. . . . . . . . . . 11
β’ ((πΎ β HL β§ (π§ β π΄ β§ (π β¨ π§) β (BaseβπΎ) β§ π β (BaseβπΎ)) β§ π§ β€ (π β¨ π§)) β (π§ β¨ ((π β¨ π§) β§ π)) = ((π β¨ π§) β§ (π§ β¨ π))) |
156 | 2, 49, 54, 25, 154, 155 | syl131anc 1384 |
. . . . . . . . . 10
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π§ β¨ ((π β¨ π§) β§ π)) = ((π β¨ π§) β§ (π§ β¨ π))) |
157 | | simp33r 1302 |
. . . . . . . . . . . 12
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π§ β π΄ β§ Β¬ π§ β€ π)) |
158 | 14, 7, 86, 8, 16 | lhpjat2 38830 |
. . . . . . . . . . . 12
β’ (((πΎ β HL β§ π β π») β§ (π§ β π΄ β§ Β¬ π§ β€ π)) β (π§ β¨ π) = (1.βπΎ)) |
159 | 2, 11, 157, 158 | syl21anc 837 |
. . . . . . . . . . 11
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π§ β¨ π) = (1.βπΎ)) |
160 | 159 | oveq2d 7420 |
. . . . . . . . . 10
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π§) β§ (π§ β¨ π)) = ((π β¨ π§) β§ (1.βπΎ))) |
161 | 6, 15, 86 | olm11 38035 |
. . . . . . . . . . 11
β’ ((πΎ β OL β§ (π β¨ π§) β (BaseβπΎ)) β ((π β¨ π§) β§ (1.βπΎ)) = (π β¨ π§)) |
162 | 91, 54, 161 | syl2anc 585 |
. . . . . . . . . 10
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π§) β§ (1.βπΎ)) = (π β¨ π§)) |
163 | 156, 160,
162 | 3eqtrrd 2778 |
. . . . . . . . 9
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π§) = (π§ β¨ ((π β¨ π§) β§ π))) |
164 | 163 | oveq1d 7419 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π§) β¨ π) = ((π§ β¨ ((π β¨ π§) β§ π)) β¨ π)) |
165 | 77, 152, 164 | 3eqtr4rd 2784 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π§) β¨ π) = ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π)) |
166 | 73, 165 | eqtrd 2773 |
. . . . . 6
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β¨ π§) = ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π)) |
167 | 71, 166 | breqtrd 5173 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) β€ ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π)) |
168 | 65, 167 | eqbrtrd 5169 |
. . . 4
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) β€ ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π)) |
169 | 6, 7 | latjcl 18388 |
. . . . . 6
β’ ((πΎ β Lat β§ (πΊ β¨ ((π β¨ π§) β§ π)) β (BaseβπΎ) β§ π β (BaseβπΎ)) β ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π) β (BaseβπΎ)) |
170 | 3, 58, 75, 169 | syl3anc 1372 |
. . . . 5
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π) β (BaseβπΎ)) |
171 | 6, 14, 15 | latleeqm1 18416 |
. . . . 5
β’ ((πΎ β Lat β§ (π β¨ π) β (BaseβπΎ) β§ ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π) β (BaseβπΎ)) β ((π β¨ π) β€ ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π) β ((π β¨ π) β§ ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π)) = (π β¨ π))) |
172 | 3, 10, 170, 171 | syl3anc 1372 |
. . . 4
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β€ ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π) β ((π β¨ π) β§ ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π)) = (π β¨ π))) |
173 | 168, 172 | mpbid 231 |
. . 3
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β ((π β¨ π) β§ ((πΊ β¨ ((π β¨ π§) β§ π)) β¨ π)) = (π β¨ π)) |
174 | 42, 63, 173 | 3eqtr2rd 2780 |
. 2
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β (π β¨ π) = (π β¨ π)) |
175 | 32, 174 | breqtrd 5173 |
1
β’ (((πΎ β HL β§ π β π» β§ π β π΄) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ π β π) β§ (π β π΄ β§ (π β π΄ β§ π β€ π β§ (π β¨ π) = (π β¨ π)) β§ ((π¦ β π΄ β§ Β¬ π¦ β€ π) β§ (π§ β π΄ β§ Β¬ π§ β€ π)))) β π β€ (π β¨ π)) |