Step | Hyp | Ref
| Expression |
1 | | simp33 1211 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β Β¬ π
β€ (π β¨ π)) |
2 | | simp11l 1284 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β πΎ β HL) |
3 | | simp22l 1292 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β π΄) |
4 | | simp21l 1290 |
. . . . . . . . . . 11
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π
β π΄) |
5 | | eqid 2732 |
. . . . . . . . . . . 12
β’
(BaseβπΎ) =
(BaseβπΎ) |
6 | | cdleme19.j |
. . . . . . . . . . . 12
β’ β¨ =
(joinβπΎ) |
7 | | cdleme19.a |
. . . . . . . . . . . 12
β’ π΄ = (AtomsβπΎ) |
8 | 5, 6, 7 | hlatjcl 38225 |
. . . . . . . . . . 11
β’ ((πΎ β HL β§ π
β π΄ β§ π β π΄) β (π
β¨ π) β (BaseβπΎ)) |
9 | 2, 4, 3, 8 | syl3anc 1371 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (π
β¨ π) β (BaseβπΎ)) |
10 | | simp11r 1285 |
. . . . . . . . . . 11
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β π») |
11 | | cdleme19.h |
. . . . . . . . . . . 12
β’ π» = (LHypβπΎ) |
12 | 5, 11 | lhpbase 38857 |
. . . . . . . . . . 11
β’ (π β π» β π β (BaseβπΎ)) |
13 | 10, 12 | syl 17 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β (BaseβπΎ)) |
14 | | cdleme19.l |
. . . . . . . . . . . 12
β’ β€ =
(leβπΎ) |
15 | 14, 6, 7 | hlatlej2 38234 |
. . . . . . . . . . 11
β’ ((πΎ β HL β§ π
β π΄ β§ π β π΄) β π β€ (π
β¨ π)) |
16 | 2, 4, 3, 15 | syl3anc 1371 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β€ (π
β¨ π)) |
17 | | cdleme19.m |
. . . . . . . . . . 11
β’ β§ =
(meetβπΎ) |
18 | 5, 14, 6, 17, 7 | atmod2i1 38720 |
. . . . . . . . . 10
β’ ((πΎ β HL β§ (π β π΄ β§ (π
β¨ π) β (BaseβπΎ) β§ π β (BaseβπΎ)) β§ π β€ (π
β¨ π)) β (((π
β¨ π) β§ π) β¨ π) = ((π
β¨ π) β§ (π β¨ π))) |
19 | 2, 3, 9, 13, 16, 18 | syl131anc 1383 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (((π
β¨ π) β§ π) β¨ π) = ((π
β¨ π) β§ (π β¨ π))) |
20 | | simp22 1207 |
. . . . . . . . . . 11
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (π β π΄ β§ Β¬ π β€ π)) |
21 | | eqid 2732 |
. . . . . . . . . . . 12
β’
(1.βπΎ) =
(1.βπΎ) |
22 | 14, 6, 21, 7, 11 | lhpjat1 38879 |
. . . . . . . . . . 11
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π)) β (π β¨ π) = (1.βπΎ)) |
23 | 2, 10, 20, 22 | syl21anc 836 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (π β¨ π) = (1.βπΎ)) |
24 | 23 | oveq2d 7421 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β ((π
β¨ π) β§ (π β¨ π)) = ((π
β¨ π) β§ (1.βπΎ))) |
25 | | hlol 38219 |
. . . . . . . . . . 11
β’ (πΎ β HL β πΎ β OL) |
26 | 2, 25 | syl 17 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β πΎ β OL) |
27 | 5, 17, 21 | olm11 38085 |
. . . . . . . . . 10
β’ ((πΎ β OL β§ (π
β¨ π) β (BaseβπΎ)) β ((π
β¨ π) β§ (1.βπΎ)) = (π
β¨ π)) |
28 | 26, 9, 27 | syl2anc 584 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β ((π
β¨ π) β§ (1.βπΎ)) = (π
β¨ π)) |
29 | 19, 24, 28 | 3eqtrd 2776 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (((π
β¨ π) β§ π) β¨ π) = (π
β¨ π)) |
30 | 29 | adantr 481 |
. . . . . . 7
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β (((π
β¨ π) β§ π) β¨ π) = (π
β¨ π)) |
31 | | cdleme19.d |
. . . . . . . . . 10
β’ π· = ((π
β¨ π) β§ π) |
32 | | simp1 1136 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β ((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π))) |
33 | | simp23 1208 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (π β π΄ β§ Β¬ π β€ π)) |
34 | | simp21 1206 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (π
β π΄ β§ Β¬ π
β€ π)) |
35 | | simp31 1209 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (π β π β§ π β π)) |
36 | | simp321 1323 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β Β¬ π β€ (π β¨ π)) |
37 | | simp322 1324 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β Β¬ π β€ (π β¨ π)) |
38 | 36, 37 | jca 512 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π))) |
39 | | simp323 1325 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π
β€ (π β¨ π)) |
40 | | cdleme19.u |
. . . . . . . . . . . . . . . . 17
β’ π = ((π β¨ π) β§ π) |
41 | | cdleme19.f |
. . . . . . . . . . . . . . . . 17
β’ πΉ = ((π β¨ π) β§ (π β¨ ((π β¨ π) β§ π))) |
42 | | cdleme19.g |
. . . . . . . . . . . . . . . . 17
β’ πΊ = ((π β¨ π) β§ (π β¨ ((π β¨ π) β§ π))) |
43 | | cdleme19.y |
. . . . . . . . . . . . . . . . 17
β’ π = ((π
β¨ π) β§ π) |
44 | | cdleme20.v |
. . . . . . . . . . . . . . . . 17
β’ π = ((π β¨ π) β§ π) |
45 | 14, 6, 17, 7, 11, 40, 41, 42, 31, 43, 44 | cdleme20d 39171 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π)) β§ π
β€ (π β¨ π))) β ((πΉ β¨ πΊ) β§ (π· β¨ π)) = π) |
46 | 32, 20, 33, 34, 35, 38, 39, 45 | syl133anc 1393 |
. . . . . . . . . . . . . . 15
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β ((πΉ β¨ πΊ) β§ (π· β¨ π)) = π) |
47 | 2 | hllatd 38222 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β πΎ β Lat) |
48 | | simp12l 1286 |
. . . . . . . . . . . . . . . . . 18
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β π΄) |
49 | | simp13l 1288 |
. . . . . . . . . . . . . . . . . 18
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β π΄) |
50 | 14, 6, 17, 7, 11, 40, 41, 5 | cdleme1b 39085 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ π β π΄ β§ π β π΄)) β πΉ β (BaseβπΎ)) |
51 | 2, 10, 48, 49, 3, 50 | syl23anc 1377 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β πΉ β (BaseβπΎ)) |
52 | | simp23l 1294 |
. . . . . . . . . . . . . . . . . 18
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β π΄) |
53 | 14, 6, 17, 7, 11, 40, 42, 5 | cdleme1b 39085 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ π β π΄ β§ π β π΄)) β πΊ β (BaseβπΎ)) |
54 | 2, 10, 48, 49, 52, 53 | syl23anc 1377 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β πΊ β (BaseβπΎ)) |
55 | 5, 6 | latjcl 18388 |
. . . . . . . . . . . . . . . . 17
β’ ((πΎ β Lat β§ πΉ β (BaseβπΎ) β§ πΊ β (BaseβπΎ)) β (πΉ β¨ πΊ) β (BaseβπΎ)) |
56 | 47, 51, 54, 55 | syl3anc 1371 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (πΉ β¨ πΊ) β (BaseβπΎ)) |
57 | | simp22r 1293 |
. . . . . . . . . . . . . . . . . 18
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β Β¬ π β€ π) |
58 | 14, 6, 17, 7, 11, 31 | cdlemeda 39157 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
β π΄ β§ π
β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π))) β π· β π΄) |
59 | 2, 10, 3, 57, 4, 39, 36, 58 | syl223anc 1396 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π· β π΄) |
60 | | simp23r 1295 |
. . . . . . . . . . . . . . . . . 18
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β Β¬ π β€ π) |
61 | 14, 6, 17, 7, 11, 43 | cdlemeda 39157 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
β π΄ β§ π
β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π))) β π β π΄) |
62 | 2, 10, 52, 60, 4, 39, 37, 61 | syl223anc 1396 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β π΄) |
63 | 5, 6, 7 | hlatjcl 38225 |
. . . . . . . . . . . . . . . . 17
β’ ((πΎ β HL β§ π· β π΄ β§ π β π΄) β (π· β¨ π) β (BaseβπΎ)) |
64 | 2, 59, 62, 63 | syl3anc 1371 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (π· β¨ π) β (BaseβπΎ)) |
65 | 5, 14, 17 | latmle2 18414 |
. . . . . . . . . . . . . . . 16
β’ ((πΎ β Lat β§ (πΉ β¨ πΊ) β (BaseβπΎ) β§ (π· β¨ π) β (BaseβπΎ)) β ((πΉ β¨ πΊ) β§ (π· β¨ π)) β€ (π· β¨ π)) |
66 | 47, 56, 64, 65 | syl3anc 1371 |
. . . . . . . . . . . . . . 15
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β ((πΉ β¨ πΊ) β§ (π· β¨ π)) β€ (π· β¨ π)) |
67 | 46, 66 | eqbrtrrd 5171 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β€ (π· β¨ π)) |
68 | 67 | adantr 481 |
. . . . . . . . . . . . 13
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β π β€ (π· β¨ π)) |
69 | 6, 7 | hlatjidm 38227 |
. . . . . . . . . . . . . . 15
β’ ((πΎ β HL β§ π· β π΄) β (π· β¨ π·) = π·) |
70 | 2, 59, 69 | syl2anc 584 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (π· β¨ π·) = π·) |
71 | | oveq2 7413 |
. . . . . . . . . . . . . 14
β’ (π· = π β (π· β¨ π·) = (π· β¨ π)) |
72 | 70, 71 | sylan9req 2793 |
. . . . . . . . . . . . 13
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β π· = (π· β¨ π)) |
73 | 68, 72 | breqtrrd 5175 |
. . . . . . . . . . . 12
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β π β€ π·) |
74 | | hlatl 38218 |
. . . . . . . . . . . . . . 15
β’ (πΎ β HL β πΎ β AtLat) |
75 | 2, 74 | syl 17 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β πΎ β AtLat) |
76 | | simp31r 1297 |
. . . . . . . . . . . . . . 15
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β π) |
77 | 14, 6, 17, 7, 11, 44 | lhpat2 38904 |
. . . . . . . . . . . . . . 15
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ π β π)) β π β π΄) |
78 | 2, 10, 3, 57, 52, 76, 77 | syl222anc 1386 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β π΄) |
79 | 14, 7 | atcmp 38169 |
. . . . . . . . . . . . . 14
β’ ((πΎ β AtLat β§ π β π΄ β§ π· β π΄) β (π β€ π· β π = π·)) |
80 | 75, 78, 59, 79 | syl3anc 1371 |
. . . . . . . . . . . . 13
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (π β€ π· β π = π·)) |
81 | 80 | adantr 481 |
. . . . . . . . . . . 12
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β (π β€ π· β π = π·)) |
82 | 73, 81 | mpbid 231 |
. . . . . . . . . . 11
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β π = π·) |
83 | 82, 44 | eqtr3di 2787 |
. . . . . . . . . 10
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β π· = ((π β¨ π) β§ π)) |
84 | 31, 83 | eqtr3id 2786 |
. . . . . . . . 9
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β ((π
β¨ π) β§ π) = ((π β¨ π) β§ π)) |
85 | 5, 6, 7 | hlatjcl 38225 |
. . . . . . . . . . . 12
β’ ((πΎ β HL β§ π β π΄ β§ π β π΄) β (π β¨ π) β (BaseβπΎ)) |
86 | 2, 3, 52, 85 | syl3anc 1371 |
. . . . . . . . . . 11
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (π β¨ π) β (BaseβπΎ)) |
87 | 5, 14, 17 | latmle1 18413 |
. . . . . . . . . . 11
β’ ((πΎ β Lat β§ (π β¨ π) β (BaseβπΎ) β§ π β (BaseβπΎ)) β ((π β¨ π) β§ π) β€ (π β¨ π)) |
88 | 47, 86, 13, 87 | syl3anc 1371 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β ((π β¨ π) β§ π) β€ (π β¨ π)) |
89 | 88 | adantr 481 |
. . . . . . . . 9
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β ((π β¨ π) β§ π) β€ (π β¨ π)) |
90 | 84, 89 | eqbrtrd 5169 |
. . . . . . . 8
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β ((π
β¨ π) β§ π) β€ (π β¨ π)) |
91 | 14, 6, 7 | hlatlej1 38233 |
. . . . . . . . . 10
β’ ((πΎ β HL β§ π β π΄ β§ π β π΄) β π β€ (π β¨ π)) |
92 | 2, 3, 52, 91 | syl3anc 1371 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β€ (π β¨ π)) |
93 | 92 | adantr 481 |
. . . . . . . 8
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β π β€ (π β¨ π)) |
94 | 5, 17 | latmcl 18389 |
. . . . . . . . . . 11
β’ ((πΎ β Lat β§ (π
β¨ π) β (BaseβπΎ) β§ π β (BaseβπΎ)) β ((π
β¨ π) β§ π) β (BaseβπΎ)) |
95 | 47, 9, 13, 94 | syl3anc 1371 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β ((π
β¨ π) β§ π) β (BaseβπΎ)) |
96 | 5, 7 | atbase 38147 |
. . . . . . . . . . 11
β’ (π β π΄ β π β (BaseβπΎ)) |
97 | 3, 96 | syl 17 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π β (BaseβπΎ)) |
98 | 5, 14, 6 | latjle12 18399 |
. . . . . . . . . 10
β’ ((πΎ β Lat β§ (((π
β¨ π) β§ π) β (BaseβπΎ) β§ π β (BaseβπΎ) β§ (π β¨ π) β (BaseβπΎ))) β ((((π
β¨ π) β§ π) β€ (π β¨ π) β§ π β€ (π β¨ π)) β (((π
β¨ π) β§ π) β¨ π) β€ (π β¨ π))) |
99 | 47, 95, 97, 86, 98 | syl13anc 1372 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β ((((π
β¨ π) β§ π) β€ (π β¨ π) β§ π β€ (π β¨ π)) β (((π
β¨ π) β§ π) β¨ π) β€ (π β¨ π))) |
100 | 99 | adantr 481 |
. . . . . . . 8
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β ((((π
β¨ π) β§ π) β€ (π β¨ π) β§ π β€ (π β¨ π)) β (((π
β¨ π) β§ π) β¨ π) β€ (π β¨ π))) |
101 | 90, 93, 100 | mpbi2and 710 |
. . . . . . 7
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β (((π
β¨ π) β§ π) β¨ π) β€ (π β¨ π)) |
102 | 30, 101 | eqbrtrrd 5171 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β (π
β¨ π) β€ (π β¨ π)) |
103 | 5, 7 | atbase 38147 |
. . . . . . . . 9
β’ (π
β π΄ β π
β (BaseβπΎ)) |
104 | 4, 103 | syl 17 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π
β (BaseβπΎ)) |
105 | 5, 14, 6 | latjle12 18399 |
. . . . . . . 8
β’ ((πΎ β Lat β§ (π
β (BaseβπΎ) β§ π β (BaseβπΎ) β§ (π β¨ π) β (BaseβπΎ))) β ((π
β€ (π β¨ π) β§ π β€ (π β¨ π)) β (π
β¨ π) β€ (π β¨ π))) |
106 | 47, 104, 97, 86, 105 | syl13anc 1372 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β ((π
β€ (π β¨ π) β§ π β€ (π β¨ π)) β (π
β¨ π) β€ (π β¨ π))) |
107 | 106 | adantr 481 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β ((π
β€ (π β¨ π) β§ π β€ (π β¨ π)) β (π
β¨ π) β€ (π β¨ π))) |
108 | 102, 107 | mpbird 256 |
. . . . 5
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β (π
β€ (π β¨ π) β§ π β€ (π β¨ π))) |
109 | 108 | simpld 495 |
. . . 4
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β§ π· = π) β π
β€ (π β¨ π)) |
110 | 109 | ex 413 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (π· = π β π
β€ (π β¨ π))) |
111 | 110 | necon3bd 2954 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β (Β¬ π
β€ (π β¨ π) β π· β π)) |
112 | 1, 111 | mpd 15 |
1
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π β π β§ π β π) β§ (Β¬ π β€ (π β¨ π) β§ Β¬ π β€ (π β¨ π) β§ π
β€ (π β¨ π)) β§ Β¬ π
β€ (π β¨ π))) β π· β π) |