Step | Hyp | Ref
| Expression |
1 | | fzofi 13936 |
. . . 4
β’ (0..^3)
β Fin |
2 | 1 | a1i 11 |
. . 3
β’ (π β (0..^3) β
Fin) |
3 | | hgt750leme.n |
. . . . . . 7
β’ (π β π β β) |
4 | 3 | nnnn0d 12529 |
. . . . . 6
β’ (π β π β
β0) |
5 | | 3nn0 12487 |
. . . . . . 7
β’ 3 β
β0 |
6 | 5 | a1i 11 |
. . . . . 6
β’ (π β 3 β
β0) |
7 | | ssidd 4005 |
. . . . . 6
β’ (π β β β
β) |
8 | 4, 6, 7 | reprfi2 33624 |
. . . . 5
β’ (π β
(β(reprβ3)π)
β Fin) |
9 | | ssrab2 4077 |
. . . . . 6
β’ {π β
(β(reprβ3)π)
β£ Β¬ (πβπ) β (π β© β)} β
(β(reprβ3)π) |
10 | 9 | a1i 11 |
. . . . 5
β’ (π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} β
(β(reprβ3)π)) |
11 | 8, 10 | ssfid 9264 |
. . . 4
β’ (π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} β
Fin) |
12 | 11 | adantr 482 |
. . 3
β’ ((π β§ π β (0..^3)) β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} β
Fin) |
13 | | vmaf 26613 |
. . . . . 6
β’
Ξ:ββΆβ |
14 | 13 | a1i 11 |
. . . . 5
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β
Ξ:ββΆβ) |
15 | | ssidd 4005 |
. . . . . . 7
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β β β
β) |
16 | 4 | nn0zd 12581 |
. . . . . . . 8
β’ (π β π β β€) |
17 | 16 | ad2antrr 725 |
. . . . . . 7
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β π β β€) |
18 | 5 | a1i 11 |
. . . . . . 7
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β 3 β
β0) |
19 | | simpr 486 |
. . . . . . . 8
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) |
20 | 9, 19 | sselid 3980 |
. . . . . . 7
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β π β (β(reprβ3)π)) |
21 | 15, 17, 18, 20 | reprf 33613 |
. . . . . 6
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β π:(0..^3)βΆβ) |
22 | | c0ex 11205 |
. . . . . . . . 9
β’ 0 β
V |
23 | 22 | tpid1 4772 |
. . . . . . . 8
β’ 0 β
{0, 1, 2} |
24 | | fzo0to3tp 13715 |
. . . . . . . 8
β’ (0..^3) =
{0, 1, 2} |
25 | 23, 24 | eleqtrri 2833 |
. . . . . . 7
β’ 0 β
(0..^3) |
26 | 25 | a1i 11 |
. . . . . 6
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β 0 β
(0..^3)) |
27 | 21, 26 | ffvelcdmd 7085 |
. . . . 5
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β (πβ0) β β) |
28 | 14, 27 | ffvelcdmd 7085 |
. . . 4
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β
(Ξβ(πβ0)) β β) |
29 | | 1ex 11207 |
. . . . . . . . . 10
β’ 1 β
V |
30 | 29 | tpid2 4774 |
. . . . . . . . 9
β’ 1 β
{0, 1, 2} |
31 | 30, 24 | eleqtrri 2833 |
. . . . . . . 8
β’ 1 β
(0..^3) |
32 | 31 | a1i 11 |
. . . . . . 7
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β 1 β
(0..^3)) |
33 | 21, 32 | ffvelcdmd 7085 |
. . . . . 6
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β (πβ1) β β) |
34 | 14, 33 | ffvelcdmd 7085 |
. . . . 5
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β
(Ξβ(πβ1)) β β) |
35 | | 2ex 12286 |
. . . . . . . . . 10
β’ 2 β
V |
36 | 35 | tpid3 4777 |
. . . . . . . . 9
β’ 2 β
{0, 1, 2} |
37 | 36, 24 | eleqtrri 2833 |
. . . . . . . 8
β’ 2 β
(0..^3) |
38 | 37 | a1i 11 |
. . . . . . 7
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β 2 β
(0..^3)) |
39 | 21, 38 | ffvelcdmd 7085 |
. . . . . 6
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β (πβ2) β β) |
40 | 14, 39 | ffvelcdmd 7085 |
. . . . 5
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β
(Ξβ(πβ2)) β β) |
41 | 34, 40 | remulcld 11241 |
. . . 4
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β
((Ξβ(πβ1)) Β· (Ξβ(πβ2))) β
β) |
42 | 28, 41 | remulcld 11241 |
. . 3
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) β β) |
43 | | vmage0 26615 |
. . . . 5
β’ ((πβ0) β β β
0 β€ (Ξβ(πβ0))) |
44 | 27, 43 | syl 17 |
. . . 4
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β 0 β€
(Ξβ(πβ0))) |
45 | | vmage0 26615 |
. . . . . 6
β’ ((πβ1) β β β
0 β€ (Ξβ(πβ1))) |
46 | 33, 45 | syl 17 |
. . . . 5
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β 0 β€
(Ξβ(πβ1))) |
47 | | vmage0 26615 |
. . . . . 6
β’ ((πβ2) β β β
0 β€ (Ξβ(πβ2))) |
48 | 39, 47 | syl 17 |
. . . . 5
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β 0 β€
(Ξβ(πβ2))) |
49 | 34, 40, 46, 48 | mulge0d 11788 |
. . . 4
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β 0 β€
((Ξβ(πβ1)) Β· (Ξβ(πβ2)))) |
50 | 28, 41, 44, 49 | mulge0d 11788 |
. . 3
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β 0 β€
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2))))) |
51 | 2, 12, 42, 50 | fsumiunle 32023 |
. 2
β’ (π β Ξ£π β βͺ
π β (0..^3){π β
(β(reprβ3)π)
β£ Β¬ (πβπ) β (π β© β)} ((Ξβ(πβ0)) Β·
((Ξβ(πβ1)) Β· (Ξβ(πβ2)))) β€ Ξ£π β (0..^3)Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} ((Ξβ(πβ0)) Β·
((Ξβ(πβ1)) Β· (Ξβ(πβ2))))) |
52 | | eqid 2733 |
. . . 4
β’ {π β
(β(reprβ3)π)
β£ Β¬ (πβπ) β (π β© β)} = {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} |
53 | | inss2 4229 |
. . . . . 6
β’ (π β© β) β
β |
54 | | prmssnn 16610 |
. . . . . 6
β’ β
β β |
55 | 53, 54 | sstri 3991 |
. . . . 5
β’ (π β© β) β
β |
56 | 55 | a1i 11 |
. . . 4
β’ (π β (π β© β) β
β) |
57 | 52, 7, 56, 4, 6 | reprdifc 33628 |
. . 3
β’ (π β
((β(reprβ3)π)
β ((π β©
β)(reprβ3)π)) =
βͺ π β (0..^3){π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) |
58 | 57 | sumeq1d 15644 |
. 2
β’ (π β Ξ£π β ((β(reprβ3)π) β ((π β© β)(reprβ3)π))((Ξβ(πβ0)) Β·
((Ξβ(πβ1)) Β· (Ξβ(πβ2)))) = Ξ£π β βͺ π β (0..^3){π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} ((Ξβ(πβ0)) Β·
((Ξβ(πβ1)) Β· (Ξβ(πβ2))))) |
59 | | ssrab2 4077 |
. . . . . . . 8
β’ {π β
(β(reprβ3)π)
β£ Β¬ (πβ0)
β (π β© β)}
β (β(reprβ3)π) |
60 | 59 | a1i 11 |
. . . . . . 7
β’ (π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)} β
(β(reprβ3)π)) |
61 | 8, 60 | ssfid 9264 |
. . . . . 6
β’ (π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)} β
Fin) |
62 | 13 | a1i 11 |
. . . . . . . 8
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β
Ξ:ββΆβ) |
63 | | ssidd 4005 |
. . . . . . . . . 10
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β β
β β) |
64 | 16 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β π β
β€) |
65 | 5 | a1i 11 |
. . . . . . . . . 10
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β 3
β β0) |
66 | 60 | sselda 3982 |
. . . . . . . . . 10
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β π β
(β(reprβ3)π)) |
67 | 63, 64, 65, 66 | reprf 33613 |
. . . . . . . . 9
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β π:(0..^3)βΆβ) |
68 | 25 | a1i 11 |
. . . . . . . . 9
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β 0
β (0..^3)) |
69 | 67, 68 | ffvelcdmd 7085 |
. . . . . . . 8
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β (πβ0) β
β) |
70 | 62, 69 | ffvelcdmd 7085 |
. . . . . . 7
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β
(Ξβ(πβ0)) β β) |
71 | 31 | a1i 11 |
. . . . . . . . . 10
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β 1
β (0..^3)) |
72 | 67, 71 | ffvelcdmd 7085 |
. . . . . . . . 9
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β (πβ1) β
β) |
73 | 62, 72 | ffvelcdmd 7085 |
. . . . . . . 8
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β
(Ξβ(πβ1)) β β) |
74 | 37 | a1i 11 |
. . . . . . . . . 10
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β 2
β (0..^3)) |
75 | 67, 74 | ffvelcdmd 7085 |
. . . . . . . . 9
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β (πβ2) β
β) |
76 | 62, 75 | ffvelcdmd 7085 |
. . . . . . . 8
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β
(Ξβ(πβ2)) β β) |
77 | 73, 76 | remulcld 11241 |
. . . . . . 7
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β
((Ξβ(πβ1)) Β· (Ξβ(πβ2))) β
β) |
78 | 70, 77 | remulcld 11241 |
. . . . . 6
β’ ((π β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) β β) |
79 | 61, 78 | fsumrecl 15677 |
. . . . 5
β’ (π β Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) β β) |
80 | 79 | recnd 11239 |
. . . 4
β’ (π β Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) β β) |
81 | | fsumconst 15733 |
. . . 4
β’ (((0..^3)
β Fin β§ Ξ£π
β {π β
(β(reprβ3)π)
β£ Β¬ (πβ0)
β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) β β) β
Ξ£π β
(0..^3)Ξ£π β
{π β
(β(reprβ3)π)
β£ Β¬ (πβ0)
β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) = ((β―β(0..^3))
Β· Ξ£π β
{π β
(β(reprβ3)π)
β£ Β¬ (πβ0)
β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))))) |
82 | 2, 80, 81 | syl2anc 585 |
. . 3
β’ (π β Ξ£π β (0..^3)Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) = ((β―β(0..^3))
Β· Ξ£π β
{π β
(β(reprβ3)π)
β£ Β¬ (πβ0)
β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))))) |
83 | | fveq1 6888 |
. . . . . . . 8
β’ (π = (πΉβπ) β (πβ0) = ((πΉβπ)β0)) |
84 | 83 | fveq2d 6893 |
. . . . . . 7
β’ (π = (πΉβπ) β (Ξβ(πβ0)) = (Ξβ((πΉβπ)β0))) |
85 | | fveq1 6888 |
. . . . . . . . 9
β’ (π = (πΉβπ) β (πβ1) = ((πΉβπ)β1)) |
86 | 85 | fveq2d 6893 |
. . . . . . . 8
β’ (π = (πΉβπ) β (Ξβ(πβ1)) = (Ξβ((πΉβπ)β1))) |
87 | | fveq1 6888 |
. . . . . . . . 9
β’ (π = (πΉβπ) β (πβ2) = ((πΉβπ)β2)) |
88 | 87 | fveq2d 6893 |
. . . . . . . 8
β’ (π = (πΉβπ) β (Ξβ(πβ2)) = (Ξβ((πΉβπ)β2))) |
89 | 86, 88 | oveq12d 7424 |
. . . . . . 7
β’ (π = (πΉβπ) β ((Ξβ(πβ1)) Β· (Ξβ(πβ2))) =
((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2)))) |
90 | 84, 89 | oveq12d 7424 |
. . . . . 6
β’ (π = (πΉβπ) β ((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) = ((Ξβ((πΉβπ)β0)) Β· ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2))))) |
91 | | 3nn 12288 |
. . . . . . . . . 10
β’ 3 β
β |
92 | 91 | a1i 11 |
. . . . . . . . 9
β’ (π β 3 β
β) |
93 | 92 | ralrimivw 3151 |
. . . . . . . 8
β’ (π β βπ β (0..^3)3 β
β) |
94 | 93 | r19.21bi 3249 |
. . . . . . 7
β’ ((π β§ π β (0..^3)) β 3 β
β) |
95 | 16 | adantr 482 |
. . . . . . 7
β’ ((π β§ π β (0..^3)) β π β β€) |
96 | | ssidd 4005 |
. . . . . . 7
β’ ((π β§ π β (0..^3)) β β β
β) |
97 | | simpr 486 |
. . . . . . 7
β’ ((π β§ π β (0..^3)) β π β (0..^3)) |
98 | | fveq1 6888 |
. . . . . . . . . 10
β’ (π = π β (πβ0) = (πβ0)) |
99 | 98 | eleq1d 2819 |
. . . . . . . . 9
β’ (π = π β ((πβ0) β (π β© β) β (πβ0) β (π β© β))) |
100 | 99 | notbid 318 |
. . . . . . . 8
β’ (π = π β (Β¬ (πβ0) β (π β© β) β Β¬ (πβ0) β (π β©
β))) |
101 | 100 | cbvrabv 3443 |
. . . . . . 7
β’ {π β
(β(reprβ3)π)
β£ Β¬ (πβ0)
β (π β© β)} =
{π β
(β(reprβ3)π)
β£ Β¬ (πβ0)
β (π β©
β)} |
102 | | fveq1 6888 |
. . . . . . . . . 10
β’ (π = π β (πβπ) = (πβπ)) |
103 | 102 | eleq1d 2819 |
. . . . . . . . 9
β’ (π = π β ((πβπ) β (π β© β) β (πβπ) β (π β© β))) |
104 | 103 | notbid 318 |
. . . . . . . 8
β’ (π = π β (Β¬ (πβπ) β (π β© β) β Β¬ (πβπ) β (π β© β))) |
105 | 104 | cbvrabv 3443 |
. . . . . . 7
β’ {π β
(β(reprβ3)π)
β£ Β¬ (πβπ) β (π β© β)} = {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} |
106 | | eqid 2733 |
. . . . . . 7
β’ if(π = 0, ( I βΎ (0..^3)),
((pmTrspβ(0..^3))β{π, 0})) = if(π = 0, ( I βΎ (0..^3)),
((pmTrspβ(0..^3))β{π, 0})) |
107 | | hgt750lema.f |
. . . . . . 7
β’ πΉ = (π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} β¦ (π β if(π = 0, ( I βΎ (0..^3)),
((pmTrspβ(0..^3))β{π, 0})))) |
108 | 94, 95, 96, 97, 101, 105, 106, 107 | reprpmtf1o 33627 |
. . . . . 6
β’ ((π β§ π β (0..^3)) β πΉ:{π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}β1-1-ontoβ{π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β©
β)}) |
109 | | eqidd 2734 |
. . . . . 6
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β (πΉβπ) = (πΉβπ)) |
110 | 78 | adantlr 714 |
. . . . . . 7
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) β β) |
111 | 110 | recnd 11239 |
. . . . . 6
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}) β
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) β β) |
112 | 90, 12, 108, 109, 111 | fsumf1o 15666 |
. . . . 5
β’ ((π β§ π β (0..^3)) β Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) = Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} ((Ξβ((πΉβπ)β0)) Β· ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2))))) |
113 | | fveq2 6889 |
. . . . . . . . . 10
β’ (π = π β (πΉβπ) = (πΉβπ)) |
114 | 113 | fveq1d 6891 |
. . . . . . . . 9
β’ (π = π β ((πΉβπ)β0) = ((πΉβπ)β0)) |
115 | 114 | fveq2d 6893 |
. . . . . . . 8
β’ (π = π β (Ξβ((πΉβπ)β0)) = (Ξβ((πΉβπ)β0))) |
116 | 113 | fveq1d 6891 |
. . . . . . . . . 10
β’ (π = π β ((πΉβπ)β1) = ((πΉβπ)β1)) |
117 | 116 | fveq2d 6893 |
. . . . . . . . 9
β’ (π = π β (Ξβ((πΉβπ)β1)) = (Ξβ((πΉβπ)β1))) |
118 | 113 | fveq1d 6891 |
. . . . . . . . . 10
β’ (π = π β ((πΉβπ)β2) = ((πΉβπ)β2)) |
119 | 118 | fveq2d 6893 |
. . . . . . . . 9
β’ (π = π β (Ξβ((πΉβπ)β2)) = (Ξβ((πΉβπ)β2))) |
120 | 117, 119 | oveq12d 7424 |
. . . . . . . 8
β’ (π = π β ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2))) = ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2)))) |
121 | 115, 120 | oveq12d 7424 |
. . . . . . 7
β’ (π = π β ((Ξβ((πΉβπ)β0)) Β· ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2)))) = ((Ξβ((πΉβπ)β0)) Β· ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2))))) |
122 | 121 | cbvsumv 15639 |
. . . . . 6
β’
Ξ£π β
{π β
(β(reprβ3)π)
β£ Β¬ (πβπ) β (π β© β)} ((Ξβ((πΉβπ)β0)) Β· ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2)))) = Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} ((Ξβ((πΉβπ)β0)) Β· ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2)))) |
123 | 122 | a1i 11 |
. . . . 5
β’ ((π β§ π β (0..^3)) β Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} ((Ξβ((πΉβπ)β0)) Β· ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2)))) = Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} ((Ξβ((πΉβπ)β0)) Β· ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2))))) |
124 | | ovexd 7441 |
. . . . . . . 8
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β (0..^3) β
V) |
125 | 97 | adantr 482 |
. . . . . . . 8
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β π β (0..^3)) |
126 | 124, 125,
26, 106 | pmtridf1o 32241 |
. . . . . . 7
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β if(π = 0, ( I βΎ (0..^3)),
((pmTrspβ(0..^3))β{π, 0})):(0..^3)β1-1-ontoβ(0..^3)) |
127 | 107, 126,
21, 14, 19 | hgt750lemg 33655 |
. . . . . 6
β’ (((π β§ π β (0..^3)) β§ π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)}) β
((Ξβ((πΉβπ)β0)) Β· ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2)))) = ((Ξβ(πβ0)) Β·
((Ξβ(πβ1)) Β· (Ξβ(πβ2))))) |
128 | 127 | sumeq2dv 15646 |
. . . . 5
β’ ((π β§ π β (0..^3)) β Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} ((Ξβ((πΉβπ)β0)) Β· ((Ξβ((πΉβπ)β1)) Β· (Ξβ((πΉβπ)β2)))) = Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} ((Ξβ(πβ0)) Β·
((Ξβ(πβ1)) Β· (Ξβ(πβ2))))) |
129 | 112, 123,
128 | 3eqtrrd 2778 |
. . . 4
β’ ((π β§ π β (0..^3)) β Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} ((Ξβ(πβ0)) Β·
((Ξβ(πβ1)) Β· (Ξβ(πβ2)))) = Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2))))) |
130 | 129 | sumeq2dv 15646 |
. . 3
β’ (π β Ξ£π β (0..^3)Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} ((Ξβ(πβ0)) Β·
((Ξβ(πβ1)) Β· (Ξβ(πβ2)))) = Ξ£π β (0..^3)Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2))))) |
131 | | hashfzo0 14387 |
. . . . . . 7
β’ (3 β
β0 β (β―β(0..^3)) = 3) |
132 | 5, 131 | ax-mp 5 |
. . . . . 6
β’
(β―β(0..^3)) = 3 |
133 | 132 | a1i 11 |
. . . . 5
β’ (π β (β―β(0..^3)) =
3) |
134 | 133 | eqcomd 2739 |
. . . 4
β’ (π β 3 =
(β―β(0..^3))) |
135 | | hgt750lemb.a |
. . . . . 6
β’ π΄ = {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β©
β)} |
136 | 135 | a1i 11 |
. . . . 5
β’ (π β π΄ = {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β©
β)}) |
137 | 136 | sumeq1d 15644 |
. . . 4
β’ (π β Ξ£π β π΄ ((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))) = Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβ0) β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2))))) |
138 | 134, 137 | oveq12d 7424 |
. . 3
β’ (π β (3 Β· Ξ£π β π΄ ((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2))))) = ((β―β(0..^3))
Β· Ξ£π β
{π β
(β(reprβ3)π)
β£ Β¬ (πβ0)
β (π β© β)}
((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2)))))) |
139 | 82, 130, 138 | 3eqtr4rd 2784 |
. 2
β’ (π β (3 Β· Ξ£π β π΄ ((Ξβ(πβ0)) Β· ((Ξβ(πβ1)) Β·
(Ξβ(πβ2))))) = Ξ£π β (0..^3)Ξ£π β {π β (β(reprβ3)π) β£ Β¬ (πβπ) β (π β© β)} ((Ξβ(πβ0)) Β·
((Ξβ(πβ1)) Β· (Ξβ(πβ2))))) |
140 | 51, 58, 139 | 3brtr4d 5180 |
1
β’ (π β Ξ£π β ((β(reprβ3)π) β ((π β© β)(reprβ3)π))((Ξβ(πβ0)) Β·
((Ξβ(πβ1)) Β· (Ξβ(πβ2)))) β€ (3 Β·
Ξ£π β π΄ ((Ξβ(πβ0)) Β·
((Ξβ(πβ1)) Β· (Ξβ(πβ2)))))) |