MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  bpoly4 Structured version   Visualization version   GIF version

Theorem bpoly4 16015
Description: The Bernoulli polynomials at four. (Contributed by Scott Fenton, 8-Jul-2015.)
Assertion
Ref Expression
bpoly4 (𝑋 ∈ ℂ → (4 BernPoly 𝑋) = ((((𝑋↑4) − (2 · (𝑋↑3))) + (𝑋↑2)) − (1 / 30)))

Proof of Theorem bpoly4
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 4nn0 12447 . . 3 4 ∈ ℕ0
2 bpolyval 16005 . . 3 ((4 ∈ ℕ0𝑋 ∈ ℂ) → (4 BernPoly 𝑋) = ((𝑋↑4) − Σ𝑘 ∈ (0...(4 − 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)))))
31, 2mpan 691 . 2 (𝑋 ∈ ℂ → (4 BernPoly 𝑋) = ((𝑋↑4) − Σ𝑘 ∈ (0...(4 − 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)))))
4 4m1e3 12296 . . . . . . 7 (4 − 1) = 3
5 df-3 12236 . . . . . . 7 3 = (2 + 1)
64, 5eqtri 2760 . . . . . 6 (4 − 1) = (2 + 1)
76oveq2i 7371 . . . . 5 (0...(4 − 1)) = (0...(2 + 1))
87sumeq1i 15650 . . . 4 Σ𝑘 ∈ (0...(4 − 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = Σ𝑘 ∈ (0...(2 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)))
9 2eluzge0 12822 . . . . . . 7 2 ∈ (ℤ‘0)
109a1i 11 . . . . . 6 (𝑋 ∈ ℂ → 2 ∈ (ℤ‘0))
11 elfzelz 13469 . . . . . . . . . 10 (𝑘 ∈ (0...(2 + 1)) → 𝑘 ∈ ℤ)
12 bccl 14275 . . . . . . . . . 10 ((4 ∈ ℕ0𝑘 ∈ ℤ) → (4C𝑘) ∈ ℕ0)
131, 11, 12sylancr 588 . . . . . . . . 9 (𝑘 ∈ (0...(2 + 1)) → (4C𝑘) ∈ ℕ0)
1413nn0cnd 12491 . . . . . . . 8 (𝑘 ∈ (0...(2 + 1)) → (4C𝑘) ∈ ℂ)
1514adantl 481 . . . . . . 7 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → (4C𝑘) ∈ ℂ)
16 elfznn0 13565 . . . . . . . . . 10 (𝑘 ∈ (0...(2 + 1)) → 𝑘 ∈ ℕ0)
17 bpolycl 16008 . . . . . . . . . 10 ((𝑘 ∈ ℕ0𝑋 ∈ ℂ) → (𝑘 BernPoly 𝑋) ∈ ℂ)
1816, 17sylan 581 . . . . . . . . 9 ((𝑘 ∈ (0...(2 + 1)) ∧ 𝑋 ∈ ℂ) → (𝑘 BernPoly 𝑋) ∈ ℂ)
1918ancoms 458 . . . . . . . 8 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → (𝑘 BernPoly 𝑋) ∈ ℂ)
20 4re 12256 . . . . . . . . . . . . 13 4 ∈ ℝ
2120a1i 11 . . . . . . . . . . . 12 (𝑘 ∈ (0...(2 + 1)) → 4 ∈ ℝ)
2211zred 12624 . . . . . . . . . . . 12 (𝑘 ∈ (0...(2 + 1)) → 𝑘 ∈ ℝ)
2321, 22resubcld 11569 . . . . . . . . . . 11 (𝑘 ∈ (0...(2 + 1)) → (4 − 𝑘) ∈ ℝ)
24 peano2re 11310 . . . . . . . . . . 11 ((4 − 𝑘) ∈ ℝ → ((4 − 𝑘) + 1) ∈ ℝ)
2523, 24syl 17 . . . . . . . . . 10 (𝑘 ∈ (0...(2 + 1)) → ((4 − 𝑘) + 1) ∈ ℝ)
2625recnd 11164 . . . . . . . . 9 (𝑘 ∈ (0...(2 + 1)) → ((4 − 𝑘) + 1) ∈ ℂ)
2726adantl 481 . . . . . . . 8 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → ((4 − 𝑘) + 1) ∈ ℂ)
28 1red 11136 . . . . . . . . . . 11 (𝑘 ∈ (0...(2 + 1)) → 1 ∈ ℝ)
295oveq2i 7371 . . . . . . . . . . . . . 14 (0...3) = (0...(2 + 1))
3029eleq2i 2829 . . . . . . . . . . . . 13 (𝑘 ∈ (0...3) ↔ 𝑘 ∈ (0...(2 + 1)))
31 elfzelz 13469 . . . . . . . . . . . . . . 15 (𝑘 ∈ (0...3) → 𝑘 ∈ ℤ)
3231zred 12624 . . . . . . . . . . . . . 14 (𝑘 ∈ (0...3) → 𝑘 ∈ ℝ)
33 3re 12252 . . . . . . . . . . . . . . 15 3 ∈ ℝ
3433a1i 11 . . . . . . . . . . . . . 14 (𝑘 ∈ (0...3) → 3 ∈ ℝ)
3520a1i 11 . . . . . . . . . . . . . 14 (𝑘 ∈ (0...3) → 4 ∈ ℝ)
36 elfzle2 13473 . . . . . . . . . . . . . 14 (𝑘 ∈ (0...3) → 𝑘 ≤ 3)
37 3lt4 12341 . . . . . . . . . . . . . . 15 3 < 4
3837a1i 11 . . . . . . . . . . . . . 14 (𝑘 ∈ (0...3) → 3 < 4)
3932, 34, 35, 36, 38lelttrd 11295 . . . . . . . . . . . . 13 (𝑘 ∈ (0...3) → 𝑘 < 4)
4030, 39sylbir 235 . . . . . . . . . . . 12 (𝑘 ∈ (0...(2 + 1)) → 𝑘 < 4)
4122, 21posdifd 11728 . . . . . . . . . . . 12 (𝑘 ∈ (0...(2 + 1)) → (𝑘 < 4 ↔ 0 < (4 − 𝑘)))
4240, 41mpbid 232 . . . . . . . . . . 11 (𝑘 ∈ (0...(2 + 1)) → 0 < (4 − 𝑘))
43 0lt1 11663 . . . . . . . . . . . 12 0 < 1
4443a1i 11 . . . . . . . . . . 11 (𝑘 ∈ (0...(2 + 1)) → 0 < 1)
4523, 28, 42, 44addgt0d 11716 . . . . . . . . . 10 (𝑘 ∈ (0...(2 + 1)) → 0 < ((4 − 𝑘) + 1))
4645gt0ne0d 11705 . . . . . . . . 9 (𝑘 ∈ (0...(2 + 1)) → ((4 − 𝑘) + 1) ≠ 0)
4746adantl 481 . . . . . . . 8 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → ((4 − 𝑘) + 1) ≠ 0)
4819, 27, 47divcld 11922 . . . . . . 7 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)) ∈ ℂ)
4915, 48mulcld 11156 . . . . . 6 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) ∈ ℂ)
505eqeq2i 2750 . . . . . . 7 (𝑘 = 3 ↔ 𝑘 = (2 + 1))
51 oveq2 7368 . . . . . . . . 9 (𝑘 = 3 → (4C𝑘) = (4C3))
52 4bc3eq4 14281 . . . . . . . . 9 (4C3) = 4
5351, 52eqtrdi 2788 . . . . . . . 8 (𝑘 = 3 → (4C𝑘) = 4)
54 oveq1 7367 . . . . . . . . 9 (𝑘 = 3 → (𝑘 BernPoly 𝑋) = (3 BernPoly 𝑋))
55 oveq2 7368 . . . . . . . . . . 11 (𝑘 = 3 → (4 − 𝑘) = (4 − 3))
5655oveq1d 7375 . . . . . . . . . 10 (𝑘 = 3 → ((4 − 𝑘) + 1) = ((4 − 3) + 1))
57 4cn 12257 . . . . . . . . . . . . 13 4 ∈ ℂ
58 3cn 12253 . . . . . . . . . . . . 13 3 ∈ ℂ
59 ax-1cn 11087 . . . . . . . . . . . . 13 1 ∈ ℂ
60 3p1e4 12312 . . . . . . . . . . . . 13 (3 + 1) = 4
6157, 58, 59, 60subaddrii 11474 . . . . . . . . . . . 12 (4 − 3) = 1
6261oveq1i 7370 . . . . . . . . . . 11 ((4 − 3) + 1) = (1 + 1)
63 df-2 12235 . . . . . . . . . . 11 2 = (1 + 1)
6462, 63eqtr4i 2763 . . . . . . . . . 10 ((4 − 3) + 1) = 2
6556, 64eqtrdi 2788 . . . . . . . . 9 (𝑘 = 3 → ((4 − 𝑘) + 1) = 2)
6654, 65oveq12d 7378 . . . . . . . 8 (𝑘 = 3 → ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)) = ((3 BernPoly 𝑋) / 2))
6753, 66oveq12d 7378 . . . . . . 7 (𝑘 = 3 → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (4 · ((3 BernPoly 𝑋) / 2)))
6850, 67sylbir 235 . . . . . 6 (𝑘 = (2 + 1) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (4 · ((3 BernPoly 𝑋) / 2)))
6910, 49, 68fsump1 15709 . . . . 5 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(2 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (Σ𝑘 ∈ (0...2)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) + (4 · ((3 BernPoly 𝑋) / 2))))
7063oveq2i 7371 . . . . . . . 8 (0...2) = (0...(1 + 1))
7170sumeq1i 15650 . . . . . . 7 Σ𝑘 ∈ (0...2)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = Σ𝑘 ∈ (0...(1 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)))
72 1eluzge0 12821 . . . . . . . . . 10 1 ∈ (ℤ‘0)
7372a1i 11 . . . . . . . . 9 (𝑋 ∈ ℂ → 1 ∈ (ℤ‘0))
74 fzssp1 13512 . . . . . . . . . . . 12 (0...(1 + 1)) ⊆ (0...((1 + 1) + 1))
7563oveq1i 7370 . . . . . . . . . . . . 13 (2 + 1) = ((1 + 1) + 1)
7675oveq2i 7371 . . . . . . . . . . . 12 (0...(2 + 1)) = (0...((1 + 1) + 1))
7774, 76sseqtrri 3972 . . . . . . . . . . 11 (0...(1 + 1)) ⊆ (0...(2 + 1))
7877sseli 3918 . . . . . . . . . 10 (𝑘 ∈ (0...(1 + 1)) → 𝑘 ∈ (0...(2 + 1)))
7978, 49sylan2 594 . . . . . . . . 9 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(1 + 1))) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) ∈ ℂ)
8063eqeq2i 2750 . . . . . . . . . 10 (𝑘 = 2 ↔ 𝑘 = (1 + 1))
81 oveq2 7368 . . . . . . . . . . . 12 (𝑘 = 2 → (4C𝑘) = (4C2))
82 4bc2eq6 14282 . . . . . . . . . . . 12 (4C2) = 6
8381, 82eqtrdi 2788 . . . . . . . . . . 11 (𝑘 = 2 → (4C𝑘) = 6)
84 oveq1 7367 . . . . . . . . . . . 12 (𝑘 = 2 → (𝑘 BernPoly 𝑋) = (2 BernPoly 𝑋))
85 oveq2 7368 . . . . . . . . . . . . . 14 (𝑘 = 2 → (4 − 𝑘) = (4 − 2))
8685oveq1d 7375 . . . . . . . . . . . . 13 (𝑘 = 2 → ((4 − 𝑘) + 1) = ((4 − 2) + 1))
87 2cn 12247 . . . . . . . . . . . . . . . 16 2 ∈ ℂ
88 2p2e4 12302 . . . . . . . . . . . . . . . 16 (2 + 2) = 4
8957, 87, 87, 88subaddrii 11474 . . . . . . . . . . . . . . 15 (4 − 2) = 2
9089oveq1i 7370 . . . . . . . . . . . . . 14 ((4 − 2) + 1) = (2 + 1)
9190, 5eqtr4i 2763 . . . . . . . . . . . . 13 ((4 − 2) + 1) = 3
9286, 91eqtrdi 2788 . . . . . . . . . . . 12 (𝑘 = 2 → ((4 − 𝑘) + 1) = 3)
9384, 92oveq12d 7378 . . . . . . . . . . 11 (𝑘 = 2 → ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)) = ((2 BernPoly 𝑋) / 3))
9483, 93oveq12d 7378 . . . . . . . . . 10 (𝑘 = 2 → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (6 · ((2 BernPoly 𝑋) / 3)))
9580, 94sylbir 235 . . . . . . . . 9 (𝑘 = (1 + 1) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (6 · ((2 BernPoly 𝑋) / 3)))
9673, 79, 95fsump1 15709 . . . . . . . 8 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(1 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (Σ𝑘 ∈ (0...1)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) + (6 · ((2 BernPoly 𝑋) / 3))))
97 0p1e1 12289 . . . . . . . . . . . 12 (0 + 1) = 1
9897oveq2i 7371 . . . . . . . . . . 11 (0...(0 + 1)) = (0...1)
9998sumeq1i 15650 . . . . . . . . . 10 Σ𝑘 ∈ (0...(0 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = Σ𝑘 ∈ (0...1)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)))
100 0nn0 12443 . . . . . . . . . . . . . 14 0 ∈ ℕ0
101 nn0uz 12817 . . . . . . . . . . . . . 14 0 = (ℤ‘0)
102100, 101eleqtri 2835 . . . . . . . . . . . . 13 0 ∈ (ℤ‘0)
103102a1i 11 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → 0 ∈ (ℤ‘0))
104 3nn 12251 . . . . . . . . . . . . . . . . 17 3 ∈ ℕ
105 nnuz 12818 . . . . . . . . . . . . . . . . 17 ℕ = (ℤ‘1)
106104, 105eleqtri 2835 . . . . . . . . . . . . . . . 16 3 ∈ (ℤ‘1)
107 fzss2 13509 . . . . . . . . . . . . . . . 16 (3 ∈ (ℤ‘1) → (0...1) ⊆ (0...3))
108106, 107ax-mp 5 . . . . . . . . . . . . . . 15 (0...1) ⊆ (0...3)
109 2p1e3 12309 . . . . . . . . . . . . . . . 16 (2 + 1) = 3
110109oveq2i 7371 . . . . . . . . . . . . . . 15 (0...(2 + 1)) = (0...3)
111108, 98, 1103sstr4i 3974 . . . . . . . . . . . . . 14 (0...(0 + 1)) ⊆ (0...(2 + 1))
112111sseli 3918 . . . . . . . . . . . . 13 (𝑘 ∈ (0...(0 + 1)) → 𝑘 ∈ (0...(2 + 1)))
113112, 49sylan2 594 . . . . . . . . . . . 12 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(0 + 1))) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) ∈ ℂ)
11497eqeq2i 2750 . . . . . . . . . . . . 13 (𝑘 = (0 + 1) ↔ 𝑘 = 1)
115 oveq2 7368 . . . . . . . . . . . . . . 15 (𝑘 = 1 → (4C𝑘) = (4C1))
116 bcn1 14266 . . . . . . . . . . . . . . . 16 (4 ∈ ℕ0 → (4C1) = 4)
1171, 116ax-mp 5 . . . . . . . . . . . . . . 15 (4C1) = 4
118115, 117eqtrdi 2788 . . . . . . . . . . . . . 14 (𝑘 = 1 → (4C𝑘) = 4)
119 oveq1 7367 . . . . . . . . . . . . . . 15 (𝑘 = 1 → (𝑘 BernPoly 𝑋) = (1 BernPoly 𝑋))
120 oveq2 7368 . . . . . . . . . . . . . . . . 17 (𝑘 = 1 → (4 − 𝑘) = (4 − 1))
121120oveq1d 7375 . . . . . . . . . . . . . . . 16 (𝑘 = 1 → ((4 − 𝑘) + 1) = ((4 − 1) + 1))
1224oveq1i 7370 . . . . . . . . . . . . . . . . 17 ((4 − 1) + 1) = (3 + 1)
123 df-4 12237 . . . . . . . . . . . . . . . . 17 4 = (3 + 1)
124122, 123eqtr4i 2763 . . . . . . . . . . . . . . . 16 ((4 − 1) + 1) = 4
125121, 124eqtrdi 2788 . . . . . . . . . . . . . . 15 (𝑘 = 1 → ((4 − 𝑘) + 1) = 4)
126119, 125oveq12d 7378 . . . . . . . . . . . . . 14 (𝑘 = 1 → ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)) = ((1 BernPoly 𝑋) / 4))
127118, 126oveq12d 7378 . . . . . . . . . . . . 13 (𝑘 = 1 → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (4 · ((1 BernPoly 𝑋) / 4)))
128114, 127sylbi 217 . . . . . . . . . . . 12 (𝑘 = (0 + 1) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (4 · ((1 BernPoly 𝑋) / 4)))
129103, 113, 128fsump1 15709 . . . . . . . . . . 11 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(0 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (Σ𝑘 ∈ (0...0)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) + (4 · ((1 BernPoly 𝑋) / 4))))
130 0z 12526 . . . . . . . . . . . . . 14 0 ∈ ℤ
13159a1i 11 . . . . . . . . . . . . . . 15 (𝑋 ∈ ℂ → 1 ∈ ℂ)
132 bpolycl 16008 . . . . . . . . . . . . . . . . 17 ((0 ∈ ℕ0𝑋 ∈ ℂ) → (0 BernPoly 𝑋) ∈ ℂ)
133100, 132mpan 691 . . . . . . . . . . . . . . . 16 (𝑋 ∈ ℂ → (0 BernPoly 𝑋) ∈ ℂ)
134 5cn 12260 . . . . . . . . . . . . . . . . 17 5 ∈ ℂ
135134a1i 11 . . . . . . . . . . . . . . . 16 (𝑋 ∈ ℂ → 5 ∈ ℂ)
136 0re 11137 . . . . . . . . . . . . . . . . . 18 0 ∈ ℝ
137 5pos 12281 . . . . . . . . . . . . . . . . . 18 0 < 5
138136, 137gtneii 11249 . . . . . . . . . . . . . . . . 17 5 ≠ 0
139138a1i 11 . . . . . . . . . . . . . . . 16 (𝑋 ∈ ℂ → 5 ≠ 0)
140133, 135, 139divcld 11922 . . . . . . . . . . . . . . 15 (𝑋 ∈ ℂ → ((0 BernPoly 𝑋) / 5) ∈ ℂ)
141131, 140mulcld 11156 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (1 · ((0 BernPoly 𝑋) / 5)) ∈ ℂ)
142 oveq2 7368 . . . . . . . . . . . . . . . . 17 (𝑘 = 0 → (4C𝑘) = (4C0))
143 bcn0 14263 . . . . . . . . . . . . . . . . . 18 (4 ∈ ℕ0 → (4C0) = 1)
1441, 143ax-mp 5 . . . . . . . . . . . . . . . . 17 (4C0) = 1
145142, 144eqtrdi 2788 . . . . . . . . . . . . . . . 16 (𝑘 = 0 → (4C𝑘) = 1)
146 oveq1 7367 . . . . . . . . . . . . . . . . 17 (𝑘 = 0 → (𝑘 BernPoly 𝑋) = (0 BernPoly 𝑋))
147 oveq2 7368 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 0 → (4 − 𝑘) = (4 − 0))
148147oveq1d 7375 . . . . . . . . . . . . . . . . . 18 (𝑘 = 0 → ((4 − 𝑘) + 1) = ((4 − 0) + 1))
14957subid1i 11457 . . . . . . . . . . . . . . . . . . . 20 (4 − 0) = 4
150149oveq1i 7370 . . . . . . . . . . . . . . . . . . 19 ((4 − 0) + 1) = (4 + 1)
151 4p1e5 12313 . . . . . . . . . . . . . . . . . . 19 (4 + 1) = 5
152150, 151eqtri 2760 . . . . . . . . . . . . . . . . . 18 ((4 − 0) + 1) = 5
153148, 152eqtrdi 2788 . . . . . . . . . . . . . . . . 17 (𝑘 = 0 → ((4 − 𝑘) + 1) = 5)
154146, 153oveq12d 7378 . . . . . . . . . . . . . . . 16 (𝑘 = 0 → ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)) = ((0 BernPoly 𝑋) / 5))
155145, 154oveq12d 7378 . . . . . . . . . . . . . . 15 (𝑘 = 0 → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (1 · ((0 BernPoly 𝑋) / 5)))
156155fsum1 15700 . . . . . . . . . . . . . 14 ((0 ∈ ℤ ∧ (1 · ((0 BernPoly 𝑋) / 5)) ∈ ℂ) → Σ𝑘 ∈ (0...0)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (1 · ((0 BernPoly 𝑋) / 5)))
157130, 141, 156sylancr 588 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...0)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (1 · ((0 BernPoly 𝑋) / 5)))
158 bpoly0 16006 . . . . . . . . . . . . . . . 16 (𝑋 ∈ ℂ → (0 BernPoly 𝑋) = 1)
159158oveq1d 7375 . . . . . . . . . . . . . . 15 (𝑋 ∈ ℂ → ((0 BernPoly 𝑋) / 5) = (1 / 5))
160159oveq2d 7376 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (1 · ((0 BernPoly 𝑋) / 5)) = (1 · (1 / 5)))
161134, 138reccli 11876 . . . . . . . . . . . . . . 15 (1 / 5) ∈ ℂ
162161mullidi 11141 . . . . . . . . . . . . . 14 (1 · (1 / 5)) = (1 / 5)
163160, 162eqtrdi 2788 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (1 · ((0 BernPoly 𝑋) / 5)) = (1 / 5))
164157, 163eqtrd 2772 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...0)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (1 / 5))
165 1nn0 12444 . . . . . . . . . . . . . . 15 1 ∈ ℕ0
166 bpolycl 16008 . . . . . . . . . . . . . . 15 ((1 ∈ ℕ0𝑋 ∈ ℂ) → (1 BernPoly 𝑋) ∈ ℂ)
167165, 166mpan 691 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (1 BernPoly 𝑋) ∈ ℂ)
168 nn0cn 12438 . . . . . . . . . . . . . . 15 (4 ∈ ℕ0 → 4 ∈ ℂ)
1691, 168mp1i 13 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → 4 ∈ ℂ)
170 4ne0 12280 . . . . . . . . . . . . . . 15 4 ≠ 0
171170a1i 11 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → 4 ≠ 0)
172167, 169, 171divcan2d 11924 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (4 · ((1 BernPoly 𝑋) / 4)) = (1 BernPoly 𝑋))
173 bpoly1 16007 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (1 BernPoly 𝑋) = (𝑋 − (1 / 2)))
174172, 173eqtrd 2772 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (4 · ((1 BernPoly 𝑋) / 4)) = (𝑋 − (1 / 2)))
175164, 174oveq12d 7378 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (Σ𝑘 ∈ (0...0)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) + (4 · ((1 BernPoly 𝑋) / 4))) = ((1 / 5) + (𝑋 − (1 / 2))))
176129, 175eqtrd 2772 . . . . . . . . . 10 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(0 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = ((1 / 5) + (𝑋 − (1 / 2))))
17799, 176eqtr3id 2786 . . . . . . . . 9 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...1)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = ((1 / 5) + (𝑋 − (1 / 2))))
178 6cn 12263 . . . . . . . . . . . 12 6 ∈ ℂ
179178a1i 11 . . . . . . . . . . 11 (𝑋 ∈ ℂ → 6 ∈ ℂ)
180 2nn0 12445 . . . . . . . . . . . 12 2 ∈ ℕ0
181 bpolycl 16008 . . . . . . . . . . . 12 ((2 ∈ ℕ0𝑋 ∈ ℂ) → (2 BernPoly 𝑋) ∈ ℂ)
182180, 181mpan 691 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (2 BernPoly 𝑋) ∈ ℂ)
18358a1i 11 . . . . . . . . . . 11 (𝑋 ∈ ℂ → 3 ∈ ℂ)
184 3ne0 12278 . . . . . . . . . . . 12 3 ≠ 0
185184a1i 11 . . . . . . . . . . 11 (𝑋 ∈ ℂ → 3 ≠ 0)
186179, 182, 183, 185div12d 11958 . . . . . . . . . 10 (𝑋 ∈ ℂ → (6 · ((2 BernPoly 𝑋) / 3)) = ((2 BernPoly 𝑋) · (6 / 3)))
187 3t2e6 12333 . . . . . . . . . . . . 13 (3 · 2) = 6
188178, 58, 87, 184divmuli 11900 . . . . . . . . . . . . 13 ((6 / 3) = 2 ↔ (3 · 2) = 6)
189187, 188mpbir 231 . . . . . . . . . . . 12 (6 / 3) = 2
190189oveq2i 7371 . . . . . . . . . . 11 ((2 BernPoly 𝑋) · (6 / 3)) = ((2 BernPoly 𝑋) · 2)
19187a1i 11 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → 2 ∈ ℂ)
192182, 191mulcomd 11157 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((2 BernPoly 𝑋) · 2) = (2 · (2 BernPoly 𝑋)))
193 bpoly2 16013 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (2 BernPoly 𝑋) = (((𝑋↑2) − 𝑋) + (1 / 6)))
194193oveq2d 7376 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (2 · (2 BernPoly 𝑋)) = (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))
195192, 194eqtrd 2772 . . . . . . . . . . 11 (𝑋 ∈ ℂ → ((2 BernPoly 𝑋) · 2) = (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))
196190, 195eqtrid 2784 . . . . . . . . . 10 (𝑋 ∈ ℂ → ((2 BernPoly 𝑋) · (6 / 3)) = (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))
197186, 196eqtrd 2772 . . . . . . . . 9 (𝑋 ∈ ℂ → (6 · ((2 BernPoly 𝑋) / 3)) = (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))
198177, 197oveq12d 7378 . . . . . . . 8 (𝑋 ∈ ℂ → (Σ𝑘 ∈ (0...1)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) + (6 · ((2 BernPoly 𝑋) / 3))) = (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))
19996, 198eqtrd 2772 . . . . . . 7 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(1 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))
20071, 199eqtrid 2784 . . . . . 6 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...2)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))
201 3nn0 12446 . . . . . . . . 9 3 ∈ ℕ0
202 bpolycl 16008 . . . . . . . . 9 ((3 ∈ ℕ0𝑋 ∈ ℂ) → (3 BernPoly 𝑋) ∈ ℂ)
203201, 202mpan 691 . . . . . . . 8 (𝑋 ∈ ℂ → (3 BernPoly 𝑋) ∈ ℂ)
204 2ne0 12276 . . . . . . . . 9 2 ≠ 0
205204a1i 11 . . . . . . . 8 (𝑋 ∈ ℂ → 2 ≠ 0)
206169, 203, 191, 205div12d 11958 . . . . . . 7 (𝑋 ∈ ℂ → (4 · ((3 BernPoly 𝑋) / 2)) = ((3 BernPoly 𝑋) · (4 / 2)))
207 4div2e2 12337 . . . . . . . . 9 (4 / 2) = 2
208207oveq2i 7371 . . . . . . . 8 ((3 BernPoly 𝑋) · (4 / 2)) = ((3 BernPoly 𝑋) · 2)
209203, 191mulcomd 11157 . . . . . . . . 9 (𝑋 ∈ ℂ → ((3 BernPoly 𝑋) · 2) = (2 · (3 BernPoly 𝑋)))
210 bpoly3 16014 . . . . . . . . . 10 (𝑋 ∈ ℂ → (3 BernPoly 𝑋) = (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋)))
211210oveq2d 7376 . . . . . . . . 9 (𝑋 ∈ ℂ → (2 · (3 BernPoly 𝑋)) = (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))))
212209, 211eqtrd 2772 . . . . . . . 8 (𝑋 ∈ ℂ → ((3 BernPoly 𝑋) · 2) = (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))))
213208, 212eqtrid 2784 . . . . . . 7 (𝑋 ∈ ℂ → ((3 BernPoly 𝑋) · (4 / 2)) = (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))))
214206, 213eqtrd 2772 . . . . . 6 (𝑋 ∈ ℂ → (4 · ((3 BernPoly 𝑋) / 2)) = (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))))
215200, 214oveq12d 7378 . . . . 5 (𝑋 ∈ ℂ → (Σ𝑘 ∈ (0...2)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) + (4 · ((3 BernPoly 𝑋) / 2))) = ((((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) + (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋)))))
21669, 215eqtrd 2772 . . . 4 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(2 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = ((((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) + (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋)))))
2178, 216eqtrid 2784 . . 3 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(4 − 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = ((((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) + (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋)))))
218217oveq2d 7376 . 2 (𝑋 ∈ ℂ → ((𝑋↑4) − Σ𝑘 ∈ (0...(4 − 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)))) = ((𝑋↑4) − ((((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) + (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))))))
219 expcl 14032 . . . . 5 ((𝑋 ∈ ℂ ∧ 4 ∈ ℕ0) → (𝑋↑4) ∈ ℂ)
2201, 219mpan2 692 . . . 4 (𝑋 ∈ ℂ → (𝑋↑4) ∈ ℂ)
221 expcl 14032 . . . . . 6 ((𝑋 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝑋↑3) ∈ ℂ)
222201, 221mpan2 692 . . . . 5 (𝑋 ∈ ℂ → (𝑋↑3) ∈ ℂ)
223191, 222mulcld 11156 . . . 4 (𝑋 ∈ ℂ → (2 · (𝑋↑3)) ∈ ℂ)
224 sqcl 14071 . . . . 5 (𝑋 ∈ ℂ → (𝑋↑2) ∈ ℂ)
225201, 100deccl 12650 . . . . . . . 8 30 ∈ ℕ0
226225nn0cni 12440 . . . . . . 7 30 ∈ ℂ
227 dfdec10 12638 . . . . . . . . 9 30 = ((10 · 3) + 0)
228 10re 12654 . . . . . . . . . . . 12 10 ∈ ℝ
229228recni 11150 . . . . . . . . . . 11 10 ∈ ℂ
230229, 58mulcli 11143 . . . . . . . . . 10 (10 · 3) ∈ ℂ
231230addridi 11324 . . . . . . . . 9 ((10 · 3) + 0) = (10 · 3)
232227, 231eqtri 2760 . . . . . . . 8 30 = (10 · 3)
233 10pos 12652 . . . . . . . . . 10 0 < 10
234136, 233gtneii 11249 . . . . . . . . 9 10 ≠ 0
235229, 58, 234, 184mulne0i 11784 . . . . . . . 8 (10 · 3) ≠ 0
236232, 235eqnetri 3003 . . . . . . 7 30 ≠ 0
237226, 236reccli 11876 . . . . . 6 (1 / 30) ∈ ℂ
238237a1i 11 . . . . 5 (𝑋 ∈ ℂ → (1 / 30) ∈ ℂ)
239224, 238subcld 11496 . . . 4 (𝑋 ∈ ℂ → ((𝑋↑2) − (1 / 30)) ∈ ℂ)
240220, 223, 239subsubd 11524 . . 3 (𝑋 ∈ ℂ → ((𝑋↑4) − ((2 · (𝑋↑3)) − ((𝑋↑2) − (1 / 30)))) = (((𝑋↑4) − (2 · (𝑋↑3))) + ((𝑋↑2) − (1 / 30))))
241161a1i 11 . . . . . . . 8 (𝑋 ∈ ℂ → (1 / 5) ∈ ℂ)
242 id 22 . . . . . . . . 9 (𝑋 ∈ ℂ → 𝑋 ∈ ℂ)
24387, 204reccli 11876 . . . . . . . . . 10 (1 / 2) ∈ ℂ
244243a1i 11 . . . . . . . . 9 (𝑋 ∈ ℂ → (1 / 2) ∈ ℂ)
245242, 244subcld 11496 . . . . . . . 8 (𝑋 ∈ ℂ → (𝑋 − (1 / 2)) ∈ ℂ)
246241, 245addcld 11155 . . . . . . 7 (𝑋 ∈ ℂ → ((1 / 5) + (𝑋 − (1 / 2))) ∈ ℂ)
247224, 242subcld 11496 . . . . . . . . 9 (𝑋 ∈ ℂ → ((𝑋↑2) − 𝑋) ∈ ℂ)
248 6pos 12282 . . . . . . . . . . . 12 0 < 6
249136, 248gtneii 11249 . . . . . . . . . . 11 6 ≠ 0
250178, 249reccli 11876 . . . . . . . . . 10 (1 / 6) ∈ ℂ
251250a1i 11 . . . . . . . . 9 (𝑋 ∈ ℂ → (1 / 6) ∈ ℂ)
252247, 251addcld 11155 . . . . . . . 8 (𝑋 ∈ ℂ → (((𝑋↑2) − 𝑋) + (1 / 6)) ∈ ℂ)
253191, 252mulcld 11156 . . . . . . 7 (𝑋 ∈ ℂ → (2 · (((𝑋↑2) − 𝑋) + (1 / 6))) ∈ ℂ)
254246, 253addcld 11155 . . . . . 6 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) ∈ ℂ)
25558, 87, 204divcli 11888 . . . . . . . . . . 11 (3 / 2) ∈ ℂ
256255a1i 11 . . . . . . . . . 10 (𝑋 ∈ ℂ → (3 / 2) ∈ ℂ)
257256, 224mulcld 11156 . . . . . . . . 9 (𝑋 ∈ ℂ → ((3 / 2) · (𝑋↑2)) ∈ ℂ)
258222, 257subcld 11496 . . . . . . . 8 (𝑋 ∈ ℂ → ((𝑋↑3) − ((3 / 2) · (𝑋↑2))) ∈ ℂ)
259244, 242mulcld 11156 . . . . . . . 8 (𝑋 ∈ ℂ → ((1 / 2) · 𝑋) ∈ ℂ)
260258, 259addcld 11155 . . . . . . 7 (𝑋 ∈ ℂ → (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋)) ∈ ℂ)
261191, 260mulcld 11156 . . . . . 6 (𝑋 ∈ ℂ → (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))) ∈ ℂ)
262254, 261addcomd 11339 . . . . 5 (𝑋 ∈ ℂ → ((((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) + (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋)))) = ((2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))) + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))))
263191, 258, 259adddid 11160 . . . . . . 7 (𝑋 ∈ ℂ → (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))) = ((2 · ((𝑋↑3) − ((3 / 2) · (𝑋↑2)))) + (2 · ((1 / 2) · 𝑋))))
264191, 222, 257subdid 11597 . . . . . . . 8 (𝑋 ∈ ℂ → (2 · ((𝑋↑3) − ((3 / 2) · (𝑋↑2)))) = ((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))))
26587, 204recidi 11877 . . . . . . . . . 10 (2 · (1 / 2)) = 1
266265oveq1i 7370 . . . . . . . . 9 ((2 · (1 / 2)) · 𝑋) = (1 · 𝑋)
267191, 244, 242mulassd 11159 . . . . . . . . 9 (𝑋 ∈ ℂ → ((2 · (1 / 2)) · 𝑋) = (2 · ((1 / 2) · 𝑋)))
268 mullid 11134 . . . . . . . . 9 (𝑋 ∈ ℂ → (1 · 𝑋) = 𝑋)
269266, 267, 2683eqtr3a 2796 . . . . . . . 8 (𝑋 ∈ ℂ → (2 · ((1 / 2) · 𝑋)) = 𝑋)
270264, 269oveq12d 7378 . . . . . . 7 (𝑋 ∈ ℂ → ((2 · ((𝑋↑3) − ((3 / 2) · (𝑋↑2)))) + (2 · ((1 / 2) · 𝑋))) = (((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) + 𝑋))
271263, 270eqtrd 2772 . . . . . 6 (𝑋 ∈ ℂ → (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))) = (((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) + 𝑋))
272271oveq1d 7375 . . . . 5 (𝑋 ∈ ℂ → ((2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))) + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) = ((((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) + 𝑋) + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))))
273191, 257mulcld 11156 . . . . . . . 8 (𝑋 ∈ ℂ → (2 · ((3 / 2) · (𝑋↑2))) ∈ ℂ)
274223, 273subcld 11496 . . . . . . 7 (𝑋 ∈ ℂ → ((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) ∈ ℂ)
275274, 242, 254addassd 11158 . . . . . 6 (𝑋 ∈ ℂ → ((((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) + 𝑋) + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) = (((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) + (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))))
276242, 254addcld 11155 . . . . . . 7 (𝑋 ∈ ℂ → (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) ∈ ℂ)
277223, 273, 276subsubd 11524 . . . . . 6 (𝑋 ∈ ℂ → ((2 · (𝑋↑3)) − ((2 · ((3 / 2) · (𝑋↑2))) − (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))))) = (((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) + (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))))
278191, 256, 224mulassd 11159 . . . . . . . . . 10 (𝑋 ∈ ℂ → ((2 · (3 / 2)) · (𝑋↑2)) = (2 · ((3 / 2) · (𝑋↑2))))
27958, 87, 204divcan2i 11889 . . . . . . . . . . 11 (2 · (3 / 2)) = 3
280279oveq1i 7370 . . . . . . . . . 10 ((2 · (3 / 2)) · (𝑋↑2)) = (3 · (𝑋↑2))
281278, 280eqtr3di 2787 . . . . . . . . 9 (𝑋 ∈ ℂ → (2 · ((3 / 2) · (𝑋↑2))) = (3 · (𝑋↑2)))
282281oveq1d 7375 . . . . . . . 8 (𝑋 ∈ ℂ → ((2 · ((3 / 2) · (𝑋↑2))) − (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))) = ((3 · (𝑋↑2)) − (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))))
283242, 246, 253add12d 11364 . . . . . . . . . 10 (𝑋 ∈ ℂ → (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) = (((1 / 5) + (𝑋 − (1 / 2))) + (𝑋 + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))))
284191, 247, 251adddid 11160 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (2 · (((𝑋↑2) − 𝑋) + (1 / 6))) = ((2 · ((𝑋↑2) − 𝑋)) + (2 · (1 / 6))))
285191, 224, 242subdid 11597 . . . . . . . . . . . . . . 15 (𝑋 ∈ ℂ → (2 · ((𝑋↑2) − 𝑋)) = ((2 · (𝑋↑2)) − (2 · 𝑋)))
286187oveq2i 7371 . . . . . . . . . . . . . . . . 17 (2 / (3 · 2)) = (2 / 6)
28758, 184reccli 11876 . . . . . . . . . . . . . . . . . . . 20 (1 / 3) ∈ ℂ
28858, 87, 287mul32i 11333 . . . . . . . . . . . . . . . . . . 19 ((3 · 2) · (1 / 3)) = ((3 · (1 / 3)) · 2)
28958, 184recidi 11877 . . . . . . . . . . . . . . . . . . . . 21 (3 · (1 / 3)) = 1
290289oveq1i 7370 . . . . . . . . . . . . . . . . . . . 20 ((3 · (1 / 3)) · 2) = (1 · 2)
29187mullidi 11141 . . . . . . . . . . . . . . . . . . . 20 (1 · 2) = 2
292290, 291eqtri 2760 . . . . . . . . . . . . . . . . . . 19 ((3 · (1 / 3)) · 2) = 2
293288, 292eqtri 2760 . . . . . . . . . . . . . . . . . 18 ((3 · 2) · (1 / 3)) = 2
294187, 178eqeltri 2833 . . . . . . . . . . . . . . . . . . 19 (3 · 2) ∈ ℂ
295187, 249eqnetri 3003 . . . . . . . . . . . . . . . . . . 19 (3 · 2) ≠ 0
29687, 294, 287, 295divmuli 11900 . . . . . . . . . . . . . . . . . 18 ((2 / (3 · 2)) = (1 / 3) ↔ ((3 · 2) · (1 / 3)) = 2)
297293, 296mpbir 231 . . . . . . . . . . . . . . . . 17 (2 / (3 · 2)) = (1 / 3)
29887, 178, 249divreci 11891 . . . . . . . . . . . . . . . . 17 (2 / 6) = (2 · (1 / 6))
299286, 297, 2983eqtr3ri 2769 . . . . . . . . . . . . . . . 16 (2 · (1 / 6)) = (1 / 3)
300299a1i 11 . . . . . . . . . . . . . . 15 (𝑋 ∈ ℂ → (2 · (1 / 6)) = (1 / 3))
301285, 300oveq12d 7378 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → ((2 · ((𝑋↑2) − 𝑋)) + (2 · (1 / 6))) = (((2 · (𝑋↑2)) − (2 · 𝑋)) + (1 / 3)))
302284, 301eqtrd 2772 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (2 · (((𝑋↑2) − 𝑋) + (1 / 6))) = (((2 · (𝑋↑2)) − (2 · 𝑋)) + (1 / 3)))
303302oveq2d 7376 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (𝑋 + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) = (𝑋 + (((2 · (𝑋↑2)) − (2 · 𝑋)) + (1 / 3))))
304191, 224mulcld 11156 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (2 · (𝑋↑2)) ∈ ℂ)
305191, 242mulcld 11156 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (2 · 𝑋) ∈ ℂ)
306304, 305subcld 11496 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → ((2 · (𝑋↑2)) − (2 · 𝑋)) ∈ ℂ)
307287a1i 11 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (1 / 3) ∈ ℂ)
308242, 306, 307addassd 11158 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((𝑋 + ((2 · (𝑋↑2)) − (2 · 𝑋))) + (1 / 3)) = (𝑋 + (((2 · (𝑋↑2)) − (2 · 𝑋)) + (1 / 3))))
309242, 304, 305addsub12d 11519 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (𝑋 + ((2 · (𝑋↑2)) − (2 · 𝑋))) = ((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))))
310309oveq1d 7375 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((𝑋 + ((2 · (𝑋↑2)) − (2 · 𝑋))) + (1 / 3)) = (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3)))
311303, 308, 3103eqtr2d 2778 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (𝑋 + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) = (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3)))
312311oveq2d 7376 . . . . . . . . . 10 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (1 / 2))) + (𝑋 + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) = (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3))))
313283, 312eqtrd 2772 . . . . . . . . 9 (𝑋 ∈ ℂ → (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) = (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3))))
314313oveq2d 7376 . . . . . . . 8 (𝑋 ∈ ℂ → ((3 · (𝑋↑2)) − (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))) = ((3 · (𝑋↑2)) − (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3)))))
315242, 305subcld 11496 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (𝑋 − (2 · 𝑋)) ∈ ℂ)
316304, 315addcld 11155 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) ∈ ℂ)
317241, 245, 316, 307add4d 11366 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3))) = (((1 / 5) + ((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋)))) + ((𝑋 − (1 / 2)) + (1 / 3))))
318241, 304, 315add12d 11364 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((1 / 5) + ((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋)))) = ((2 · (𝑋↑2)) + ((1 / 5) + (𝑋 − (2 · 𝑋)))))
319318oveq1d 7375 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (((1 / 5) + ((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋)))) + ((𝑋 − (1 / 2)) + (1 / 3))) = (((2 · (𝑋↑2)) + ((1 / 5) + (𝑋 − (2 · 𝑋)))) + ((𝑋 − (1 / 2)) + (1 / 3))))
320241, 315addcld 11155 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((1 / 5) + (𝑋 − (2 · 𝑋))) ∈ ℂ)
321245, 307addcld 11155 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((𝑋 − (1 / 2)) + (1 / 3)) ∈ ℂ)
322304, 320, 321addassd 11158 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (((2 · (𝑋↑2)) + ((1 / 5) + (𝑋 − (2 · 𝑋)))) + ((𝑋 − (1 / 2)) + (1 / 3))) = ((2 · (𝑋↑2)) + (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3)))))
323317, 319, 3223eqtrd 2776 . . . . . . . . . 10 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3))) = ((2 · (𝑋↑2)) + (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3)))))
324323oveq2d 7376 . . . . . . . . 9 (𝑋 ∈ ℂ → ((3 · (𝑋↑2)) − (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3)))) = ((3 · (𝑋↑2)) − ((2 · (𝑋↑2)) + (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3))))))
325183, 224mulcld 11156 . . . . . . . . . 10 (𝑋 ∈ ℂ → (3 · (𝑋↑2)) ∈ ℂ)
326320, 321addcld 11155 . . . . . . . . . 10 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3))) ∈ ℂ)
327325, 304, 326subsub4d 11527 . . . . . . . . 9 (𝑋 ∈ ℂ → (((3 · (𝑋↑2)) − (2 · (𝑋↑2))) − (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3)))) = ((3 · (𝑋↑2)) − ((2 · (𝑋↑2)) + (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3))))))
32858, 87, 59, 109subaddrii 11474 . . . . . . . . . . . 12 (3 − 2) = 1
329328oveq1i 7370 . . . . . . . . . . 11 ((3 − 2) · (𝑋↑2)) = (1 · (𝑋↑2))
330183, 191, 224subdird 11598 . . . . . . . . . . 11 (𝑋 ∈ ℂ → ((3 − 2) · (𝑋↑2)) = ((3 · (𝑋↑2)) − (2 · (𝑋↑2))))
331224mullidd 11154 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (1 · (𝑋↑2)) = (𝑋↑2))
332329, 330, 3313eqtr3a 2796 . . . . . . . . . 10 (𝑋 ∈ ℂ → ((3 · (𝑋↑2)) − (2 · (𝑋↑2))) = (𝑋↑2))
333241, 305, 242subsubd 11524 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → ((1 / 5) − ((2 · 𝑋) − 𝑋)) = (((1 / 5) − (2 · 𝑋)) + 𝑋))
334 2txmxeqx 12307 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → ((2 · 𝑋) − 𝑋) = 𝑋)
335334oveq2d 7376 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → ((1 / 5) − ((2 · 𝑋) − 𝑋)) = ((1 / 5) − 𝑋))
336241, 305, 242subadd23d 11518 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (((1 / 5) − (2 · 𝑋)) + 𝑋) = ((1 / 5) + (𝑋 − (2 · 𝑋))))
337333, 335, 3363eqtr3d 2780 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((1 / 5) − 𝑋) = ((1 / 5) + (𝑋 − (2 · 𝑋))))
338242, 244, 307subsubd 11524 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (𝑋 − ((1 / 2) − (1 / 3))) = ((𝑋 − (1 / 2)) + (1 / 3)))
339337, 338oveq12d 7378 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (((1 / 5) − 𝑋) + (𝑋 − ((1 / 2) − (1 / 3)))) = (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3))))
340243, 287subcli 11461 . . . . . . . . . . . . . 14 ((1 / 2) − (1 / 3)) ∈ ℂ
341340a1i 11 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → ((1 / 2) − (1 / 3)) ∈ ℂ)
342241, 242, 341npncand 11520 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (((1 / 5) − 𝑋) + (𝑋 − ((1 / 2) − (1 / 3)))) = ((1 / 5) − ((1 / 2) − (1 / 3))))
343 halfthird 12389 . . . . . . . . . . . . . 14 ((1 / 2) − (1 / 3)) = (1 / 6)
344343oveq2i 7371 . . . . . . . . . . . . 13 ((1 / 5) − ((1 / 2) − (1 / 3))) = ((1 / 5) − (1 / 6))
345 5recm6rec 12778 . . . . . . . . . . . . 13 ((1 / 5) − (1 / 6)) = (1 / 30)
346344, 345eqtri 2760 . . . . . . . . . . . 12 ((1 / 5) − ((1 / 2) − (1 / 3))) = (1 / 30)
347342, 346eqtrdi 2788 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (((1 / 5) − 𝑋) + (𝑋 − ((1 / 2) − (1 / 3)))) = (1 / 30))
348339, 347eqtr3d 2774 . . . . . . . . . 10 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3))) = (1 / 30))
349332, 348oveq12d 7378 . . . . . . . . 9 (𝑋 ∈ ℂ → (((3 · (𝑋↑2)) − (2 · (𝑋↑2))) − (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3)))) = ((𝑋↑2) − (1 / 30)))
350324, 327, 3493eqtr2d 2778 . . . . . . . 8 (𝑋 ∈ ℂ → ((3 · (𝑋↑2)) − (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3)))) = ((𝑋↑2) − (1 / 30)))
351282, 314, 3503eqtrd 2776 . . . . . . 7 (𝑋 ∈ ℂ → ((2 · ((3 / 2) · (𝑋↑2))) − (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))) = ((𝑋↑2) − (1 / 30)))
352351oveq2d 7376 . . . . . 6 (𝑋 ∈ ℂ → ((2 · (𝑋↑3)) − ((2 · ((3 / 2) · (𝑋↑2))) − (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))))) = ((2 · (𝑋↑3)) − ((𝑋↑2) − (1 / 30))))
353275, 277, 3523eqtr2d 2778 . . . . 5 (𝑋 ∈ ℂ → ((((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) + 𝑋) + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) = ((2 · (𝑋↑3)) − ((𝑋↑2) − (1 / 30))))
354262, 272, 3533eqtrd 2776 . . . 4 (𝑋 ∈ ℂ → ((((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) + (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋)))) = ((2 · (𝑋↑3)) − ((𝑋↑2) − (1 / 30))))
355354oveq2d 7376 . . 3 (𝑋 ∈ ℂ → ((𝑋↑4) − ((((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) + (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))))) = ((𝑋↑4) − ((2 · (𝑋↑3)) − ((𝑋↑2) − (1 / 30)))))
356220, 223subcld 11496 . . . 4 (𝑋 ∈ ℂ → ((𝑋↑4) − (2 · (𝑋↑3))) ∈ ℂ)
357356, 224, 238addsubassd 11516 . . 3 (𝑋 ∈ ℂ → ((((𝑋↑4) − (2 · (𝑋↑3))) + (𝑋↑2)) − (1 / 30)) = (((𝑋↑4) − (2 · (𝑋↑3))) + ((𝑋↑2) − (1 / 30))))
358240, 355, 3573eqtr4d 2782 . 2 (𝑋 ∈ ℂ → ((𝑋↑4) − ((((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) + (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))))) = ((((𝑋↑4) − (2 · (𝑋↑3))) + (𝑋↑2)) − (1 / 30)))
3593, 218, 3583eqtrd 2776 1 (𝑋 ∈ ℂ → (4 BernPoly 𝑋) = ((((𝑋↑4) − (2 · (𝑋↑3))) + (𝑋↑2)) − (1 / 30)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1542  wcel 2114  wne 2933  wss 3890   class class class wbr 5086  cfv 6492  (class class class)co 7360  cc 11027  cr 11028  0cc0 11029  1c1 11030   + caddc 11032   · cmul 11034   < clt 11170  cmin 11368   / cdiv 11798  cn 12165  2c2 12227  3c3 12228  4c4 12229  5c5 12230  6c6 12231  0cn0 12428  cz 12515  cdc 12635  cuz 12779  ...cfz 13452  cexp 14014  Ccbc 14255  Σcsu 15639   BernPoly cbp 16002
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pow 5302  ax-pr 5370  ax-un 7682  ax-inf2 9553  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106  ax-pre-sup 11107
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-tp 4573  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-se 5578  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-om 7811  df-1st 7935  df-2nd 7936  df-frecs 8224  df-wrecs 8255  df-recs 8304  df-rdg 8342  df-1o 8398  df-er 8636  df-en 8887  df-dom 8888  df-sdom 8889  df-fin 8890  df-sup 9348  df-oi 9418  df-card 9854  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-div 11799  df-nn 12166  df-2 12235  df-3 12236  df-4 12237  df-5 12238  df-6 12239  df-7 12240  df-8 12241  df-9 12242  df-n0 12429  df-z 12516  df-dec 12636  df-uz 12780  df-rp 12934  df-fz 13453  df-fzo 13600  df-seq 13955  df-exp 14015  df-fac 14227  df-bc 14256  df-hash 14284  df-cj 15052  df-re 15053  df-im 15054  df-sqrt 15188  df-abs 15189  df-clim 15441  df-sum 15640  df-bpoly 16003
This theorem is referenced by:  fsumcube  16016
  Copyright terms: Public domain W3C validator