Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  hgt750lemb Structured version   Visualization version   GIF version
Theorem hgt750lemb 33606
Description: An upper bound on the contribution of the non-prime terms in the Statement 7.50 of [Helfgott] p. 69. (Contributed by Thierry Arnoux, 28-Dec-2021.)
Hypotheses
Ref Expression
hgt750leme.o 𝑂 = {𝑧 ∈ β„€ ∣ Β¬ 2 βˆ₯ 𝑧}
hgt750leme.n (πœ‘ β†’ 𝑁 ∈ β„•)
hgt750lemb.2 (πœ‘ β†’ 2 ≀ 𝑁)
hgt750lemb.a 𝐴 = {𝑐 ∈ (β„•(reprβ€˜3)𝑁) ∣ Β¬ (π‘β€˜0) ∈ (𝑂 ∩ β„™)}
Assertion
Ref Expression
hgt750lemb (πœ‘ β†’ Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (Ξ›β€˜(π‘›β€˜2)))) ≀ ((logβ€˜π‘) Β· (Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})(Ξ›β€˜π‘–) Β· Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—))))
Distinct variable groups:   𝑧,𝑂   𝐴,𝑐,𝑖,𝑗,𝑛   𝑁,𝑐,𝑖,𝑗,𝑛   πœ‘,𝑐,𝑖,𝑗,𝑛
Allowed substitution hints:   πœ‘(𝑧)   𝐴(𝑧)   𝑁(𝑧)   𝑂(𝑖,𝑗,𝑛,𝑐)
Proof of Theorem hgt750lemb
Dummy variables 𝑑 𝑒 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 hgt750leme.n . . . . . 6 (πœ‘ β†’ 𝑁 ∈ β„•)
21nnnn0d 12528 . . . . 5 (πœ‘ β†’ 𝑁 ∈ β„•0)
3 3nn0 12486 . . . . . 6 3 ∈ β„•0
43a1i 11 . . . . 5 (πœ‘ β†’ 3 ∈ β„•0)
5 ssidd 4004 . . . . 5 (πœ‘ β†’ β„• βŠ† β„•)
62, 4, 5reprfi2 33573 . . . 4 (πœ‘ β†’ (β„•(reprβ€˜3)𝑁) ∈ Fin)
7 hgt750lemb.a . . . . 5 𝐴 = {𝑐 ∈ (β„•(reprβ€˜3)𝑁) ∣ Β¬ (π‘β€˜0) ∈ (𝑂 ∩ β„™)}
87ssrab3 4079 . . . 4 𝐴 βŠ† (β„•(reprβ€˜3)𝑁)
9 ssfi 9169 . . . 4 (((β„•(reprβ€˜3)𝑁) ∈ Fin ∧ 𝐴 βŠ† (β„•(reprβ€˜3)𝑁)) β†’ 𝐴 ∈ Fin)
106, 8, 9sylancl 587 . . 3 (πœ‘ β†’ 𝐴 ∈ Fin)
11 vmaf 26603 . . . . . 6 Ξ›:β„•βŸΆβ„
1211a1i 11 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ Ξ›:β„•βŸΆβ„)
13 ssidd 4004 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ β„• βŠ† β„•)
141nnzd 12581 . . . . . . . 8 (πœ‘ β†’ 𝑁 ∈ β„€)
1514adantr 482 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 𝑁 ∈ β„€)
163a1i 11 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 3 ∈ β„•0)
17 simpr 486 . . . . . . . 8 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 𝑛 ∈ 𝐴)
188, 17sselid 3979 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 𝑛 ∈ (β„•(reprβ€˜3)𝑁))
1913, 15, 16, 18reprf 33562 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 𝑛:(0..^3)βŸΆβ„•)
20 c0ex 11204 . . . . . . . . 9 0 ∈ V
2120tpid1 4771 . . . . . . . 8 0 ∈ {0, 1, 2}
22 fzo0to3tp 13714 . . . . . . . 8 (0..^3) = {0, 1, 2}
2321, 22eleqtrri 2833 . . . . . . 7 0 ∈ (0..^3)
2423a1i 11 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 0 ∈ (0..^3))
2519, 24ffvelcdmd 7083 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (π‘›β€˜0) ∈ β„•)
2612, 25ffvelcdmd 7083 . . . 4 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (Ξ›β€˜(π‘›β€˜0)) ∈ ℝ)
27 1ex 11206 . . . . . . . . . 10 1 ∈ V
2827tpid2 4773 . . . . . . . . 9 1 ∈ {0, 1, 2}
2928, 22eleqtrri 2833 . . . . . . . 8 1 ∈ (0..^3)
3029a1i 11 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 1 ∈ (0..^3))
3119, 30ffvelcdmd 7083 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (π‘›β€˜1) ∈ β„•)
3212, 31ffvelcdmd 7083 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (Ξ›β€˜(π‘›β€˜1)) ∈ ℝ)
33 2ex 12285 . . . . . . . . . 10 2 ∈ V
3433tpid3 4776 . . . . . . . . 9 2 ∈ {0, 1, 2}
3534, 22eleqtrri 2833 . . . . . . . 8 2 ∈ (0..^3)
3635a1i 11 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 2 ∈ (0..^3))
3719, 36ffvelcdmd 7083 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (π‘›β€˜2) ∈ β„•)
3812, 37ffvelcdmd 7083 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (Ξ›β€˜(π‘›β€˜2)) ∈ ℝ)
3932, 38remulcld 11240 . . . 4 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ((Ξ›β€˜(π‘›β€˜1)) Β· (Ξ›β€˜(π‘›β€˜2))) ∈ ℝ)
4026, 39remulcld 11240 . . 3 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (Ξ›β€˜(π‘›β€˜2)))) ∈ ℝ)
4110, 40fsumrecl 15676 . 2 (πœ‘ β†’ Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (Ξ›β€˜(π‘›β€˜2)))) ∈ ℝ)
421nnrpd 13010 . . . 4 (πœ‘ β†’ 𝑁 ∈ ℝ+)
4342relogcld 26113 . . 3 (πœ‘ β†’ (logβ€˜π‘) ∈ ℝ)
4426, 32remulcld 11240 . . . 4 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1))) ∈ ℝ)
4510, 44fsumrecl 15676 . . 3 (πœ‘ β†’ Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1))) ∈ ℝ)
4643, 45remulcld 11240 . 2 (πœ‘ β†’ ((logβ€˜π‘) Β· Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1)))) ∈ ℝ)
47 fzfi 13933 . . . . . . . 8 (1...𝑁) ∈ Fin
48 diffi 9175 . . . . . . . 8 ((1...𝑁) ∈ Fin β†’ ((1...𝑁) βˆ– β„™) ∈ Fin)
4947, 48ax-mp 5 . . . . . . 7 ((1...𝑁) βˆ– β„™) ∈ Fin
50 snfi 9040 . . . . . . 7 {2} ∈ Fin
51 unfi 9168 . . . . . . 7 ((((1...𝑁) βˆ– β„™) ∈ Fin ∧ {2} ∈ Fin) β†’ (((1...𝑁) βˆ– β„™) βˆͺ {2}) ∈ Fin)
5249, 50, 51mp2an 691 . . . . . 6 (((1...𝑁) βˆ– β„™) βˆͺ {2}) ∈ Fin
5352a1i 11 . . . . 5 (πœ‘ β†’ (((1...𝑁) βˆ– β„™) βˆͺ {2}) ∈ Fin)
5411a1i 11 . . . . . 6 ((πœ‘ ∧ 𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})) β†’ Ξ›:β„•βŸΆβ„)
55 difss 4130 . . . . . . . . . 10 ((1...𝑁) βˆ– β„™) βŠ† (1...𝑁)
5655a1i 11 . . . . . . . . 9 (πœ‘ β†’ ((1...𝑁) βˆ– β„™) βŠ† (1...𝑁))
57 2nn 12281 . . . . . . . . . . . 12 2 ∈ β„•
5857a1i 11 . . . . . . . . . . 11 (πœ‘ β†’ 2 ∈ β„•)
59 hgt750lemb.2 . . . . . . . . . . 11 (πœ‘ β†’ 2 ≀ 𝑁)
60 elfz1b 13566 . . . . . . . . . . . 12 (2 ∈ (1...𝑁) ↔ (2 ∈ β„• ∧ 𝑁 ∈ β„• ∧ 2 ≀ 𝑁))
6160biimpri 227 . . . . . . . . . . 11 ((2 ∈ β„• ∧ 𝑁 ∈ β„• ∧ 2 ≀ 𝑁) β†’ 2 ∈ (1...𝑁))
6258, 1, 59, 61syl3anc 1372 . . . . . . . . . 10 (πœ‘ β†’ 2 ∈ (1...𝑁))
6362snssd 4811 . . . . . . . . 9 (πœ‘ β†’ {2} βŠ† (1...𝑁))
6456, 63unssd 4185 . . . . . . . 8 (πœ‘ β†’ (((1...𝑁) βˆ– β„™) βˆͺ {2}) βŠ† (1...𝑁))
65 fz1ssnn 13528 . . . . . . . . 9 (1...𝑁) βŠ† β„•
6665a1i 11 . . . . . . . 8 (πœ‘ β†’ (1...𝑁) βŠ† β„•)
6764, 66sstrd 3991 . . . . . . 7 (πœ‘ β†’ (((1...𝑁) βˆ– β„™) βˆͺ {2}) βŠ† β„•)
6867sselda 3981 . . . . . 6 ((πœ‘ ∧ 𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})) β†’ 𝑖 ∈ β„•)
6954, 68ffvelcdmd 7083 . . . . 5 ((πœ‘ ∧ 𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})) β†’ (Ξ›β€˜π‘–) ∈ ℝ)
7053, 69fsumrecl 15676 . . . 4 (πœ‘ β†’ Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})(Ξ›β€˜π‘–) ∈ ℝ)
71 fzfid 13934 . . . . 5 (πœ‘ β†’ (1...𝑁) ∈ Fin)
7211a1i 11 . . . . . 6 ((πœ‘ ∧ 𝑗 ∈ (1...𝑁)) β†’ Ξ›:β„•βŸΆβ„)
7366sselda 3981 . . . . . 6 ((πœ‘ ∧ 𝑗 ∈ (1...𝑁)) β†’ 𝑗 ∈ β„•)
7472, 73ffvelcdmd 7083 . . . . 5 ((πœ‘ ∧ 𝑗 ∈ (1...𝑁)) β†’ (Ξ›β€˜π‘—) ∈ ℝ)
7571, 74fsumrecl 15676 . . . 4 (πœ‘ β†’ Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—) ∈ ℝ)
7670, 75remulcld 11240 . . 3 (πœ‘ β†’ (Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})(Ξ›β€˜π‘–) Β· Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—)) ∈ ℝ)
7743, 76remulcld 11240 . 2 (πœ‘ β†’ ((logβ€˜π‘) Β· (Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})(Ξ›β€˜π‘–) Β· Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—))) ∈ ℝ)
781adantr 482 . . . . . . . 8 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 𝑁 ∈ β„•)
7978nnrpd 13010 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 𝑁 ∈ ℝ+)
80 relogcl 26066 . . . . . . 7 (𝑁 ∈ ℝ+ β†’ (logβ€˜π‘) ∈ ℝ)
8179, 80syl 17 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (logβ€˜π‘) ∈ ℝ)
8232, 81remulcld 11240 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ((Ξ›β€˜(π‘›β€˜1)) Β· (logβ€˜π‘)) ∈ ℝ)
8326, 82remulcld 11240 . . . 4 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (logβ€˜π‘))) ∈ ℝ)
84 vmage0 26605 . . . . . 6 ((π‘›β€˜0) ∈ β„• β†’ 0 ≀ (Ξ›β€˜(π‘›β€˜0)))
8525, 84syl 17 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 0 ≀ (Ξ›β€˜(π‘›β€˜0)))
86 vmage0 26605 . . . . . . 7 ((π‘›β€˜1) ∈ β„• β†’ 0 ≀ (Ξ›β€˜(π‘›β€˜1)))
8731, 86syl 17 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ 0 ≀ (Ξ›β€˜(π‘›β€˜1)))
8837nnrpd 13010 . . . . . . . 8 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (π‘›β€˜2) ∈ ℝ+)
8988relogcld 26113 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (logβ€˜(π‘›β€˜2)) ∈ ℝ)
90 vmalelog 26688 . . . . . . . 8 ((π‘›β€˜2) ∈ β„• β†’ (Ξ›β€˜(π‘›β€˜2)) ≀ (logβ€˜(π‘›β€˜2)))
9137, 90syl 17 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (Ξ›β€˜(π‘›β€˜2)) ≀ (logβ€˜(π‘›β€˜2)))
9213, 15, 16, 18, 36reprle 33564 . . . . . . . 8 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (π‘›β€˜2) ≀ 𝑁)
93 logleb 26093 . . . . . . . . 9 (((π‘›β€˜2) ∈ ℝ+ ∧ 𝑁 ∈ ℝ+) β†’ ((π‘›β€˜2) ≀ 𝑁 ↔ (logβ€˜(π‘›β€˜2)) ≀ (logβ€˜π‘)))
9493biimpa 478 . . . . . . . 8 ((((π‘›β€˜2) ∈ ℝ+ ∧ 𝑁 ∈ ℝ+) ∧ (π‘›β€˜2) ≀ 𝑁) β†’ (logβ€˜(π‘›β€˜2)) ≀ (logβ€˜π‘))
9588, 79, 92, 94syl21anc 837 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (logβ€˜(π‘›β€˜2)) ≀ (logβ€˜π‘))
9638, 89, 81, 91, 95letrd 11367 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (Ξ›β€˜(π‘›β€˜2)) ≀ (logβ€˜π‘))
9738, 81, 32, 87, 96lemul2ad 12150 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ((Ξ›β€˜(π‘›β€˜1)) Β· (Ξ›β€˜(π‘›β€˜2))) ≀ ((Ξ›β€˜(π‘›β€˜1)) Β· (logβ€˜π‘)))
9839, 82, 26, 85, 97lemul2ad 12150 . . . 4 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (Ξ›β€˜(π‘›β€˜2)))) ≀ ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (logβ€˜π‘))))
9910, 40, 83, 98fsumle 15741 . . 3 (πœ‘ β†’ Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (Ξ›β€˜(π‘›β€˜2)))) ≀ Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (logβ€˜π‘))))
1001nncnd 12224 . . . . . 6 (πœ‘ β†’ 𝑁 ∈ β„‚)
1011nnne0d 12258 . . . . . 6 (πœ‘ β†’ 𝑁 β‰  0)
102100, 101logcld 26061 . . . . 5 (πœ‘ β†’ (logβ€˜π‘) ∈ β„‚)
10344recnd 11238 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1))) ∈ β„‚)
10410, 102, 103fsummulc2 15726 . . . 4 (πœ‘ β†’ ((logβ€˜π‘) Β· Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1)))) = Σ𝑛 ∈ 𝐴 ((logβ€˜π‘) Β· ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1)))))
105102adantr 482 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (logβ€˜π‘) ∈ β„‚)
106105, 103mulcomd 11231 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ((logβ€˜π‘) Β· ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1)))) = (((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1))) Β· (logβ€˜π‘)))
10726recnd 11238 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (Ξ›β€˜(π‘›β€˜0)) ∈ β„‚)
10832recnd 11238 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (Ξ›β€˜(π‘›β€˜1)) ∈ β„‚)
109107, 108, 105mulassd 11233 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1))) Β· (logβ€˜π‘)) = ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (logβ€˜π‘))))
110106, 109eqtrd 2773 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ((logβ€˜π‘) Β· ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1)))) = ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (logβ€˜π‘))))
111110sumeq2dv 15645 . . . 4 (πœ‘ β†’ Σ𝑛 ∈ 𝐴 ((logβ€˜π‘) Β· ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1)))) = Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (logβ€˜π‘))))
112104, 111eqtr2d 2774 . . 3 (πœ‘ β†’ Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (logβ€˜π‘))) = ((logβ€˜π‘) Β· Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1)))))
11399, 112breqtrd 5173 . 2 (πœ‘ β†’ Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (Ξ›β€˜(π‘›β€˜2)))) ≀ ((logβ€˜π‘) Β· Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1)))))
1141nnred 12223 . . . 4 (πœ‘ β†’ 𝑁 ∈ ℝ)
1151nnge1d 12256 . . . 4 (πœ‘ β†’ 1 ≀ 𝑁)
116114, 115logge0d 26120 . . 3 (πœ‘ β†’ 0 ≀ (logβ€˜π‘))
117 xpfi 9313 . . . . . 6 (((((1...𝑁) βˆ– β„™) βˆͺ {2}) ∈ Fin ∧ (1...𝑁) ∈ Fin) β†’ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁)) ∈ Fin)
11853, 71, 117syl2anc 585 . . . . 5 (πœ‘ β†’ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁)) ∈ Fin)
11911a1i 11 . . . . . . 7 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ Ξ›:β„•βŸΆβ„)
12067adantr 482 . . . . . . . 8 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ (((1...𝑁) βˆ– β„™) βˆͺ {2}) βŠ† β„•)
121 xp1st 8002 . . . . . . . . 9 (𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁)) β†’ (1st β€˜π‘’) ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2}))
122121adantl 483 . . . . . . . 8 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ (1st β€˜π‘’) ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2}))
123120, 122sseldd 3982 . . . . . . 7 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ (1st β€˜π‘’) ∈ β„•)
124119, 123ffvelcdmd 7083 . . . . . 6 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ (Ξ›β€˜(1st β€˜π‘’)) ∈ ℝ)
125 xp2nd 8003 . . . . . . . . 9 (𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁)) β†’ (2nd β€˜π‘’) ∈ (1...𝑁))
126125adantl 483 . . . . . . . 8 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ (2nd β€˜π‘’) ∈ (1...𝑁))
12765, 126sselid 3979 . . . . . . 7 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ (2nd β€˜π‘’) ∈ β„•)
128119, 127ffvelcdmd 7083 . . . . . 6 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ (Ξ›β€˜(2nd β€˜π‘’)) ∈ ℝ)
129124, 128remulcld 11240 . . . . 5 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ ((Ξ›β€˜(1st β€˜π‘’)) Β· (Ξ›β€˜(2nd β€˜π‘’))) ∈ ℝ)
130 vmage0 26605 . . . . . . 7 ((1st β€˜π‘’) ∈ β„• β†’ 0 ≀ (Ξ›β€˜(1st β€˜π‘’)))
131123, 130syl 17 . . . . . 6 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ 0 ≀ (Ξ›β€˜(1st β€˜π‘’)))
132 vmage0 26605 . . . . . . 7 ((2nd β€˜π‘’) ∈ β„• β†’ 0 ≀ (Ξ›β€˜(2nd β€˜π‘’)))
133127, 132syl 17 . . . . . 6 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ 0 ≀ (Ξ›β€˜(2nd β€˜π‘’)))
134124, 128, 131, 133mulge0d 11787 . . . . 5 ((πœ‘ ∧ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))) β†’ 0 ≀ ((Ξ›β€˜(1st β€˜π‘’)) Β· (Ξ›β€˜(2nd β€˜π‘’))))
135 ssidd 4004 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ β„• βŠ† β„•)
13614adantr 482 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ 𝑁 ∈ β„€)
1373a1i 11 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ 3 ∈ β„•0)
138 simpr 486 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ 𝑐 ∈ 𝐴)
1398, 138sselid 3979 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ 𝑐 ∈ (β„•(reprβ€˜3)𝑁))
140135, 136, 137, 139reprf 33562 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ 𝑐:(0..^3)βŸΆβ„•)
14123a1i 11 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ 0 ∈ (0..^3))
142140, 141ffvelcdmd 7083 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜0) ∈ β„•)
1431adantr 482 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ 𝑁 ∈ β„•)
144135, 136, 137, 139, 141reprle 33564 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜0) ≀ 𝑁)
145 elfz1b 13566 . . . . . . . . . . . . 13 ((π‘β€˜0) ∈ (1...𝑁) ↔ ((π‘β€˜0) ∈ β„• ∧ 𝑁 ∈ β„• ∧ (π‘β€˜0) ≀ 𝑁))
146145biimpri 227 . . . . . . . . . . . 12 (((π‘β€˜0) ∈ β„• ∧ 𝑁 ∈ β„• ∧ (π‘β€˜0) ≀ 𝑁) β†’ (π‘β€˜0) ∈ (1...𝑁))
147142, 143, 144, 146syl3anc 1372 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜0) ∈ (1...𝑁))
1487reqabi 3455 . . . . . . . . . . . . . 14 (𝑐 ∈ 𝐴 ↔ (𝑐 ∈ (β„•(reprβ€˜3)𝑁) ∧ Β¬ (π‘β€˜0) ∈ (𝑂 ∩ β„™)))
149148simprbi 498 . . . . . . . . . . . . 13 (𝑐 ∈ 𝐴 β†’ Β¬ (π‘β€˜0) ∈ (𝑂 ∩ β„™))
150 hgt750leme.o . . . . . . . . . . . . . . 15 𝑂 = {𝑧 ∈ β„€ ∣ Β¬ 2 βˆ₯ 𝑧}
151150oddprm2 33605 . . . . . . . . . . . . . 14 (β„™ βˆ– {2}) = (𝑂 ∩ β„™)
152151eleq2i 2826 . . . . . . . . . . . . 13 ((π‘β€˜0) ∈ (β„™ βˆ– {2}) ↔ (π‘β€˜0) ∈ (𝑂 ∩ β„™))
153149, 152sylnibr 329 . . . . . . . . . . . 12 (𝑐 ∈ 𝐴 β†’ Β¬ (π‘β€˜0) ∈ (β„™ βˆ– {2}))
154138, 153syl 17 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ Β¬ (π‘β€˜0) ∈ (β„™ βˆ– {2}))
155147, 154jca 513 . . . . . . . . . 10 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ ((π‘β€˜0) ∈ (1...𝑁) ∧ Β¬ (π‘β€˜0) ∈ (β„™ βˆ– {2})))
156 eldif 3957 . . . . . . . . . 10 ((π‘β€˜0) ∈ ((1...𝑁) βˆ– (β„™ βˆ– {2})) ↔ ((π‘β€˜0) ∈ (1...𝑁) ∧ Β¬ (π‘β€˜0) ∈ (β„™ βˆ– {2})))
157155, 156sylibr 233 . . . . . . . . 9 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜0) ∈ ((1...𝑁) βˆ– (β„™ βˆ– {2})))
158 uncom 4152 . . . . . . . . . . . . 13 (((1...𝑁) βˆ– β„™) βˆͺ {2}) = ({2} βˆͺ ((1...𝑁) βˆ– β„™))
159 undif3 4289 . . . . . . . . . . . . 13 ({2} βˆͺ ((1...𝑁) βˆ– β„™)) = (({2} βˆͺ (1...𝑁)) βˆ– (β„™ βˆ– {2}))
160158, 159eqtri 2761 . . . . . . . . . . . 12 (((1...𝑁) βˆ– β„™) βˆͺ {2}) = (({2} βˆͺ (1...𝑁)) βˆ– (β„™ βˆ– {2}))
161 ssequn1 4179 . . . . . . . . . . . . . 14 ({2} βŠ† (1...𝑁) ↔ ({2} βˆͺ (1...𝑁)) = (1...𝑁))
16263, 161sylib 217 . . . . . . . . . . . . 13 (πœ‘ β†’ ({2} βˆͺ (1...𝑁)) = (1...𝑁))
163162difeq1d 4120 . . . . . . . . . . . 12 (πœ‘ β†’ (({2} βˆͺ (1...𝑁)) βˆ– (β„™ βˆ– {2})) = ((1...𝑁) βˆ– (β„™ βˆ– {2})))
164160, 163eqtrid 2785 . . . . . . . . . . 11 (πœ‘ β†’ (((1...𝑁) βˆ– β„™) βˆͺ {2}) = ((1...𝑁) βˆ– (β„™ βˆ– {2})))
165164eleq2d 2820 . . . . . . . . . 10 (πœ‘ β†’ ((π‘β€˜0) ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2}) ↔ (π‘β€˜0) ∈ ((1...𝑁) βˆ– (β„™ βˆ– {2}))))
166165adantr 482 . . . . . . . . 9 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ ((π‘β€˜0) ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2}) ↔ (π‘β€˜0) ∈ ((1...𝑁) βˆ– (β„™ βˆ– {2}))))
167157, 166mpbird 257 . . . . . . . 8 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜0) ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2}))
16829a1i 11 . . . . . . . . . 10 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ 1 ∈ (0..^3))
169140, 168ffvelcdmd 7083 . . . . . . . . 9 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜1) ∈ β„•)
170135, 136, 137, 139, 168reprle 33564 . . . . . . . . 9 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜1) ≀ 𝑁)
171 elfz1b 13566 . . . . . . . . . 10 ((π‘β€˜1) ∈ (1...𝑁) ↔ ((π‘β€˜1) ∈ β„• ∧ 𝑁 ∈ β„• ∧ (π‘β€˜1) ≀ 𝑁))
172171biimpri 227 . . . . . . . . 9 (((π‘β€˜1) ∈ β„• ∧ 𝑁 ∈ β„• ∧ (π‘β€˜1) ≀ 𝑁) β†’ (π‘β€˜1) ∈ (1...𝑁))
173169, 143, 170, 172syl3anc 1372 . . . . . . . 8 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜1) ∈ (1...𝑁))
174167, 173opelxpd 5713 . . . . . . 7 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ ⟨(π‘β€˜0), (π‘β€˜1)⟩ ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁)))
175174ralrimiva 3147 . . . . . 6 (πœ‘ β†’ βˆ€π‘ ∈ 𝐴 ⟨(π‘β€˜0), (π‘β€˜1)⟩ ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁)))
176 fveq1 6887 . . . . . . . . 9 (𝑑 = 𝑐 β†’ (π‘‘β€˜0) = (π‘β€˜0))
177 fveq1 6887 . . . . . . . . 9 (𝑑 = 𝑐 β†’ (π‘‘β€˜1) = (π‘β€˜1))
178176, 177opeq12d 4880 . . . . . . . 8 (𝑑 = 𝑐 β†’ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩ = ⟨(π‘β€˜0), (π‘β€˜1)⟩)
179178cbvmptv 5260 . . . . . . 7 (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) = (𝑐 ∈ 𝐴 ↦ ⟨(π‘β€˜0), (π‘β€˜1)⟩)
180179rnmptss 7117 . . . . . 6 (βˆ€π‘ ∈ 𝐴 ⟨(π‘β€˜0), (π‘β€˜1)⟩ ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁)) β†’ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) βŠ† ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁)))
181175, 180syl 17 . . . . 5 (πœ‘ β†’ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) βŠ† ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁)))
182118, 129, 134, 181fsumless 15738 . . . 4 (πœ‘ β†’ Σ𝑒 ∈ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)((Ξ›β€˜(1st β€˜π‘’)) Β· (Ξ›β€˜(2nd β€˜π‘’))) ≀ Σ𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))((Ξ›β€˜(1st β€˜π‘’)) Β· (Ξ›β€˜(2nd β€˜π‘’))))
183 fvex 6901 . . . . . . . 8 (π‘›β€˜0) ∈ V
184 fvex 6901 . . . . . . . 8 (π‘›β€˜1) ∈ V
185183, 184op1std 7980 . . . . . . 7 (𝑒 = ⟨(π‘›β€˜0), (π‘›β€˜1)⟩ β†’ (1st β€˜π‘’) = (π‘›β€˜0))
186185fveq2d 6892 . . . . . 6 (𝑒 = ⟨(π‘›β€˜0), (π‘›β€˜1)⟩ β†’ (Ξ›β€˜(1st β€˜π‘’)) = (Ξ›β€˜(π‘›β€˜0)))
187183, 184op2ndd 7981 . . . . . . 7 (𝑒 = ⟨(π‘›β€˜0), (π‘›β€˜1)⟩ β†’ (2nd β€˜π‘’) = (π‘›β€˜1))
188187fveq2d 6892 . . . . . 6 (𝑒 = ⟨(π‘›β€˜0), (π‘›β€˜1)⟩ β†’ (Ξ›β€˜(2nd β€˜π‘’)) = (Ξ›β€˜(π‘›β€˜1)))
189186, 188oveq12d 7422 . . . . 5 (𝑒 = ⟨(π‘›β€˜0), (π‘›β€˜1)⟩ β†’ ((Ξ›β€˜(1st β€˜π‘’)) Β· (Ξ›β€˜(2nd β€˜π‘’))) = ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1))))
190 opex 5463 . . . . . . . 8 ⟨(π‘β€˜0), (π‘β€˜1)⟩ ∈ V
191190rgenw 3066 . . . . . . 7 βˆ€π‘ ∈ 𝐴 ⟨(π‘β€˜0), (π‘β€˜1)⟩ ∈ V
192179fnmpt 6687 . . . . . . 7 (βˆ€π‘ ∈ 𝐴 ⟨(π‘β€˜0), (π‘β€˜1)⟩ ∈ V β†’ (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) Fn 𝐴)
193191, 192mp1i 13 . . . . . 6 (πœ‘ β†’ (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) Fn 𝐴)
194 eqidd 2734 . . . . . 6 (πœ‘ β†’ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) = ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩))
195140ad2antrr 725 . . . . . . . . . . 11 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ 𝑐:(0..^3)βŸΆβ„•)
196195ffnd 6715 . . . . . . . . . 10 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ 𝑐 Fn (0..^3))
19719ad4ant13 750 . . . . . . . . . . 11 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ 𝑛:(0..^3)βŸΆβ„•)
198197ffnd 6715 . . . . . . . . . 10 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ 𝑛 Fn (0..^3))
199 simpr 486 . . . . . . . . . . . . . . . 16 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›))
200179a1i 11 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) = (𝑐 ∈ 𝐴 ↦ ⟨(π‘β€˜0), (π‘β€˜1)⟩))
201190a1i 11 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ ⟨(π‘β€˜0), (π‘β€˜1)⟩ ∈ V)
202200, 201fvmpt2d 7007 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ⟨(π‘β€˜0), (π‘β€˜1)⟩)
203202adantr 482 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) β†’ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ⟨(π‘β€˜0), (π‘β€˜1)⟩)
204203adantr 482 . . . . . . . . . . . . . . . 16 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ⟨(π‘β€˜0), (π‘β€˜1)⟩)
205 fveq1 6887 . . . . . . . . . . . . . . . . . . . 20 (𝑐 = 𝑛 β†’ (π‘β€˜0) = (π‘›β€˜0))
206 fveq1 6887 . . . . . . . . . . . . . . . . . . . 20 (𝑐 = 𝑛 β†’ (π‘β€˜1) = (π‘›β€˜1))
207205, 206opeq12d 4880 . . . . . . . . . . . . . . . . . . 19 (𝑐 = 𝑛 β†’ ⟨(π‘β€˜0), (π‘β€˜1)⟩ = ⟨(π‘›β€˜0), (π‘›β€˜1)⟩)
208 opex 5463 . . . . . . . . . . . . . . . . . . . 20 ⟨(π‘›β€˜0), (π‘›β€˜1)⟩ ∈ V
209208a1i 11 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ⟨(π‘›β€˜0), (π‘›β€˜1)⟩ ∈ V)
210179, 207, 17, 209fvmptd3 7017 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›) = ⟨(π‘›β€˜0), (π‘›β€˜1)⟩)
211210adantlr 714 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) β†’ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›) = ⟨(π‘›β€˜0), (π‘›β€˜1)⟩)
212211adantr 482 . . . . . . . . . . . . . . . 16 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›) = ⟨(π‘›β€˜0), (π‘›β€˜1)⟩)
213199, 204, 2123eqtr3d 2781 . . . . . . . . . . . . . . 15 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ ⟨(π‘β€˜0), (π‘β€˜1)⟩ = ⟨(π‘›β€˜0), (π‘›β€˜1)⟩)
214183, 184opth2 5479 . . . . . . . . . . . . . . 15 (⟨(π‘β€˜0), (π‘β€˜1)⟩ = ⟨(π‘›β€˜0), (π‘›β€˜1)⟩ ↔ ((π‘β€˜0) = (π‘›β€˜0) ∧ (π‘β€˜1) = (π‘›β€˜1)))
215213, 214sylib 217 . . . . . . . . . . . . . 14 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ ((π‘β€˜0) = (π‘›β€˜0) ∧ (π‘β€˜1) = (π‘›β€˜1)))
216215simpld 496 . . . . . . . . . . . . 13 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ (π‘β€˜0) = (π‘›β€˜0))
217216ad2antrr 725 . . . . . . . . . . . 12 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 0) β†’ (π‘β€˜0) = (π‘›β€˜0))
218 simpr 486 . . . . . . . . . . . . 13 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 0) β†’ 𝑖 = 0)
219218fveq2d 6892 . . . . . . . . . . . 12 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 0) β†’ (π‘β€˜π‘–) = (π‘β€˜0))
220218fveq2d 6892 . . . . . . . . . . . 12 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 0) β†’ (π‘›β€˜π‘–) = (π‘›β€˜0))
221217, 219, 2203eqtr4d 2783 . . . . . . . . . . 11 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 0) β†’ (π‘β€˜π‘–) = (π‘›β€˜π‘–))
222215simprd 497 . . . . . . . . . . . . 13 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ (π‘β€˜1) = (π‘›β€˜1))
223222ad2antrr 725 . . . . . . . . . . . 12 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 1) β†’ (π‘β€˜1) = (π‘›β€˜1))
224 simpr 486 . . . . . . . . . . . . 13 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 1) β†’ 𝑖 = 1)
225224fveq2d 6892 . . . . . . . . . . . 12 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 1) β†’ (π‘β€˜π‘–) = (π‘β€˜1))
226224fveq2d 6892 . . . . . . . . . . . 12 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 1) β†’ (π‘›β€˜π‘–) = (π‘›β€˜1))
227223, 225, 2263eqtr4d 2783 . . . . . . . . . . 11 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 1) β†’ (π‘β€˜π‘–) = (π‘›β€˜π‘–))
228216ad2antrr 725 . . . . . . . . . . . . . . 15 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘β€˜0) = (π‘›β€˜0))
229222ad2antrr 725 . . . . . . . . . . . . . . 15 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘β€˜1) = (π‘›β€˜1))
230228, 229oveq12d 7422 . . . . . . . . . . . . . 14 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ ((π‘β€˜0) + (π‘β€˜1)) = ((π‘›β€˜0) + (π‘›β€˜1)))
231230oveq2d 7420 . . . . . . . . . . . . 13 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (𝑁 βˆ’ ((π‘β€˜0) + (π‘β€˜1))) = (𝑁 βˆ’ ((π‘›β€˜0) + (π‘›β€˜1))))
23222a1i 11 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (0..^3) = {0, 1, 2})
233232sumeq1d 15643 . . . . . . . . . . . . . . 15 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ Σ𝑗 ∈ (0..^3)(π‘β€˜π‘—) = Σ𝑗 ∈ {0, 1, 2} (π‘β€˜π‘—))
234 ssidd 4004 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ β„• βŠ† β„•)
235136ad4antr 731 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ 𝑁 ∈ β„€)
2363a1i 11 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ 3 ∈ β„•0)
237139ad4antr 731 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ 𝑐 ∈ (β„•(reprβ€˜3)𝑁))
238234, 235, 236, 237reprsum 33563 . . . . . . . . . . . . . . 15 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ Σ𝑗 ∈ (0..^3)(π‘β€˜π‘—) = 𝑁)
239 fveq2 6888 . . . . . . . . . . . . . . . 16 (𝑗 = 0 β†’ (π‘β€˜π‘—) = (π‘β€˜0))
240 fveq2 6888 . . . . . . . . . . . . . . . 16 (𝑗 = 1 β†’ (π‘β€˜π‘—) = (π‘β€˜1))
241 fveq2 6888 . . . . . . . . . . . . . . . 16 (𝑗 = 2 β†’ (π‘β€˜π‘—) = (π‘β€˜2))
242142nncnd 12224 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜0) ∈ β„‚)
243242ad4antr 731 . . . . . . . . . . . . . . . . 17 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘β€˜0) ∈ β„‚)
244169nncnd 12224 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜1) ∈ β„‚)
245244ad4antr 731 . . . . . . . . . . . . . . . . 17 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘β€˜1) ∈ β„‚)
24635a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ 2 ∈ (0..^3))
247140, 246ffvelcdmd 7083 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜2) ∈ β„•)
248247nncnd 12224 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑐 ∈ 𝐴) β†’ (π‘β€˜2) ∈ β„‚)
249248ad4antr 731 . . . . . . . . . . . . . . . . 17 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘β€˜2) ∈ β„‚)
250243, 245, 2493jca 1129 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ ((π‘β€˜0) ∈ β„‚ ∧ (π‘β€˜1) ∈ β„‚ ∧ (π‘β€˜2) ∈ β„‚))
25120, 27, 333pm3.2i 1340 . . . . . . . . . . . . . . . . 17 (0 ∈ V ∧ 1 ∈ V ∧ 2 ∈ V)
252251a1i 11 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (0 ∈ V ∧ 1 ∈ V ∧ 2 ∈ V))
253 0ne1 12279 . . . . . . . . . . . . . . . . 17 0 β‰  1
254253a1i 11 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ 0 β‰  1)
255 0ne2 12415 . . . . . . . . . . . . . . . . 17 0 β‰  2
256255a1i 11 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ 0 β‰  2)
257 1ne2 12416 . . . . . . . . . . . . . . . . 17 1 β‰  2
258257a1i 11 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ 1 β‰  2)
259239, 240, 241, 250, 252, 254, 256, 258sumtp 15691 . . . . . . . . . . . . . . 15 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ Σ𝑗 ∈ {0, 1, 2} (π‘β€˜π‘—) = (((π‘β€˜0) + (π‘β€˜1)) + (π‘β€˜2)))
260233, 238, 2593eqtr3rd 2782 . . . . . . . . . . . . . 14 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (((π‘β€˜0) + (π‘β€˜1)) + (π‘β€˜2)) = 𝑁)
261243, 245addcld 11229 . . . . . . . . . . . . . . 15 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ ((π‘β€˜0) + (π‘β€˜1)) ∈ β„‚)
262100ad5antr 733 . . . . . . . . . . . . . . 15 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ 𝑁 ∈ β„‚)
263261, 249, 262addrsub 11627 . . . . . . . . . . . . . 14 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ ((((π‘β€˜0) + (π‘β€˜1)) + (π‘β€˜2)) = 𝑁 ↔ (π‘β€˜2) = (𝑁 βˆ’ ((π‘β€˜0) + (π‘β€˜1)))))
264260, 263mpbid 231 . . . . . . . . . . . . 13 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘β€˜2) = (𝑁 βˆ’ ((π‘β€˜0) + (π‘β€˜1))))
265232sumeq1d 15643 . . . . . . . . . . . . . . 15 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ Σ𝑗 ∈ (0..^3)(π‘›β€˜π‘—) = Σ𝑗 ∈ {0, 1, 2} (π‘›β€˜π‘—))
26618ad4ant13 750 . . . . . . . . . . . . . . . . 17 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ 𝑛 ∈ (β„•(reprβ€˜3)𝑁))
267266ad2antrr 725 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ 𝑛 ∈ (β„•(reprβ€˜3)𝑁))
268234, 235, 236, 267reprsum 33563 . . . . . . . . . . . . . . 15 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ Σ𝑗 ∈ (0..^3)(π‘›β€˜π‘—) = 𝑁)
269 fveq2 6888 . . . . . . . . . . . . . . . 16 (𝑗 = 0 β†’ (π‘›β€˜π‘—) = (π‘›β€˜0))
270 fveq2 6888 . . . . . . . . . . . . . . . 16 (𝑗 = 1 β†’ (π‘›β€˜π‘—) = (π‘›β€˜1))
271 fveq2 6888 . . . . . . . . . . . . . . . 16 (𝑗 = 2 β†’ (π‘›β€˜π‘—) = (π‘›β€˜2))
27225nncnd 12224 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (π‘›β€˜0) ∈ β„‚)
273272adantlr 714 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) β†’ (π‘›β€˜0) ∈ β„‚)
274273ad3antrrr 729 . . . . . . . . . . . . . . . . 17 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘›β€˜0) ∈ β„‚)
27531nncnd 12224 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (π‘›β€˜1) ∈ β„‚)
276275adantlr 714 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) β†’ (π‘›β€˜1) ∈ β„‚)
277276ad3antrrr 729 . . . . . . . . . . . . . . . . 17 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘›β€˜1) ∈ β„‚)
27837nncnd 12224 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑛 ∈ 𝐴) β†’ (π‘›β€˜2) ∈ β„‚)
279278adantlr 714 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) β†’ (π‘›β€˜2) ∈ β„‚)
280279ad3antrrr 729 . . . . . . . . . . . . . . . . 17 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘›β€˜2) ∈ β„‚)
281274, 277, 2803jca 1129 . . . . . . . . . . . . . . . 16 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ ((π‘›β€˜0) ∈ β„‚ ∧ (π‘›β€˜1) ∈ β„‚ ∧ (π‘›β€˜2) ∈ β„‚))
282269, 270, 271, 281, 252, 254, 256, 258sumtp 15691 . . . . . . . . . . . . . . 15 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ Σ𝑗 ∈ {0, 1, 2} (π‘›β€˜π‘—) = (((π‘›β€˜0) + (π‘›β€˜1)) + (π‘›β€˜2)))
283265, 268, 2823eqtr3rd 2782 . . . . . . . . . . . . . 14 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (((π‘›β€˜0) + (π‘›β€˜1)) + (π‘›β€˜2)) = 𝑁)
284274, 277addcld 11229 . . . . . . . . . . . . . . 15 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ ((π‘›β€˜0) + (π‘›β€˜1)) ∈ β„‚)
285284, 280, 262addrsub 11627 . . . . . . . . . . . . . 14 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ ((((π‘›β€˜0) + (π‘›β€˜1)) + (π‘›β€˜2)) = 𝑁 ↔ (π‘›β€˜2) = (𝑁 βˆ’ ((π‘›β€˜0) + (π‘›β€˜1)))))
286283, 285mpbid 231 . . . . . . . . . . . . 13 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘›β€˜2) = (𝑁 βˆ’ ((π‘›β€˜0) + (π‘›β€˜1))))
287231, 264, 2863eqtr4d 2783 . . . . . . . . . . . 12 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘β€˜2) = (π‘›β€˜2))
288 simpr 486 . . . . . . . . . . . . 13 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ 𝑖 = 2)
289288fveq2d 6892 . . . . . . . . . . . 12 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘β€˜π‘–) = (π‘β€˜2))
290288fveq2d 6892 . . . . . . . . . . . 12 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘›β€˜π‘–) = (π‘›β€˜2))
291287, 289, 2903eqtr4d 2783 . . . . . . . . . . 11 ((((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) ∧ 𝑖 = 2) β†’ (π‘β€˜π‘–) = (π‘›β€˜π‘–))
292 simpr 486 . . . . . . . . . . . . 13 (((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) β†’ 𝑖 ∈ (0..^3))
293292, 22eleqtrdi 2844 . . . . . . . . . . . 12 (((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) β†’ 𝑖 ∈ {0, 1, 2})
294 vex 3479 . . . . . . . . . . . . 13 𝑖 ∈ V
295294eltp 4691 . . . . . . . . . . . 12 (𝑖 ∈ {0, 1, 2} ↔ (𝑖 = 0 ∨ 𝑖 = 1 ∨ 𝑖 = 2))
296293, 295sylib 217 . . . . . . . . . . 11 (((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) β†’ (𝑖 = 0 ∨ 𝑖 = 1 ∨ 𝑖 = 2))
297221, 227, 291, 296mpjao3dan 1432 . . . . . . . . . 10 (((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) ∧ 𝑖 ∈ (0..^3)) β†’ (π‘β€˜π‘–) = (π‘›β€˜π‘–))
298196, 198, 297eqfnfvd 7031 . . . . . . . . 9 ((((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) ∧ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›)) β†’ 𝑐 = 𝑛)
299298ex 414 . . . . . . . 8 (((πœ‘ ∧ 𝑐 ∈ 𝐴) ∧ 𝑛 ∈ 𝐴) β†’ (((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›) β†’ 𝑐 = 𝑛))
300299anasss 468 . . . . . . 7 ((πœ‘ ∧ (𝑐 ∈ 𝐴 ∧ 𝑛 ∈ 𝐴)) β†’ (((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›) β†’ 𝑐 = 𝑛))
301300ralrimivva 3201 . . . . . 6 (πœ‘ β†’ βˆ€π‘ ∈ 𝐴 βˆ€π‘› ∈ 𝐴 (((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›) β†’ 𝑐 = 𝑛))
302 dff1o6 7268 . . . . . . 7 ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩):𝐴–1-1-ontoβ†’ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) ↔ ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) Fn 𝐴 ∧ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) = ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) ∧ βˆ€π‘ ∈ 𝐴 βˆ€π‘› ∈ 𝐴 (((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›) β†’ 𝑐 = 𝑛)))
303302biimpri 227 . . . . . 6 (((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) Fn 𝐴 ∧ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) = ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩) ∧ βˆ€π‘ ∈ 𝐴 βˆ€π‘› ∈ 𝐴 (((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘) = ((𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)β€˜π‘›) β†’ 𝑐 = 𝑛)) β†’ (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩):𝐴–1-1-ontoβ†’ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩))
304193, 194, 301, 303syl3anc 1372 . . . . 5 (πœ‘ β†’ (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩):𝐴–1-1-ontoβ†’ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩))
305181sselda 3981 . . . . . . . 8 ((πœ‘ ∧ 𝑒 ∈ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)) β†’ 𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁)))
306305, 124syldan 592 . . . . . . 7 ((πœ‘ ∧ 𝑒 ∈ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)) β†’ (Ξ›β€˜(1st β€˜π‘’)) ∈ ℝ)
307305, 128syldan 592 . . . . . . 7 ((πœ‘ ∧ 𝑒 ∈ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)) β†’ (Ξ›β€˜(2nd β€˜π‘’)) ∈ ℝ)
308306, 307remulcld 11240 . . . . . 6 ((πœ‘ ∧ 𝑒 ∈ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)) β†’ ((Ξ›β€˜(1st β€˜π‘’)) Β· (Ξ›β€˜(2nd β€˜π‘’))) ∈ ℝ)
309308recnd 11238 . . . . 5 ((πœ‘ ∧ 𝑒 ∈ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)) β†’ ((Ξ›β€˜(1st β€˜π‘’)) Β· (Ξ›β€˜(2nd β€˜π‘’))) ∈ β„‚)
310189, 10, 304, 210, 309fsumf1o 15665 . . . 4 (πœ‘ β†’ Σ𝑒 ∈ ran (𝑑 ∈ 𝐴 ↦ ⟨(π‘‘β€˜0), (π‘‘β€˜1)⟩)((Ξ›β€˜(1st β€˜π‘’)) Β· (Ξ›β€˜(2nd β€˜π‘’))) = Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1))))
31175recnd 11238 . . . . . 6 (πœ‘ β†’ Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—) ∈ β„‚)
31269recnd 11238 . . . . . 6 ((πœ‘ ∧ 𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})) β†’ (Ξ›β€˜π‘–) ∈ β„‚)
31353, 311, 312fsummulc1 15727 . . . . 5 (πœ‘ β†’ (Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})(Ξ›β€˜π‘–) Β· Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—)) = Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})((Ξ›β€˜π‘–) Β· Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—)))
31447a1i 11 . . . . . . 7 ((πœ‘ ∧ 𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})) β†’ (1...𝑁) ∈ Fin)
31574adantrl 715 . . . . . . . . 9 ((πœ‘ ∧ (𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2}) ∧ 𝑗 ∈ (1...𝑁))) β†’ (Ξ›β€˜π‘—) ∈ ℝ)
316315anassrs 469 . . . . . . . 8 (((πœ‘ ∧ 𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})) ∧ 𝑗 ∈ (1...𝑁)) β†’ (Ξ›β€˜π‘—) ∈ ℝ)
317316recnd 11238 . . . . . . 7 (((πœ‘ ∧ 𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})) ∧ 𝑗 ∈ (1...𝑁)) β†’ (Ξ›β€˜π‘—) ∈ β„‚)
318314, 312, 317fsummulc2 15726 . . . . . 6 ((πœ‘ ∧ 𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})) β†’ ((Ξ›β€˜π‘–) Β· Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—)) = Σ𝑗 ∈ (1...𝑁)((Ξ›β€˜π‘–) Β· (Ξ›β€˜π‘—)))
319318sumeq2dv 15645 . . . . 5 (πœ‘ β†’ Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})((Ξ›β€˜π‘–) Β· Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—)) = Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})Σ𝑗 ∈ (1...𝑁)((Ξ›β€˜π‘–) Β· (Ξ›β€˜π‘—)))
320 vex 3479 . . . . . . . . 9 𝑗 ∈ V
321294, 320op1std 7980 . . . . . . . 8 (𝑒 = βŸ¨π‘–, π‘—βŸ© β†’ (1st β€˜π‘’) = 𝑖)
322321fveq2d 6892 . . . . . . 7 (𝑒 = βŸ¨π‘–, π‘—βŸ© β†’ (Ξ›β€˜(1st β€˜π‘’)) = (Ξ›β€˜π‘–))
323294, 320op2ndd 7981 . . . . . . . 8 (𝑒 = βŸ¨π‘–, π‘—βŸ© β†’ (2nd β€˜π‘’) = 𝑗)
324323fveq2d 6892 . . . . . . 7 (𝑒 = βŸ¨π‘–, π‘—βŸ© β†’ (Ξ›β€˜(2nd β€˜π‘’)) = (Ξ›β€˜π‘—))
325322, 324oveq12d 7422 . . . . . 6 (𝑒 = βŸ¨π‘–, π‘—βŸ© β†’ ((Ξ›β€˜(1st β€˜π‘’)) Β· (Ξ›β€˜(2nd β€˜π‘’))) = ((Ξ›β€˜π‘–) Β· (Ξ›β€˜π‘—)))
32669adantrr 716 . . . . . . . 8 ((πœ‘ ∧ (𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2}) ∧ 𝑗 ∈ (1...𝑁))) β†’ (Ξ›β€˜π‘–) ∈ ℝ)
327326, 315remulcld 11240 . . . . . . 7 ((πœ‘ ∧ (𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2}) ∧ 𝑗 ∈ (1...𝑁))) β†’ ((Ξ›β€˜π‘–) Β· (Ξ›β€˜π‘—)) ∈ ℝ)
328327recnd 11238 . . . . . 6 ((πœ‘ ∧ (𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2}) ∧ 𝑗 ∈ (1...𝑁))) β†’ ((Ξ›β€˜π‘–) Β· (Ξ›β€˜π‘—)) ∈ β„‚)
329325, 53, 71, 328fsumxp 15714 . . . . 5 (πœ‘ β†’ Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})Σ𝑗 ∈ (1...𝑁)((Ξ›β€˜π‘–) Β· (Ξ›β€˜π‘—)) = Σ𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))((Ξ›β€˜(1st β€˜π‘’)) Β· (Ξ›β€˜(2nd β€˜π‘’))))
330313, 319, 3293eqtrrd 2778 . . . 4 (πœ‘ β†’ Σ𝑒 ∈ ((((1...𝑁) βˆ– β„™) βˆͺ {2}) Γ— (1...𝑁))((Ξ›β€˜(1st β€˜π‘’)) Β· (Ξ›β€˜(2nd β€˜π‘’))) = (Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})(Ξ›β€˜π‘–) Β· Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—)))
331182, 310, 3303brtr3d 5178 . . 3 (πœ‘ β†’ Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1))) ≀ (Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})(Ξ›β€˜π‘–) Β· Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—)))
33245, 76, 43, 116, 331lemul2ad 12150 . 2 (πœ‘ β†’ ((logβ€˜π‘) Β· Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· (Ξ›β€˜(π‘›β€˜1)))) ≀ ((logβ€˜π‘) Β· (Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})(Ξ›β€˜π‘–) Β· Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—))))
33341, 46, 77, 113, 332letrd 11367 1 (πœ‘ β†’ Σ𝑛 ∈ 𝐴 ((Ξ›β€˜(π‘›β€˜0)) Β· ((Ξ›β€˜(π‘›β€˜1)) Β· (Ξ›β€˜(π‘›β€˜2)))) ≀ ((logβ€˜π‘) Β· (Σ𝑖 ∈ (((1...𝑁) βˆ– β„™) βˆͺ {2})(Ξ›β€˜π‘–) Β· Σ𝑗 ∈ (1...𝑁)(Ξ›β€˜π‘—))))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 397   ∨ w3o 1087   ∧ w3a 1088   = wceq 1542   ∈ wcel 2107   β‰  wne 2941  βˆ€wral 3062  {crab 3433  Vcvv 3475   βˆ– cdif 3944   βˆͺ cun 3945   ∩ cin 3946   βŠ† wss 3947  {csn 4627  {ctp 4631  βŸ¨cop 4633   class class class wbr 5147   ↦ cmpt 5230   Γ— cxp 5673  ran crn 5676   Fn wfn 6535  βŸΆwf 6536  β€“1-1-ontoβ†’wf1o 6539  β€˜cfv 6540  (class class class)co 7404  1st c1st 7968  2nd c2nd 7969  Fincfn 8935  β„‚cc 11104  β„cr 11105  0cc0 11106  1c1 11107   + caddc 11109   Β· cmul 11111   ≀ cle 11245   βˆ’ cmin 11440  β„•cn 12208  2c2 12263  3c3 12264  β„•0cn0 12468  β„€cz 12554  β„+crp 12970  ...cfz 13480  ..^cfzo 13623  Ξ£csu 15628   βˆ₯ cdvds 16193  β„™cprime 16604  logclog 26045  Ξ›cvma 26576  reprcrepr 33558
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7720  ax-inf2 9632  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184  ax-addf 11185  ax-mulf 11186
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-tp 4632  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-iin 4999  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-se 5631  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7360  df-ov 7407  df-oprab 7408  df-mpo 7409  df-of 7665  df-om 7851  df-1st 7970  df-2nd 7971  df-supp 8142  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-2o 8462  df-oadd 8465  df-er 8699  df-map 8818  df-pm 8819  df-ixp 8888  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fsupp 9358  df-fi 9402  df-sup 9433  df-inf 9434  df-oi 9501  df-dju 9892  df-card 9930  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-4 12273  df-5 12274  df-6 12275  df-7 12276  df-8 12277  df-9 12278  df-n0 12469  df-z 12555  df-dec 12674  df-uz 12819  df-q 12929  df-rp 12971  df-xneg 13088  df-xadd 13089  df-xmul 13090  df-ioo 13324  df-ioc 13325  df-ico 13326  df-icc 13327  df-fz 13481  df-fzo 13624  df-fl 13753  df-mod 13831  df-seq 13963  df-exp 14024  df-fac 14230  df-bc 14259  df-hash 14287  df-shft 15010  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179  df-limsup 15411  df-clim 15428  df-rlim 15429  df-sum 15629  df-ef 16007  df-sin 16009  df-cos 16010  df-pi 16012  df-dvds 16194  df-gcd 16432  df-prm 16605  df-pc 16766  df-struct 17076  df-sets 17093  df-slot 17111  df-ndx 17123  df-base 17141  df-ress 17170  df-plusg 17206  df-mulr 17207  df-starv 17208  df-sca 17209  df-vsca 17210  df-ip 17211  df-tset 17212  df-ple 17213  df-ds 17215  df-unif 17216  df-hom 17217  df-cco 17218  df-rest 17364  df-topn 17365  df-0g 17383  df-gsum 17384  df-topgen 17385  df-pt 17386  df-prds 17389  df-xrs 17444  df-qtop 17449  df-imas 17450  df-xps 17452  df-mre 17526  df-mrc 17527  df-acs 17529  df-mgm 18557  df-sgrp 18606  df-mnd 18622  df-submnd 18668  df-mulg 18945  df-cntz 19175  df-cmn 19643  df-psmet 20921  df-xmet 20922  df-met 20923  df-bl 20924  df-mopn 20925  df-fbas 20926  df-fg 20927  df-cnfld 20930  df-top 22378  df-topon 22395  df-topsp 22417  df-bases 22431  df-cld 22505  df-ntr 22506  df-cls 22507  df-nei 22584  df-lp 22622  df-perf 22623  df-cn 22713  df-cnp 22714  df-haus 22801  df-tx 23048  df-hmeo 23241  df-fil 23332  df-fm 23424  df-flim 23425  df-flf 23426  df-xms 23808  df-ms 23809  df-tms 23810  df-cncf 24376  df-limc 25365  df-dv 25366  df-log 26047  df-vma 26582  df-repr 33559
This theorem is referenced by:  hgt750leme  33608
  Copyright terms: Public domain W3C validator