Step | Hyp | Ref
| Expression |
1 | | cdlemefs32.b |
. . . 4
β’ π΅ = (BaseβπΎ) |
2 | 1 | fvexi 6905 |
. . 3
β’ π΅ β V |
3 | | nfv 1917 |
. . . 4
β’
β²π‘(((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) |
4 | | cdlemefs32a1.z |
. . . . . . . 8
β’ π = (β©π¦ β π΅ βπ‘ β π΄ ((Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)) β π¦ = π)) |
5 | | nfra1 3281 |
. . . . . . . . 9
β’
β²π‘βπ‘ β π΄ ((Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)) β π¦ = π) |
6 | | nfcv 2903 |
. . . . . . . . 9
β’
β²π‘π΅ |
7 | 5, 6 | nfriota 7377 |
. . . . . . . 8
β’
β²π‘(β©π¦ β π΅ βπ‘ β π΄ ((Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)) β π¦ = π)) |
8 | 4, 7 | nfcxfr 2901 |
. . . . . . 7
β’
β²π‘π |
9 | 8 | nfel1 2919 |
. . . . . 6
β’
β²π‘ π β π΄ |
10 | | nfcv 2903 |
. . . . . . . 8
β’
β²π‘
β€ |
11 | | nfcv 2903 |
. . . . . . . 8
β’
β²π‘π |
12 | 8, 10, 11 | nfbr 5195 |
. . . . . . 7
β’
β²π‘ π β€ π |
13 | 12 | nfn 1860 |
. . . . . 6
β’
β²π‘ Β¬ π β€ π |
14 | 9, 13 | nfan 1902 |
. . . . 5
β’
β²π‘(π β π΄ β§ Β¬ π β€ π) |
15 | 14 | a1i 11 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β β²π‘(π β π΄ β§ Β¬ π β€ π)) |
16 | 4 | a1i 11 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β π = (β©π¦ β π΅ βπ‘ β π΄ ((Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)) β π¦ = π))) |
17 | | eleq1 2821 |
. . . . . 6
β’ (π = π β (π β π΄ β π β π΄)) |
18 | | breq1 5151 |
. . . . . . 7
β’ (π = π β (π β€ π β π β€ π)) |
19 | 18 | notbid 317 |
. . . . . 6
β’ (π = π β (Β¬ π β€ π β Β¬ π β€ π)) |
20 | 17, 19 | anbi12d 631 |
. . . . 5
β’ (π = π β ((π β π΄ β§ Β¬ π β€ π) β (π β π΄ β§ Β¬ π β€ π))) |
21 | 20 | adantl 482 |
. . . 4
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β§ π = π) β ((π β π΄ β§ Β¬ π β€ π) β (π β π΄ β§ Β¬ π β€ π))) |
22 | | simpl1 1191 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β§ (π‘ β π΄ β§ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)))) β ((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π))) |
23 | | simpl2r 1227 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β§ (π‘ β π΄ β§ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)))) β (π
β π΄ β§ Β¬ π
β€ π)) |
24 | | simprl 769 |
. . . . . . 7
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β§ (π‘ β π΄ β§ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)))) β π‘ β π΄) |
25 | | simprrl 779 |
. . . . . . 7
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β§ (π‘ β π΄ β§ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)))) β Β¬ π‘ β€ π) |
26 | 24, 25 | jca 512 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β§ (π‘ β π΄ β§ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)))) β (π‘ β π΄ β§ Β¬ π‘ β€ π)) |
27 | | simpl2l 1226 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β§ (π‘ β π΄ β§ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)))) β π β π) |
28 | | simpl3 1193 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β§ (π‘ β π΄ β§ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)))) β π
β€ (π β¨ π)) |
29 | | simprrr 780 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β§ (π‘ β π΄ β§ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)))) β Β¬ π‘ β€ (π β¨ π)) |
30 | | cdlemefs32.l |
. . . . . . . 8
β’ β€ =
(leβπΎ) |
31 | | cdlemefs32.j |
. . . . . . . 8
β’ β¨ =
(joinβπΎ) |
32 | | cdlemefs32.m |
. . . . . . . 8
β’ β§ =
(meetβπΎ) |
33 | | cdlemefs32.a |
. . . . . . . 8
β’ π΄ = (AtomsβπΎ) |
34 | | cdlemefs32.h |
. . . . . . . 8
β’ π» = (LHypβπΎ) |
35 | | cdlemefs32.u |
. . . . . . . 8
β’ π = ((π β¨ π) β§ π) |
36 | | cdlemefs32.d |
. . . . . . . 8
β’ π· = ((π‘ β¨ π) β§ (π β¨ ((π β¨ π‘) β§ π))) |
37 | | cdlemefs32a1.y |
. . . . . . . 8
β’ π = ((π β¨ π) β§ (π· β¨ ((π
β¨ π‘) β§ π))) |
38 | 30, 31, 32, 33, 34, 35, 36, 37 | cdleme7ga 39114 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π‘ β π΄ β§ Β¬ π‘ β€ π)) β§ (π β π β§ π
β€ (π β¨ π) β§ Β¬ π‘ β€ (π β¨ π))) β π β π΄) |
39 | 30, 31, 32, 33, 34, 35, 36, 37 | cdleme7 39115 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π‘ β π΄ β§ Β¬ π‘ β€ π)) β§ (π β π β§ π
β€ (π β¨ π) β§ Β¬ π‘ β€ (π β¨ π))) β Β¬ π β€ π) |
40 | 38, 39 | jca 512 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ ((π
β π΄ β§ Β¬ π
β€ π) β§ (π‘ β π΄ β§ Β¬ π‘ β€ π)) β§ (π β π β§ π
β€ (π β¨ π) β§ Β¬ π‘ β€ (π β¨ π))) β (π β π΄ β§ Β¬ π β€ π)) |
41 | 22, 23, 26, 27, 28, 29, 40 | syl123anc 1387 |
. . . . 5
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β§ (π‘ β π΄ β§ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)))) β (π β π΄ β§ Β¬ π β€ π)) |
42 | 41 | ex 413 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β ((π‘ β π΄ β§ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π))) β (π β π΄ β§ Β¬ π β€ π))) |
43 | | simp1 1136 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β ((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π))) |
44 | | simp2rl 1242 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β π
β π΄) |
45 | | simp2rr 1243 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β Β¬ π
β€ π) |
46 | | simp2l 1199 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β π β π) |
47 | | simp3 1138 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β π
β€ (π β¨ π)) |
48 | 1, 30, 31, 32, 33, 34, 35, 36, 37, 4 | cdleme25cl 39223 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π
β π΄ β§ Β¬ π
β€ π) β§ (π β π β§ π
β€ (π β¨ π))) β π β π΅) |
49 | 43, 44, 45, 46, 47, 48 | syl122anc 1379 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β π β π΅) |
50 | | simp11 1203 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β (πΎ β HL β§ π β π»)) |
51 | | simp12 1204 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β (π β π΄ β§ Β¬ π β€ π)) |
52 | | simp13 1205 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β (π β π΄ β§ Β¬ π β€ π)) |
53 | 30, 31, 33, 34 | cdlemb2 38907 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ π β π) β βπ‘ β π΄ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π))) |
54 | 50, 51, 52, 46, 53 | syl121anc 1375 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β βπ‘ β π΄ (Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π))) |
55 | 3, 15, 16, 21, 42, 49, 54 | riotasv3d 37825 |
. . 3
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β§ π΅ β V) β (π β π΄ β§ Β¬ π β€ π)) |
56 | 2, 55 | mpan2 689 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β (π β π΄ β§ Β¬ π β€ π)) |
57 | | cdlemefs32.e |
. . . . . 6
β’ πΈ = ((π β¨ π) β§ (π· β¨ ((π β¨ π‘) β§ π))) |
58 | | cdlemefs32.i |
. . . . . 6
β’ πΌ = (β©π¦ β π΅ βπ‘ β π΄ ((Β¬ π‘ β€ π β§ Β¬ π‘ β€ (π β¨ π)) β π¦ = πΈ)) |
59 | | cdlemefs32.n |
. . . . . 6
β’ π = if(π β€ (π β¨ π), πΌ, πΆ) |
60 | 57, 58, 59, 37, 4 | cdleme31sn1c 39254 |
. . . . 5
β’ ((π
β π΄ β§ π
β€ (π β¨ π)) β β¦π
/ π β¦π = π) |
61 | 44, 47, 60 | syl2anc 584 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β β¦π
/ π β¦π = π) |
62 | 61 | eleq1d 2818 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β (β¦π
/ π β¦π β π΄ β π β π΄)) |
63 | 61 | breq1d 5158 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β (β¦π
/ π β¦π β€ π β π β€ π)) |
64 | 63 | notbid 317 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β (Β¬ β¦π
/ π β¦π β€ π β Β¬ π β€ π)) |
65 | 62, 64 | anbi12d 631 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β ((β¦π
/ π β¦π β π΄ β§ Β¬ β¦π
/ π β¦π β€ π) β (π β π΄ β§ Β¬ π β€ π))) |
66 | 56, 65 | mpbird 256 |
1
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π β§ (π
β π΄ β§ Β¬ π
β€ π)) β§ π
β€ (π β¨ π)) β (β¦π
/ π β¦π β π΄ β§ Β¬ β¦π
/ π β¦π β€ π)) |