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

Theorem bpoly4 16114
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 12524 . . 3 4 ∈ ℕ0
2 bpolyval 16104 . . 3 ((4 ∈ ℕ0𝑋 ∈ ℂ) → (4 BernPoly 𝑋) = ((𝑋↑4) − Σ𝑘 ∈ (0...(4 − 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)))))
31, 2mpan 702 . 2 (𝑋 ∈ ℂ → (4 BernPoly 𝑋) = ((𝑋↑4) − Σ𝑘 ∈ (0...(4 − 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)))))
4 4m1e3 12370 . . . . . . 7 (4 − 1) = 3
5 df-3 12305 . . . . . . 7 3 = (2 + 1)
64, 5eqtri 2786 . . . . . 6 (4 − 1) = (2 + 1)
76oveq2i 7423 . . . . 5 (0...(4 − 1)) = (0...(2 + 1))
87sumeq1i 15750 . . . 4 Σ𝑘 ∈ (0...(4 − 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = Σ𝑘 ∈ (0...(2 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)))
9 2eluzge0 12906 . . . . . . 7 2 ∈ (ℤ‘0)
109a1i 11 . . . . . 6 (𝑋 ∈ ℂ → 2 ∈ (ℤ‘0))
11 elfzelz 13553 . . . . . . . . . 10 (𝑘 ∈ (0...(2 + 1)) → 𝑘 ∈ ℤ)
12 bccl 14360 . . . . . . . . . 10 ((4 ∈ ℕ0𝑘 ∈ ℤ) → (4C𝑘) ∈ ℕ0)
131, 11, 12sylancr 598 . . . . . . . . 9 (𝑘 ∈ (0...(2 + 1)) → (4C𝑘) ∈ ℕ0)
1413nn0cnd 12568 . . . . . . . 8 (𝑘 ∈ (0...(2 + 1)) → (4C𝑘) ∈ ℂ)
1514adantl 486 . . . . . . 7 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → (4C𝑘) ∈ ℂ)
16 elfznn0 13650 . . . . . . . . . 10 (𝑘 ∈ (0...(2 + 1)) → 𝑘 ∈ ℕ0)
17 bpolycl 16107 . . . . . . . . . 10 ((𝑘 ∈ ℕ0𝑋 ∈ ℂ) → (𝑘 BernPoly 𝑋) ∈ ℂ)
1816, 17sylan 591 . . . . . . . . 9 ((𝑘 ∈ (0...(2 + 1)) ∧ 𝑋 ∈ ℂ) → (𝑘 BernPoly 𝑋) ∈ ℂ)
1918ancoms 463 . . . . . . . 8 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → (𝑘 BernPoly 𝑋) ∈ ℂ)
20 4re 12326 . . . . . . . . . . . . 13 4 ∈ ℝ
2120a1i 11 . . . . . . . . . . . 12 (𝑘 ∈ (0...(2 + 1)) → 4 ∈ ℝ)
2211zred 12701 . . . . . . . . . . . 12 (𝑘 ∈ (0...(2 + 1)) → 𝑘 ∈ ℝ)
2321, 22resubcld 11643 . . . . . . . . . . 11 (𝑘 ∈ (0...(2 + 1)) → (4 − 𝑘) ∈ ℝ)
24 peano2re 11384 . . . . . . . . . . 11 ((4 − 𝑘) ∈ ℝ → ((4 − 𝑘) + 1) ∈ ℝ)
2523, 24syl 18 . . . . . . . . . 10 (𝑘 ∈ (0...(2 + 1)) → ((4 − 𝑘) + 1) ∈ ℝ)
2625recnd 11238 . . . . . . . . 9 (𝑘 ∈ (0...(2 + 1)) → ((4 − 𝑘) + 1) ∈ ℂ)
2726adantl 486 . . . . . . . 8 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → ((4 − 𝑘) + 1) ∈ ℂ)
28 1red 11210 . . . . . . . . . . 11 (𝑘 ∈ (0...(2 + 1)) → 1 ∈ ℝ)
295oveq2i 7423 . . . . . . . . . . . . . 14 (0...3) = (0...(2 + 1))
3029eleq2i 2855 . . . . . . . . . . . . 13 (𝑘 ∈ (0...3) ↔ 𝑘 ∈ (0...(2 + 1)))
31 elfzelz 13553 . . . . . . . . . . . . . . 15 (𝑘 ∈ (0...3) → 𝑘 ∈ ℤ)
3231zred 12701 . . . . . . . . . . . . . 14 (𝑘 ∈ (0...3) → 𝑘 ∈ ℝ)
33 3re 12322 . . . . . . . . . . . . . . 15 3 ∈ ℝ
3433a1i 11 . . . . . . . . . . . . . 14 (𝑘 ∈ (0...3) → 3 ∈ ℝ)
3520a1i 11 . . . . . . . . . . . . . 14 (𝑘 ∈ (0...3) → 4 ∈ ℝ)
36 elfzle2 13557 . . . . . . . . . . . . . 14 (𝑘 ∈ (0...3) → 𝑘 ≤ 3)
37 3lt4 12418 . . . . . . . . . . . . . . 15 3 < 4
3837a1i 11 . . . . . . . . . . . . . 14 (𝑘 ∈ (0...3) → 3 < 4)
3932, 34, 35, 36, 38lelttrd 11369 . . . . . . . . . . . . 13 (𝑘 ∈ (0...3) → 𝑘 < 4)
4030, 39sylbir 238 . . . . . . . . . . . 12 (𝑘 ∈ (0...(2 + 1)) → 𝑘 < 4)
4122, 21posdifd 11802 . . . . . . . . . . . 12 (𝑘 ∈ (0...(2 + 1)) → (𝑘 < 4 ↔ 0 < (4 − 𝑘)))
4240, 41mpbid 235 . . . . . . . . . . 11 (𝑘 ∈ (0...(2 + 1)) → 0 < (4 − 𝑘))
43 0lt1 11737 . . . . . . . . . . . 12 0 < 1
4443a1i 11 . . . . . . . . . . 11 (𝑘 ∈ (0...(2 + 1)) → 0 < 1)
4523, 28, 42, 44addgt0d 11790 . . . . . . . . . 10 (𝑘 ∈ (0...(2 + 1)) → 0 < ((4 − 𝑘) + 1))
4645gt0ne0d 11779 . . . . . . . . 9 (𝑘 ∈ (0...(2 + 1)) → ((4 − 𝑘) + 1) ≠ 0)
4746adantl 486 . . . . . . . 8 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → ((4 − 𝑘) + 1) ≠ 0)
4819, 27, 47divcld 11992 . . . . . . 7 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)) ∈ ℂ)
4915, 48mulcld 11230 . . . . . 6 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(2 + 1))) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) ∈ ℂ)
505eqeq2i 2776 . . . . . . 7 (𝑘 = 3 ↔ 𝑘 = (2 + 1))
51 oveq2 7420 . . . . . . . . 9 (𝑘 = 3 → (4C𝑘) = (4C3))
52 4bc3eq4 14366 . . . . . . . . 9 (4C3) = 4
5351, 52eqtrdi 2814 . . . . . . . 8 (𝑘 = 3 → (4C𝑘) = 4)
54 oveq1 7419 . . . . . . . . 9 (𝑘 = 3 → (𝑘 BernPoly 𝑋) = (3 BernPoly 𝑋))
55 oveq2 7420 . . . . . . . . . . 11 (𝑘 = 3 → (4 − 𝑘) = (4 − 3))
5655oveq1d 7427 . . . . . . . . . 10 (𝑘 = 3 → ((4 − 𝑘) + 1) = ((4 − 3) + 1))
57 4cn 12327 . . . . . . . . . . . . 13 4 ∈ ℂ
58 3cn 12323 . . . . . . . . . . . . 13 3 ∈ ℂ
59 ax-1cn 11159 . . . . . . . . . . . . 13 1 ∈ ℂ
60 3p1e4 12386 . . . . . . . . . . . . 13 (3 + 1) = 4
6157, 58, 59, 60subaddrii 11548 . . . . . . . . . . . 12 (4 − 3) = 1
6261oveq1i 7422 . . . . . . . . . . 11 ((4 − 3) + 1) = (1 + 1)
63 df-2 12304 . . . . . . . . . . 11 2 = (1 + 1)
6462, 63eqtr4i 2789 . . . . . . . . . 10 ((4 − 3) + 1) = 2
6556, 64eqtrdi 2814 . . . . . . . . 9 (𝑘 = 3 → ((4 − 𝑘) + 1) = 2)
6654, 65oveq12d 7430 . . . . . . . 8 (𝑘 = 3 → ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)) = ((3 BernPoly 𝑋) / 2))
6753, 66oveq12d 7430 . . . . . . 7 (𝑘 = 3 → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (4 · ((3 BernPoly 𝑋) / 2)))
6850, 67sylbir 238 . . . . . 6 (𝑘 = (2 + 1) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (4 · ((3 BernPoly 𝑋) / 2)))
6910, 49, 68fsump1 15809 . . . . 5 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(2 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (Σ𝑘 ∈ (0...2)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) + (4 · ((3 BernPoly 𝑋) / 2))))
7063oveq2i 7423 . . . . . . . 8 (0...2) = (0...(1 + 1))
7170sumeq1i 15750 . . . . . . 7 Σ𝑘 ∈ (0...2)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = Σ𝑘 ∈ (0...(1 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)))
72 1eluzge0 12905 . . . . . . . . . 10 1 ∈ (ℤ‘0)
7372a1i 11 . . . . . . . . 9 (𝑋 ∈ ℂ → 1 ∈ (ℤ‘0))
74 fzssp1 13597 . . . . . . . . . . . 12 (0...(1 + 1)) ⊆ (0...((1 + 1) + 1))
7563oveq1i 7422 . . . . . . . . . . . . 13 (2 + 1) = ((1 + 1) + 1)
7675oveq2i 7423 . . . . . . . . . . . 12 (0...(2 + 1)) = (0...((1 + 1) + 1))
7774, 76sseqtrri 3987 . . . . . . . . . . 11 (0...(1 + 1)) ⊆ (0...(2 + 1))
7877sseli 3934 . . . . . . . . . 10 (𝑘 ∈ (0...(1 + 1)) → 𝑘 ∈ (0...(2 + 1)))
7978, 49sylan2 604 . . . . . . . . 9 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(1 + 1))) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) ∈ ℂ)
8063eqeq2i 2776 . . . . . . . . . 10 (𝑘 = 2 ↔ 𝑘 = (1 + 1))
81 oveq2 7420 . . . . . . . . . . . 12 (𝑘 = 2 → (4C𝑘) = (4C2))
82 4bc2eq6 14367 . . . . . . . . . . . 12 (4C2) = 6
8381, 82eqtrdi 2814 . . . . . . . . . . 11 (𝑘 = 2 → (4C𝑘) = 6)
84 oveq1 7419 . . . . . . . . . . . 12 (𝑘 = 2 → (𝑘 BernPoly 𝑋) = (2 BernPoly 𝑋))
85 oveq2 7420 . . . . . . . . . . . . . 14 (𝑘 = 2 → (4 − 𝑘) = (4 − 2))
8685oveq1d 7427 . . . . . . . . . . . . 13 (𝑘 = 2 → ((4 − 𝑘) + 1) = ((4 − 2) + 1))
87 2cn 12317 . . . . . . . . . . . . . . . 16 2 ∈ ℂ
88 2p2e4 12376 . . . . . . . . . . . . . . . 16 (2 + 2) = 4
8957, 87, 87, 88subaddrii 11548 . . . . . . . . . . . . . . 15 (4 − 2) = 2
9089oveq1i 7422 . . . . . . . . . . . . . 14 ((4 − 2) + 1) = (2 + 1)
9190, 5eqtr4i 2789 . . . . . . . . . . . . 13 ((4 − 2) + 1) = 3
9286, 91eqtrdi 2814 . . . . . . . . . . . 12 (𝑘 = 2 → ((4 − 𝑘) + 1) = 3)
9384, 92oveq12d 7430 . . . . . . . . . . 11 (𝑘 = 2 → ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)) = ((2 BernPoly 𝑋) / 3))
9483, 93oveq12d 7430 . . . . . . . . . 10 (𝑘 = 2 → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (6 · ((2 BernPoly 𝑋) / 3)))
9580, 94sylbir 238 . . . . . . . . 9 (𝑘 = (1 + 1) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (6 · ((2 BernPoly 𝑋) / 3)))
9673, 79, 95fsump1 15809 . . . . . . . 8 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(1 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (Σ𝑘 ∈ (0...1)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) + (6 · ((2 BernPoly 𝑋) / 3))))
97 0p1e1 12362 . . . . . . . . . . . 12 (0 + 1) = 1
9897oveq2i 7423 . . . . . . . . . . 11 (0...(0 + 1)) = (0...1)
9998sumeq1i 15750 . . . . . . . . . 10 Σ𝑘 ∈ (0...(0 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = Σ𝑘 ∈ (0...1)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)))
100 0nn0 12520 . . . . . . . . . . . . . 14 0 ∈ ℕ0
101 nn0uz 12901 . . . . . . . . . . . . . 14 0 = (ℤ‘0)
102100, 101eleqtri 2861 . . . . . . . . . . . . 13 0 ∈ (ℤ‘0)
103102a1i 11 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → 0 ∈ (ℤ‘0))
104 3nn 12321 . . . . . . . . . . . . . . . . 17 3 ∈ ℕ
105 nnuz 12902 . . . . . . . . . . . . . . . . 17 ℕ = (ℤ‘1)
106104, 105eleqtri 2861 . . . . . . . . . . . . . . . 16 3 ∈ (ℤ‘1)
107 fzss2 13594 . . . . . . . . . . . . . . . 16 (3 ∈ (ℤ‘1) → (0...1) ⊆ (0...3))
108106, 107ax-mp 5 . . . . . . . . . . . . . . 15 (0...1) ⊆ (0...3)
109 2p1e3 12383 . . . . . . . . . . . . . . . 16 (2 + 1) = 3
110109oveq2i 7423 . . . . . . . . . . . . . . 15 (0...(2 + 1)) = (0...3)
111108, 98, 1103sstr4i 3989 . . . . . . . . . . . . . 14 (0...(0 + 1)) ⊆ (0...(2 + 1))
112111sseli 3934 . . . . . . . . . . . . 13 (𝑘 ∈ (0...(0 + 1)) → 𝑘 ∈ (0...(2 + 1)))
113112, 49sylan2 604 . . . . . . . . . . . 12 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(0 + 1))) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) ∈ ℂ)
11497eqeq2i 2776 . . . . . . . . . . . . 13 (𝑘 = (0 + 1) ↔ 𝑘 = 1)
115 oveq2 7420 . . . . . . . . . . . . . . 15 (𝑘 = 1 → (4C𝑘) = (4C1))
116 bcn1 14351 . . . . . . . . . . . . . . . 16 (4 ∈ ℕ0 → (4C1) = 4)
1171, 116ax-mp 5 . . . . . . . . . . . . . . 15 (4C1) = 4
118115, 117eqtrdi 2814 . . . . . . . . . . . . . 14 (𝑘 = 1 → (4C𝑘) = 4)
119 oveq1 7419 . . . . . . . . . . . . . . 15 (𝑘 = 1 → (𝑘 BernPoly 𝑋) = (1 BernPoly 𝑋))
120 oveq2 7420 . . . . . . . . . . . . . . . . 17 (𝑘 = 1 → (4 − 𝑘) = (4 − 1))
121120oveq1d 7427 . . . . . . . . . . . . . . . 16 (𝑘 = 1 → ((4 − 𝑘) + 1) = ((4 − 1) + 1))
1224oveq1i 7422 . . . . . . . . . . . . . . . . 17 ((4 − 1) + 1) = (3 + 1)
123 df-4 12306 . . . . . . . . . . . . . . . . 17 4 = (3 + 1)
124122, 123eqtr4i 2789 . . . . . . . . . . . . . . . 16 ((4 − 1) + 1) = 4
125121, 124eqtrdi 2814 . . . . . . . . . . . . . . 15 (𝑘 = 1 → ((4 − 𝑘) + 1) = 4)
126119, 125oveq12d 7430 . . . . . . . . . . . . . 14 (𝑘 = 1 → ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)) = ((1 BernPoly 𝑋) / 4))
127118, 126oveq12d 7430 . . . . . . . . . . . . 13 (𝑘 = 1 → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (4 · ((1 BernPoly 𝑋) / 4)))
128114, 127sylbi 220 . . . . . . . . . . . 12 (𝑘 = (0 + 1) → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (4 · ((1 BernPoly 𝑋) / 4)))
129103, 113, 128fsump1 15809 . . . . . . . . . . 11 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(0 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (Σ𝑘 ∈ (0...0)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) + (4 · ((1 BernPoly 𝑋) / 4))))
130 0z 12603 . . . . . . . . . . . . . 14 0 ∈ ℤ
13159a1i 11 . . . . . . . . . . . . . . 15 (𝑋 ∈ ℂ → 1 ∈ ℂ)
132 bpolycl 16107 . . . . . . . . . . . . . . . . 17 ((0 ∈ ℕ0𝑋 ∈ ℂ) → (0 BernPoly 𝑋) ∈ ℂ)
133100, 132mpan 702 . . . . . . . . . . . . . . . 16 (𝑋 ∈ ℂ → (0 BernPoly 𝑋) ∈ ℂ)
134 5cn 12330 . . . . . . . . . . . . . . . . 17 5 ∈ ℂ
135134a1i 11 . . . . . . . . . . . . . . . 16 (𝑋 ∈ ℂ → 5 ∈ ℂ)
136 0re 11211 . . . . . . . . . . . . . . . . . 18 0 ∈ ℝ
137 5pos 12354 . . . . . . . . . . . . . . . . . 18 0 < 5
138136, 137gtneii 11323 . . . . . . . . . . . . . . . . 17 5 ≠ 0
139138a1i 11 . . . . . . . . . . . . . . . 16 (𝑋 ∈ ℂ → 5 ≠ 0)
140133, 135, 139divcld 11992 . . . . . . . . . . . . . . 15 (𝑋 ∈ ℂ → ((0 BernPoly 𝑋) / 5) ∈ ℂ)
141131, 140mulcld 11230 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (1 · ((0 BernPoly 𝑋) / 5)) ∈ ℂ)
142 oveq2 7420 . . . . . . . . . . . . . . . . 17 (𝑘 = 0 → (4C𝑘) = (4C0))
143 bcn0 14348 . . . . . . . . . . . . . . . . . 18 (4 ∈ ℕ0 → (4C0) = 1)
1441, 143ax-mp 5 . . . . . . . . . . . . . . . . 17 (4C0) = 1
145142, 144eqtrdi 2814 . . . . . . . . . . . . . . . 16 (𝑘 = 0 → (4C𝑘) = 1)
146 oveq1 7419 . . . . . . . . . . . . . . . . 17 (𝑘 = 0 → (𝑘 BernPoly 𝑋) = (0 BernPoly 𝑋))
147 oveq2 7420 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 0 → (4 − 𝑘) = (4 − 0))
148147oveq1d 7427 . . . . . . . . . . . . . . . . . 18 (𝑘 = 0 → ((4 − 𝑘) + 1) = ((4 − 0) + 1))
14957subid1i 11531 . . . . . . . . . . . . . . . . . . . 20 (4 − 0) = 4
150149oveq1i 7422 . . . . . . . . . . . . . . . . . . 19 ((4 − 0) + 1) = (4 + 1)
151 4p1e5 12387 . . . . . . . . . . . . . . . . . . 19 (4 + 1) = 5
152150, 151eqtri 2786 . . . . . . . . . . . . . . . . . 18 ((4 − 0) + 1) = 5
153148, 152eqtrdi 2814 . . . . . . . . . . . . . . . . 17 (𝑘 = 0 → ((4 − 𝑘) + 1) = 5)
154146, 153oveq12d 7430 . . . . . . . . . . . . . . . 16 (𝑘 = 0 → ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1)) = ((0 BernPoly 𝑋) / 5))
155145, 154oveq12d 7430 . . . . . . . . . . . . . . 15 (𝑘 = 0 → ((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (1 · ((0 BernPoly 𝑋) / 5)))
156155fsum1 15800 . . . . . . . . . . . . . 14 ((0 ∈ ℤ ∧ (1 · ((0 BernPoly 𝑋) / 5)) ∈ ℂ) → Σ𝑘 ∈ (0...0)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (1 · ((0 BernPoly 𝑋) / 5)))
157130, 141, 156sylancr 598 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...0)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (1 · ((0 BernPoly 𝑋) / 5)))
158 bpoly0 16105 . . . . . . . . . . . . . . . 16 (𝑋 ∈ ℂ → (0 BernPoly 𝑋) = 1)
159158oveq1d 7427 . . . . . . . . . . . . . . 15 (𝑋 ∈ ℂ → ((0 BernPoly 𝑋) / 5) = (1 / 5))
160159oveq2d 7428 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (1 · ((0 BernPoly 𝑋) / 5)) = (1 · (1 / 5)))
161134, 138reccli 11946 . . . . . . . . . . . . . . 15 (1 / 5) ∈ ℂ
162161mullidi 11215 . . . . . . . . . . . . . 14 (1 · (1 / 5)) = (1 / 5)
163160, 162eqtrdi 2814 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (1 · ((0 BernPoly 𝑋) / 5)) = (1 / 5))
164157, 163eqtrd 2798 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...0)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (1 / 5))
165 1nn0 12521 . . . . . . . . . . . . . . 15 1 ∈ ℕ0
166 bpolycl 16107 . . . . . . . . . . . . . . 15 ((1 ∈ ℕ0𝑋 ∈ ℂ) → (1 BernPoly 𝑋) ∈ ℂ)
167165, 166mpan 702 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (1 BernPoly 𝑋) ∈ ℂ)
168 nn0cn 12515 . . . . . . . . . . . . . . 15 (4 ∈ ℕ0 → 4 ∈ ℂ)
1691, 168mp1i 14 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → 4 ∈ ℂ)
170 4ne0 12353 . . . . . . . . . . . . . . 15 4 ≠ 0
171170a1i 11 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → 4 ≠ 0)
172167, 169, 171divcan2d 11994 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (4 · ((1 BernPoly 𝑋) / 4)) = (1 BernPoly 𝑋))
173 bpoly1 16106 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (1 BernPoly 𝑋) = (𝑋 − (1 / 2)))
174172, 173eqtrd 2798 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (4 · ((1 BernPoly 𝑋) / 4)) = (𝑋 − (1 / 2)))
175164, 174oveq12d 7430 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (Σ𝑘 ∈ (0...0)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) + (4 · ((1 BernPoly 𝑋) / 4))) = ((1 / 5) + (𝑋 − (1 / 2))))
176129, 175eqtrd 2798 . . . . . . . . . 10 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(0 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = ((1 / 5) + (𝑋 − (1 / 2))))
17799, 176eqtr3id 2812 . . . . . . . . 9 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...1)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = ((1 / 5) + (𝑋 − (1 / 2))))
178 6cn 12333 . . . . . . . . . . . 12 6 ∈ ℂ
179178a1i 11 . . . . . . . . . . 11 (𝑋 ∈ ℂ → 6 ∈ ℂ)
180 2nn0 12522 . . . . . . . . . . . 12 2 ∈ ℕ0
181 bpolycl 16107 . . . . . . . . . . . 12 ((2 ∈ ℕ0𝑋 ∈ ℂ) → (2 BernPoly 𝑋) ∈ ℂ)
182180, 181mpan 702 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (2 BernPoly 𝑋) ∈ ℂ)
18358a1i 11 . . . . . . . . . . 11 (𝑋 ∈ ℂ → 3 ∈ ℂ)
184 3ne0 12351 . . . . . . . . . . . 12 3 ≠ 0
185184a1i 11 . . . . . . . . . . 11 (𝑋 ∈ ℂ → 3 ≠ 0)
186179, 182, 183, 185div12d 12028 . . . . . . . . . 10 (𝑋 ∈ ℂ → (6 · ((2 BernPoly 𝑋) / 3)) = ((2 BernPoly 𝑋) · (6 / 3)))
187 3t2e6 12407 . . . . . . . . . . . . 13 (3 · 2) = 6
188178, 58, 87, 184divmuli 11970 . . . . . . . . . . . . 13 ((6 / 3) = 2 ↔ (3 · 2) = 6)
189187, 188mpbir 234 . . . . . . . . . . . 12 (6 / 3) = 2
190189oveq2i 7423 . . . . . . . . . . 11 ((2 BernPoly 𝑋) · (6 / 3)) = ((2 BernPoly 𝑋) · 2)
191 2cnd 12320 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → 2 ∈ ℂ)
192182, 191mulcomd 11231 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((2 BernPoly 𝑋) · 2) = (2 · (2 BernPoly 𝑋)))
193 bpoly2 16112 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (2 BernPoly 𝑋) = (((𝑋↑2) − 𝑋) + (1 / 6)))
194193oveq2d 7428 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (2 · (2 BernPoly 𝑋)) = (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))
195192, 194eqtrd 2798 . . . . . . . . . . 11 (𝑋 ∈ ℂ → ((2 BernPoly 𝑋) · 2) = (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))
196190, 195eqtrid 2810 . . . . . . . . . 10 (𝑋 ∈ ℂ → ((2 BernPoly 𝑋) · (6 / 3)) = (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))
197186, 196eqtrd 2798 . . . . . . . . 9 (𝑋 ∈ ℂ → (6 · ((2 BernPoly 𝑋) / 3)) = (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))
198177, 197oveq12d 7430 . . . . . . . 8 (𝑋 ∈ ℂ → (Σ𝑘 ∈ (0...1)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) + (6 · ((2 BernPoly 𝑋) / 3))) = (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))
19996, 198eqtrd 2798 . . . . . . 7 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(1 + 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))
20071, 199eqtrid 2810 . . . . . 6 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...2)((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))
201 3nn0 12523 . . . . . . . . 9 3 ∈ ℕ0
202 bpolycl 16107 . . . . . . . . 9 ((3 ∈ ℕ0𝑋 ∈ ℂ) → (3 BernPoly 𝑋) ∈ ℂ)
203201, 202mpan 702 . . . . . . . 8 (𝑋 ∈ ℂ → (3 BernPoly 𝑋) ∈ ℂ)
204 2ne0 12348 . . . . . . . . 9 2 ≠ 0
205204a1i 11 . . . . . . . 8 (𝑋 ∈ ℂ → 2 ≠ 0)
206169, 203, 191, 205div12d 12028 . . . . . . 7 (𝑋 ∈ ℂ → (4 · ((3 BernPoly 𝑋) / 2)) = ((3 BernPoly 𝑋) · (4 / 2)))
207 4div2e2 12413 . . . . . . . . 9 (4 / 2) = 2
208207oveq2i 7423 . . . . . . . 8 ((3 BernPoly 𝑋) · (4 / 2)) = ((3 BernPoly 𝑋) · 2)
209203, 191mulcomd 11231 . . . . . . . . 9 (𝑋 ∈ ℂ → ((3 BernPoly 𝑋) · 2) = (2 · (3 BernPoly 𝑋)))
210 bpoly3 16113 . . . . . . . . . 10 (𝑋 ∈ ℂ → (3 BernPoly 𝑋) = (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋)))
211210oveq2d 7428 . . . . . . . . 9 (𝑋 ∈ ℂ → (2 · (3 BernPoly 𝑋)) = (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))))
212209, 211eqtrd 2798 . . . . . . . 8 (𝑋 ∈ ℂ → ((3 BernPoly 𝑋) · 2) = (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))))
213208, 212eqtrid 2810 . . . . . . 7 (𝑋 ∈ ℂ → ((3 BernPoly 𝑋) · (4 / 2)) = (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))))
214206, 213eqtrd 2798 . . . . . 6 (𝑋 ∈ ℂ → (4 · ((3 BernPoly 𝑋) / 2)) = (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))))
215200, 214oveq12d 7430 . . . . 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 2798 . . . 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 2810 . . 3 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(4 − 1))((4C𝑘) · ((𝑘 BernPoly 𝑋) / ((4 − 𝑘) + 1))) = ((((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) + (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋)))))
218217oveq2d 7428 . 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 14117 . . . . 5 ((𝑋 ∈ ℂ ∧ 4 ∈ ℕ0) → (𝑋↑4) ∈ ℂ)
2201, 219mpan2 703 . . . 4 (𝑋 ∈ ℂ → (𝑋↑4) ∈ ℂ)
221 expcl 14117 . . . . . 6 ((𝑋 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝑋↑3) ∈ ℂ)
222201, 221mpan2 703 . . . . 5 (𝑋 ∈ ℂ → (𝑋↑3) ∈ ℂ)
223191, 222mulcld 11230 . . . 4 (𝑋 ∈ ℂ → (2 · (𝑋↑3)) ∈ ℂ)
224 sqcl 14156 . . . . 5 (𝑋 ∈ ℂ → (𝑋↑2) ∈ ℂ)
225201, 100deccl 12727 . . . . . . . 8 30 ∈ ℕ0
226225nn0cni 12517 . . . . . . 7 30 ∈ ℂ
227 dfdec10 12715 . . . . . . . . 9 30 = ((10 · 3) + 0)
228 10re 12735 . . . . . . . . . . . 12 10 ∈ ℝ
229228recni 11224 . . . . . . . . . . 11 10 ∈ ℂ
230229, 58mulcli 11217 . . . . . . . . . 10 (10 · 3) ∈ ℂ
231230addridi 11398 . . . . . . . . 9 ((10 · 3) + 0) = (10 · 3)
232227, 231eqtri 2786 . . . . . . . 8 30 = (10 · 3)
233 10pos 12733 . . . . . . . . . 10 0 < 10
234136, 233gtneii 11323 . . . . . . . . 9 10 ≠ 0
235229, 58, 234, 184mulne0i 11858 . . . . . . . 8 (10 · 3) ≠ 0
236232, 235eqnetri 3028 . . . . . . 7 30 ≠ 0
237226, 236reccli 11946 . . . . . 6 (1 / 30) ∈ ℂ
238237a1i 11 . . . . 5 (𝑋 ∈ ℂ → (1 / 30) ∈ ℂ)
239224, 238subcld 11570 . . . 4 (𝑋 ∈ ℂ → ((𝑋↑2) − (1 / 30)) ∈ ℂ)
240220, 223, 239subsubd 11598 . . 3 (𝑋 ∈ ℂ → ((𝑋↑4) − ((2 · (𝑋↑3)) − ((𝑋↑2) − (1 / 30)))) = (((𝑋↑4) − (2 · (𝑋↑3))) + ((𝑋↑2) − (1 / 30))))
241161a1i 11 . . . . . . . 8 (𝑋 ∈ ℂ → (1 / 5) ∈ ℂ)
242 id 23 . . . . . . . . 9 (𝑋 ∈ ℂ → 𝑋 ∈ ℂ)
243 halfcn 12459 . . . . . . . . . 10 (1 / 2) ∈ ℂ
244243a1i 11 . . . . . . . . 9 (𝑋 ∈ ℂ → (1 / 2) ∈ ℂ)
245242, 244subcld 11570 . . . . . . . 8 (𝑋 ∈ ℂ → (𝑋 − (1 / 2)) ∈ ℂ)
246241, 245addcld 11229 . . . . . . 7 (𝑋 ∈ ℂ → ((1 / 5) + (𝑋 − (1 / 2))) ∈ ℂ)
247224, 242subcld 11570 . . . . . . . . 9 (𝑋 ∈ ℂ → ((𝑋↑2) − 𝑋) ∈ ℂ)
248 6pos 12355 . . . . . . . . . . . 12 0 < 6
249136, 248gtneii 11323 . . . . . . . . . . 11 6 ≠ 0
250178, 249reccli 11946 . . . . . . . . . 10 (1 / 6) ∈ ℂ
251250a1i 11 . . . . . . . . 9 (𝑋 ∈ ℂ → (1 / 6) ∈ ℂ)
252247, 251addcld 11229 . . . . . . . 8 (𝑋 ∈ ℂ → (((𝑋↑2) − 𝑋) + (1 / 6)) ∈ ℂ)
253191, 252mulcld 11230 . . . . . . 7 (𝑋 ∈ ℂ → (2 · (((𝑋↑2) − 𝑋) + (1 / 6))) ∈ ℂ)
254246, 253addcld 11229 . . . . . 6 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) ∈ ℂ)
25558, 87, 204divcli 11958 . . . . . . . . . . 11 (3 / 2) ∈ ℂ
256255a1i 11 . . . . . . . . . 10 (𝑋 ∈ ℂ → (3 / 2) ∈ ℂ)
257256, 224mulcld 11230 . . . . . . . . 9 (𝑋 ∈ ℂ → ((3 / 2) · (𝑋↑2)) ∈ ℂ)
258222, 257subcld 11570 . . . . . . . 8 (𝑋 ∈ ℂ → ((𝑋↑3) − ((3 / 2) · (𝑋↑2))) ∈ ℂ)
259244, 242mulcld 11230 . . . . . . . 8 (𝑋 ∈ ℂ → ((1 / 2) · 𝑋) ∈ ℂ)
260258, 259addcld 11229 . . . . . . 7 (𝑋 ∈ ℂ → (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋)) ∈ ℂ)
261191, 260mulcld 11230 . . . . . 6 (𝑋 ∈ ℂ → (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))) ∈ ℂ)
262254, 261addcomd 11413 . . . . 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 11234 . . . . . . 7 (𝑋 ∈ ℂ → (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))) = ((2 · ((𝑋↑3) − ((3 / 2) · (𝑋↑2)))) + (2 · ((1 / 2) · 𝑋))))
264191, 222, 257subdid 11671 . . . . . . . 8 (𝑋 ∈ ℂ → (2 · ((𝑋↑3) − ((3 / 2) · (𝑋↑2)))) = ((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))))
265 2thalfe1 12349 . . . . . . . . . 10 (2 · (1 / 2)) = 1
266265oveq1i 7422 . . . . . . . . 9 ((2 · (1 / 2)) · 𝑋) = (1 · 𝑋)
267191, 244, 242mulassd 11233 . . . . . . . . 9 (𝑋 ∈ ℂ → ((2 · (1 / 2)) · 𝑋) = (2 · ((1 / 2) · 𝑋)))
268 mullid 11208 . . . . . . . . 9 (𝑋 ∈ ℂ → (1 · 𝑋) = 𝑋)
269266, 267, 2683eqtr3a 2822 . . . . . . . 8 (𝑋 ∈ ℂ → (2 · ((1 / 2) · 𝑋)) = 𝑋)
270264, 269oveq12d 7430 . . . . . . 7 (𝑋 ∈ ℂ → ((2 · ((𝑋↑3) − ((3 / 2) · (𝑋↑2)))) + (2 · ((1 / 2) · 𝑋))) = (((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) + 𝑋))
271263, 270eqtrd 2798 . . . . . 6 (𝑋 ∈ ℂ → (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋))) = (((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) + 𝑋))
272271oveq1d 7427 . . . . 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 11230 . . . . . . . 8 (𝑋 ∈ ℂ → (2 · ((3 / 2) · (𝑋↑2))) ∈ ℂ)
274223, 273subcld 11570 . . . . . . 7 (𝑋 ∈ ℂ → ((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) ∈ ℂ)
275274, 242, 254addassd 11232 . . . . . 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 11229 . . . . . . 7 (𝑋 ∈ ℂ → (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) ∈ ℂ)
277223, 273, 276subsubd 11598 . . . . . 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 11233 . . . . . . . . . 10 (𝑋 ∈ ℂ → ((2 · (3 / 2)) · (𝑋↑2)) = (2 · ((3 / 2) · (𝑋↑2))))
27958, 87, 204divcan2i 11959 . . . . . . . . . . 11 (2 · (3 / 2)) = 3
280279oveq1i 7422 . . . . . . . . . 10 ((2 · (3 / 2)) · (𝑋↑2)) = (3 · (𝑋↑2))
281278, 280eqtr3di 2813 . . . . . . . . 9 (𝑋 ∈ ℂ → (2 · ((3 / 2) · (𝑋↑2))) = (3 · (𝑋↑2)))
282281oveq1d 7427 . . . . . . . 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 11438 . . . . . . . . . 10 (𝑋 ∈ ℂ → (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) = (((1 / 5) + (𝑋 − (1 / 2))) + (𝑋 + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))))
284191, 247, 251adddid 11234 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (2 · (((𝑋↑2) − 𝑋) + (1 / 6))) = ((2 · ((𝑋↑2) − 𝑋)) + (2 · (1 / 6))))
285191, 224, 242subdid 11671 . . . . . . . . . . . . . . 15 (𝑋 ∈ ℂ → (2 · ((𝑋↑2) − 𝑋)) = ((2 · (𝑋↑2)) − (2 · 𝑋)))
286187oveq2i 7423 . . . . . . . . . . . . . . . . 17 (2 / (3 · 2)) = (2 / 6)
28758, 184reccli 11946 . . . . . . . . . . . . . . . . . . . 20 (1 / 3) ∈ ℂ
28858, 87, 287mul32i 11407 . . . . . . . . . . . . . . . . . . 19 ((3 · 2) · (1 / 3)) = ((3 · (1 / 3)) · 2)
28958, 184recidi 11947 . . . . . . . . . . . . . . . . . . . . 21 (3 · (1 / 3)) = 1
290289oveq1i 7422 . . . . . . . . . . . . . . . . . . . 20 ((3 · (1 / 3)) · 2) = (1 · 2)
29187mullidi 11215 . . . . . . . . . . . . . . . . . . . 20 (1 · 2) = 2
292290, 291eqtri 2786 . . . . . . . . . . . . . . . . . . 19 ((3 · (1 / 3)) · 2) = 2
293288, 292eqtri 2786 . . . . . . . . . . . . . . . . . 18 ((3 · 2) · (1 / 3)) = 2
294187, 178eqeltri 2859 . . . . . . . . . . . . . . . . . . 19 (3 · 2) ∈ ℂ
295187, 249eqnetri 3028 . . . . . . . . . . . . . . . . . . 19 (3 · 2) ≠ 0
29687, 294, 287, 295divmuli 11970 . . . . . . . . . . . . . . . . . 18 ((2 / (3 · 2)) = (1 / 3) ↔ ((3 · 2) · (1 / 3)) = 2)
297293, 296mpbir 234 . . . . . . . . . . . . . . . . 17 (2 / (3 · 2)) = (1 / 3)
29887, 178, 249divreci 11961 . . . . . . . . . . . . . . . . 17 (2 / 6) = (2 · (1 / 6))
299286, 297, 2983eqtr3ri 2795 . . . . . . . . . . . . . . . 16 (2 · (1 / 6)) = (1 / 3)
300299a1i 11 . . . . . . . . . . . . . . 15 (𝑋 ∈ ℂ → (2 · (1 / 6)) = (1 / 3))
301285, 300oveq12d 7430 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → ((2 · ((𝑋↑2) − 𝑋)) + (2 · (1 / 6))) = (((2 · (𝑋↑2)) − (2 · 𝑋)) + (1 / 3)))
302284, 301eqtrd 2798 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (2 · (((𝑋↑2) − 𝑋) + (1 / 6))) = (((2 · (𝑋↑2)) − (2 · 𝑋)) + (1 / 3)))
303302oveq2d 7428 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (𝑋 + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) = (𝑋 + (((2 · (𝑋↑2)) − (2 · 𝑋)) + (1 / 3))))
304191, 224mulcld 11230 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (2 · (𝑋↑2)) ∈ ℂ)
305191, 242mulcld 11230 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (2 · 𝑋) ∈ ℂ)
306304, 305subcld 11570 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → ((2 · (𝑋↑2)) − (2 · 𝑋)) ∈ ℂ)
307287a1i 11 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (1 / 3) ∈ ℂ)
308242, 306, 307addassd 11232 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((𝑋 + ((2 · (𝑋↑2)) − (2 · 𝑋))) + (1 / 3)) = (𝑋 + (((2 · (𝑋↑2)) − (2 · 𝑋)) + (1 / 3))))
309242, 304, 305addsub12d 11593 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (𝑋 + ((2 · (𝑋↑2)) − (2 · 𝑋))) = ((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))))
310309oveq1d 7427 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((𝑋 + ((2 · (𝑋↑2)) − (2 · 𝑋))) + (1 / 3)) = (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3)))
311303, 308, 3103eqtr2d 2804 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (𝑋 + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) = (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3)))
312311oveq2d 7428 . . . . . . . . . 10 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (1 / 2))) + (𝑋 + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) = (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3))))
313283, 312eqtrd 2798 . . . . . . . . 9 (𝑋 ∈ ℂ → (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) = (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3))))
314313oveq2d 7428 . . . . . . . 8 (𝑋 ∈ ℂ → ((3 · (𝑋↑2)) − (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))) = ((3 · (𝑋↑2)) − (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3)))))
315242, 305subcld 11570 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (𝑋 − (2 · 𝑋)) ∈ ℂ)
316304, 315addcld 11229 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) ∈ ℂ)
317241, 245, 316, 307add4d 11440 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3))) = (((1 / 5) + ((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋)))) + ((𝑋 − (1 / 2)) + (1 / 3))))
318241, 304, 315add12d 11438 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((1 / 5) + ((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋)))) = ((2 · (𝑋↑2)) + ((1 / 5) + (𝑋 − (2 · 𝑋)))))
319318oveq1d 7427 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (((1 / 5) + ((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋)))) + ((𝑋 − (1 / 2)) + (1 / 3))) = (((2 · (𝑋↑2)) + ((1 / 5) + (𝑋 − (2 · 𝑋)))) + ((𝑋 − (1 / 2)) + (1 / 3))))
320241, 315addcld 11229 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((1 / 5) + (𝑋 − (2 · 𝑋))) ∈ ℂ)
321245, 307addcld 11229 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((𝑋 − (1 / 2)) + (1 / 3)) ∈ ℂ)
322304, 320, 321addassd 11232 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (((2 · (𝑋↑2)) + ((1 / 5) + (𝑋 − (2 · 𝑋)))) + ((𝑋 − (1 / 2)) + (1 / 3))) = ((2 · (𝑋↑2)) + (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3)))))
323317, 319, 3223eqtrd 2802 . . . . . . . . . 10 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3))) = ((2 · (𝑋↑2)) + (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3)))))
324323oveq2d 7428 . . . . . . . . 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 11230 . . . . . . . . . 10 (𝑋 ∈ ℂ → (3 · (𝑋↑2)) ∈ ℂ)
326320, 321addcld 11229 . . . . . . . . . 10 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3))) ∈ ℂ)
327325, 304, 326subsub4d 11601 . . . . . . . . 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 11548 . . . . . . . . . . . 12 (3 − 2) = 1
329328oveq1i 7422 . . . . . . . . . . 11 ((3 − 2) · (𝑋↑2)) = (1 · (𝑋↑2))
330183, 191, 224subdird 11672 . . . . . . . . . . 11 (𝑋 ∈ ℂ → ((3 − 2) · (𝑋↑2)) = ((3 · (𝑋↑2)) − (2 · (𝑋↑2))))
331224mullidd 11228 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (1 · (𝑋↑2)) = (𝑋↑2))
332329, 330, 3313eqtr3a 2822 . . . . . . . . . 10 (𝑋 ∈ ℂ → ((3 · (𝑋↑2)) − (2 · (𝑋↑2))) = (𝑋↑2))
333241, 305, 242subsubd 11598 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → ((1 / 5) − ((2 · 𝑋) − 𝑋)) = (((1 / 5) − (2 · 𝑋)) + 𝑋))
334 2txmxeqx 12381 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → ((2 · 𝑋) − 𝑋) = 𝑋)
335334oveq2d 7428 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → ((1 / 5) − ((2 · 𝑋) − 𝑋)) = ((1 / 5) − 𝑋))
336241, 305, 242subadd23d 11592 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (((1 / 5) − (2 · 𝑋)) + 𝑋) = ((1 / 5) + (𝑋 − (2 · 𝑋))))
337333, 335, 3363eqtr3d 2806 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → ((1 / 5) − 𝑋) = ((1 / 5) + (𝑋 − (2 · 𝑋))))
338242, 244, 307subsubd 11598 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (𝑋 − ((1 / 2) − (1 / 3))) = ((𝑋 − (1 / 2)) + (1 / 3)))
339337, 338oveq12d 7430 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (((1 / 5) − 𝑋) + (𝑋 − ((1 / 2) − (1 / 3)))) = (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3))))
340243, 287subcli 11535 . . . . . . . . . . . . . 14 ((1 / 2) − (1 / 3)) ∈ ℂ
341340a1i 11 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → ((1 / 2) − (1 / 3)) ∈ ℂ)
342241, 242, 341npncand 11594 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (((1 / 5) − 𝑋) + (𝑋 − ((1 / 2) − (1 / 3)))) = ((1 / 5) − ((1 / 2) − (1 / 3))))
343 halfthird 12466 . . . . . . . . . . . . . 14 ((1 / 2) − (1 / 3)) = (1 / 6)
344343oveq2i 7423 . . . . . . . . . . . . 13 ((1 / 5) − ((1 / 2) − (1 / 3))) = ((1 / 5) − (1 / 6))
345 5recm6rec 12862 . . . . . . . . . . . . 13 ((1 / 5) − (1 / 6)) = (1 / 30)
346344, 345eqtri 2786 . . . . . . . . . . . 12 ((1 / 5) − ((1 / 2) − (1 / 3))) = (1 / 30)
347342, 346eqtrdi 2814 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (((1 / 5) − 𝑋) + (𝑋 − ((1 / 2) − (1 / 3)))) = (1 / 30))
348339, 347eqtr3d 2800 . . . . . . . . . 10 (𝑋 ∈ ℂ → (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3))) = (1 / 30))
349332, 348oveq12d 7430 . . . . . . . . 9 (𝑋 ∈ ℂ → (((3 · (𝑋↑2)) − (2 · (𝑋↑2))) − (((1 / 5) + (𝑋 − (2 · 𝑋))) + ((𝑋 − (1 / 2)) + (1 / 3)))) = ((𝑋↑2) − (1 / 30)))
350324, 327, 3493eqtr2d 2804 . . . . . . . 8 (𝑋 ∈ ℂ → ((3 · (𝑋↑2)) − (((1 / 5) + (𝑋 − (1 / 2))) + (((2 · (𝑋↑2)) + (𝑋 − (2 · 𝑋))) + (1 / 3)))) = ((𝑋↑2) − (1 / 30)))
351282, 314, 3503eqtrd 2802 . . . . . . 7 (𝑋 ∈ ℂ → ((2 · ((3 / 2) · (𝑋↑2))) − (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))))) = ((𝑋↑2) − (1 / 30)))
352351oveq2d 7428 . . . . . 6 (𝑋 ∈ ℂ → ((2 · (𝑋↑3)) − ((2 · ((3 / 2) · (𝑋↑2))) − (𝑋 + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))))) = ((2 · (𝑋↑3)) − ((𝑋↑2) − (1 / 30))))
353275, 277, 3523eqtr2d 2804 . . . . 5 (𝑋 ∈ ℂ → ((((2 · (𝑋↑3)) − (2 · ((3 / 2) · (𝑋↑2)))) + 𝑋) + (((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6))))) = ((2 · (𝑋↑3)) − ((𝑋↑2) − (1 / 30))))
354262, 272, 3533eqtrd 2802 . . . 4 (𝑋 ∈ ℂ → ((((1 / 5) + (𝑋 − (1 / 2))) + (2 · (((𝑋↑2) − 𝑋) + (1 / 6)))) + (2 · (((𝑋↑3) − ((3 / 2) · (𝑋↑2))) + ((1 / 2) · 𝑋)))) = ((2 · (𝑋↑3)) − ((𝑋↑2) − (1 / 30))))
355354oveq2d 7428 . . 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 11570 . . . 4 (𝑋 ∈ ℂ → ((𝑋↑4) − (2 · (𝑋↑3))) ∈ ℂ)
357356, 224, 238addsubassd 11590 . . 3 (𝑋 ∈ ℂ → ((((𝑋↑4) − (2 · (𝑋↑3))) + (𝑋↑2)) − (1 / 30)) = (((𝑋↑4) − (2 · (𝑋↑3))) + ((𝑋↑2) − (1 / 30))))
358240, 355, 3573eqtr4d 2808 . 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 2802 1 (𝑋 ∈ ℂ → (4 BernPoly 𝑋) = ((((𝑋↑4) − (2 · (𝑋↑3))) + (𝑋↑2)) − (1 / 30)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 400   = wceq 1570  wcel 2143  wne 2958  wss 3906   class class class wbr 5110  cfv 6538  (class class class)co 7412  cc 11099  cr 11100  0cc0 11101  1c1 11102   + caddc 11104   · cmul 11106   < clt 11244  cmin 11442   / cdiv 11872  cn 12234  2c2 12296  3c3 12297  4c4 12298  5c5 12299  6c6 12300  0cn0 12505  cz 12592  cdc 12712  cuz 12863  ...cfz 13536  cexp 14099  Ccbc 14340  Σcsu 15739   BernPoly cbp 16101
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734  ax-inf2 9611  ax-cnex 11157  ax-resscn 11158  ax-1cn 11159  ax-icn 11160  ax-addcl 11161  ax-addrcl 11162  ax-mulcl 11163  ax-mulrcl 11164  ax-mulcom 11165  ax-addass 11166  ax-mulass 11167  ax-distr 11168  ax-i2m1 11169  ax-1ne0 11170  ax-1rid 11171  ax-rnegex 11172  ax-rrecex 11173  ax-cnre 11174  ax-pre-lttri 11175  ax-pre-lttrn 11176  ax-pre-ltadd 11177  ax-pre-mulgt0 11178  ax-pre-sup 11179
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-tp 4595  df-op 4597  df-uni 4874  df-int 4914  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7864  df-1st 7987  df-2nd 7988  df-frecs 8279  df-wrecs 8310  df-recs 8359  df-rdg 8398  df-1o 8454  df-er 8695  df-en 8945  df-dom 8946  df-sdom 8947  df-fin 8948  df-sup 9403  df-oi 9473  df-card 9926  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11444  df-neg 11445  df-div 11873  df-nn 12235  df-2 12304  df-3 12305  df-4 12306  df-5 12307  df-6 12308  df-7 12309  df-8 12310  df-9 12311  df-n0 12506  df-z 12593  df-dec 12713  df-uz 12864  df-rp 13018  df-fz 13537  df-fzo 13685  df-seq 14040  df-exp 14100  df-fac 14312  df-bc 14341  df-hash 14369  df-cj 15152  df-re 15153  df-im 15154  df-sqrt 15288  df-abs 15289  df-clim 15541  df-sum 15740  df-bpoly 16102
This theorem is referenced by:  fsumcube  16115
  Copyright terms: Public domain W3C validator