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

Theorem bpoly2 16022
Description: The Bernoulli polynomials at two. (Contributed by Scott Fenton, 8-Jul-2015.)
Assertion
Ref Expression
bpoly2 (𝑋 ∈ ℂ → (2 BernPoly 𝑋) = (((𝑋↑2) − 𝑋) + (1 / 6)))

Proof of Theorem bpoly2
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 2nn0 12454 . . 3 2 ∈ ℕ0
2 bpolyval 16014 . . 3 ((2 ∈ ℕ0𝑋 ∈ ℂ) → (2 BernPoly 𝑋) = ((𝑋↑2) − Σ𝑘 ∈ (0...(2 − 1))((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1)))))
31, 2mpan 691 . 2 (𝑋 ∈ ℂ → (2 BernPoly 𝑋) = ((𝑋↑2) − Σ𝑘 ∈ (0...(2 − 1))((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1)))))
4 2m1e1 12302 . . . . . . 7 (2 − 1) = 1
5 0p1e1 12298 . . . . . . 7 (0 + 1) = 1
64, 5eqtr4i 2763 . . . . . 6 (2 − 1) = (0 + 1)
76oveq2i 7378 . . . . 5 (0...(2 − 1)) = (0...(0 + 1))
87sumeq1i 15659 . . . 4 Σ𝑘 ∈ (0...(2 − 1))((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = Σ𝑘 ∈ (0...(0 + 1))((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1)))
9 0nn0 12452 . . . . . . . . 9 0 ∈ ℕ0
10 nn0uz 12826 . . . . . . . . 9 0 = (ℤ‘0)
119, 10eleqtri 2835 . . . . . . . 8 0 ∈ (ℤ‘0)
1211a1i 11 . . . . . . 7 (𝑋 ∈ ℂ → 0 ∈ (ℤ‘0))
13 0z 12535 . . . . . . . . . . 11 0 ∈ ℤ
14 fzpr 13533 . . . . . . . . . . 11 (0 ∈ ℤ → (0...(0 + 1)) = {0, (0 + 1)})
1513, 14ax-mp 5 . . . . . . . . . 10 (0...(0 + 1)) = {0, (0 + 1)}
1615eleq2i 2829 . . . . . . . . 9 (𝑘 ∈ (0...(0 + 1)) ↔ 𝑘 ∈ {0, (0 + 1)})
17 vex 3434 . . . . . . . . . 10 𝑘 ∈ V
1817elpr 4593 . . . . . . . . 9 (𝑘 ∈ {0, (0 + 1)} ↔ (𝑘 = 0 ∨ 𝑘 = (0 + 1)))
1916, 18bitri 275 . . . . . . . 8 (𝑘 ∈ (0...(0 + 1)) ↔ (𝑘 = 0 ∨ 𝑘 = (0 + 1)))
20 oveq2 7375 . . . . . . . . . . . . 13 (𝑘 = 0 → (2C𝑘) = (2C0))
21 bcn0 14272 . . . . . . . . . . . . . 14 (2 ∈ ℕ0 → (2C0) = 1)
221, 21ax-mp 5 . . . . . . . . . . . . 13 (2C0) = 1
2320, 22eqtrdi 2788 . . . . . . . . . . . 12 (𝑘 = 0 → (2C𝑘) = 1)
24 oveq1 7374 . . . . . . . . . . . . 13 (𝑘 = 0 → (𝑘 BernPoly 𝑋) = (0 BernPoly 𝑋))
25 oveq2 7375 . . . . . . . . . . . . . . 15 (𝑘 = 0 → (2 − 𝑘) = (2 − 0))
2625oveq1d 7382 . . . . . . . . . . . . . 14 (𝑘 = 0 → ((2 − 𝑘) + 1) = ((2 − 0) + 1))
27 2cn 12256 . . . . . . . . . . . . . . . . 17 2 ∈ ℂ
2827subid1i 11466 . . . . . . . . . . . . . . . 16 (2 − 0) = 2
2928oveq1i 7377 . . . . . . . . . . . . . . 15 ((2 − 0) + 1) = (2 + 1)
30 df-3 12245 . . . . . . . . . . . . . . 15 3 = (2 + 1)
3129, 30eqtr4i 2763 . . . . . . . . . . . . . 14 ((2 − 0) + 1) = 3
3226, 31eqtrdi 2788 . . . . . . . . . . . . 13 (𝑘 = 0 → ((2 − 𝑘) + 1) = 3)
3324, 32oveq12d 7385 . . . . . . . . . . . 12 (𝑘 = 0 → ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1)) = ((0 BernPoly 𝑋) / 3))
3423, 33oveq12d 7385 . . . . . . . . . . 11 (𝑘 = 0 → ((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = (1 · ((0 BernPoly 𝑋) / 3)))
35 bpoly0 16015 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (0 BernPoly 𝑋) = 1)
3635oveq1d 7382 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → ((0 BernPoly 𝑋) / 3) = (1 / 3))
3736oveq2d 7383 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (1 · ((0 BernPoly 𝑋) / 3)) = (1 · (1 / 3)))
38 3cn 12262 . . . . . . . . . . . . . 14 3 ∈ ℂ
39 3ne0 12287 . . . . . . . . . . . . . 14 3 ≠ 0
4038, 39reccli 11885 . . . . . . . . . . . . 13 (1 / 3) ∈ ℂ
4140mullidi 11150 . . . . . . . . . . . 12 (1 · (1 / 3)) = (1 / 3)
4237, 41eqtrdi 2788 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (1 · ((0 BernPoly 𝑋) / 3)) = (1 / 3))
4334, 42sylan9eqr 2794 . . . . . . . . . 10 ((𝑋 ∈ ℂ ∧ 𝑘 = 0) → ((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = (1 / 3))
4443, 40eqeltrdi 2845 . . . . . . . . 9 ((𝑋 ∈ ℂ ∧ 𝑘 = 0) → ((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) ∈ ℂ)
455eqeq2i 2750 . . . . . . . . . . . 12 (𝑘 = (0 + 1) ↔ 𝑘 = 1)
46 oveq2 7375 . . . . . . . . . . . . . 14 (𝑘 = 1 → (2C𝑘) = (2C1))
47 bcn1 14275 . . . . . . . . . . . . . . 15 (2 ∈ ℕ0 → (2C1) = 2)
481, 47ax-mp 5 . . . . . . . . . . . . . 14 (2C1) = 2
4946, 48eqtrdi 2788 . . . . . . . . . . . . 13 (𝑘 = 1 → (2C𝑘) = 2)
50 oveq1 7374 . . . . . . . . . . . . . 14 (𝑘 = 1 → (𝑘 BernPoly 𝑋) = (1 BernPoly 𝑋))
51 oveq2 7375 . . . . . . . . . . . . . . . 16 (𝑘 = 1 → (2 − 𝑘) = (2 − 1))
5251oveq1d 7382 . . . . . . . . . . . . . . 15 (𝑘 = 1 → ((2 − 𝑘) + 1) = ((2 − 1) + 1))
53 ax-1cn 11096 . . . . . . . . . . . . . . . 16 1 ∈ ℂ
54 npcan 11402 . . . . . . . . . . . . . . . 16 ((2 ∈ ℂ ∧ 1 ∈ ℂ) → ((2 − 1) + 1) = 2)
5527, 53, 54mp2an 693 . . . . . . . . . . . . . . 15 ((2 − 1) + 1) = 2
5652, 55eqtrdi 2788 . . . . . . . . . . . . . 14 (𝑘 = 1 → ((2 − 𝑘) + 1) = 2)
5750, 56oveq12d 7385 . . . . . . . . . . . . 13 (𝑘 = 1 → ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1)) = ((1 BernPoly 𝑋) / 2))
5849, 57oveq12d 7385 . . . . . . . . . . . 12 (𝑘 = 1 → ((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = (2 · ((1 BernPoly 𝑋) / 2)))
5945, 58sylbi 217 . . . . . . . . . . 11 (𝑘 = (0 + 1) → ((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = (2 · ((1 BernPoly 𝑋) / 2)))
60 bpoly1 16016 . . . . . . . . . . . . . 14 (𝑋 ∈ ℂ → (1 BernPoly 𝑋) = (𝑋 − (1 / 2)))
6160oveq1d 7382 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → ((1 BernPoly 𝑋) / 2) = ((𝑋 − (1 / 2)) / 2))
6261oveq2d 7383 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (2 · ((1 BernPoly 𝑋) / 2)) = (2 · ((𝑋 − (1 / 2)) / 2)))
63 halfcn 12391 . . . . . . . . . . . . . 14 (1 / 2) ∈ ℂ
64 subcl 11392 . . . . . . . . . . . . . 14 ((𝑋 ∈ ℂ ∧ (1 / 2) ∈ ℂ) → (𝑋 − (1 / 2)) ∈ ℂ)
6563, 64mpan2 692 . . . . . . . . . . . . 13 (𝑋 ∈ ℂ → (𝑋 − (1 / 2)) ∈ ℂ)
66 2ne0 12285 . . . . . . . . . . . . . 14 2 ≠ 0
67 divcan2 11817 . . . . . . . . . . . . . 14 (((𝑋 − (1 / 2)) ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0) → (2 · ((𝑋 − (1 / 2)) / 2)) = (𝑋 − (1 / 2)))
6827, 66, 67mp3an23 1456 . . . . . . . . . . . . 13 ((𝑋 − (1 / 2)) ∈ ℂ → (2 · ((𝑋 − (1 / 2)) / 2)) = (𝑋 − (1 / 2)))
6965, 68syl 17 . . . . . . . . . . . 12 (𝑋 ∈ ℂ → (2 · ((𝑋 − (1 / 2)) / 2)) = (𝑋 − (1 / 2)))
7062, 69eqtrd 2772 . . . . . . . . . . 11 (𝑋 ∈ ℂ → (2 · ((1 BernPoly 𝑋) / 2)) = (𝑋 − (1 / 2)))
7159, 70sylan9eqr 2794 . . . . . . . . . 10 ((𝑋 ∈ ℂ ∧ 𝑘 = (0 + 1)) → ((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = (𝑋 − (1 / 2)))
7265adantr 480 . . . . . . . . . 10 ((𝑋 ∈ ℂ ∧ 𝑘 = (0 + 1)) → (𝑋 − (1 / 2)) ∈ ℂ)
7371, 72eqeltrd 2837 . . . . . . . . 9 ((𝑋 ∈ ℂ ∧ 𝑘 = (0 + 1)) → ((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) ∈ ℂ)
7444, 73jaodan 960 . . . . . . . 8 ((𝑋 ∈ ℂ ∧ (𝑘 = 0 ∨ 𝑘 = (0 + 1))) → ((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) ∈ ℂ)
7519, 74sylan2b 595 . . . . . . 7 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ (0...(0 + 1))) → ((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) ∈ ℂ)
7612, 75, 59fsump1 15718 . . . . . 6 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(0 + 1))((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = (Σ𝑘 ∈ (0...0)((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) + (2 · ((1 BernPoly 𝑋) / 2))))
7742, 40eqeltrdi 2845 . . . . . . . . 9 (𝑋 ∈ ℂ → (1 · ((0 BernPoly 𝑋) / 3)) ∈ ℂ)
7834fsum1 15709 . . . . . . . . 9 ((0 ∈ ℤ ∧ (1 · ((0 BernPoly 𝑋) / 3)) ∈ ℂ) → Σ𝑘 ∈ (0...0)((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = (1 · ((0 BernPoly 𝑋) / 3)))
7913, 77, 78sylancr 588 . . . . . . . 8 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...0)((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = (1 · ((0 BernPoly 𝑋) / 3)))
8079, 42eqtrd 2772 . . . . . . 7 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...0)((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = (1 / 3))
8180, 70oveq12d 7385 . . . . . 6 (𝑋 ∈ ℂ → (Σ𝑘 ∈ (0...0)((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) + (2 · ((1 BernPoly 𝑋) / 2))) = ((1 / 3) + (𝑋 − (1 / 2))))
8276, 81eqtrd 2772 . . . . 5 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(0 + 1))((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = ((1 / 3) + (𝑋 − (1 / 2))))
83 addsub12 11406 . . . . . . 7 (((1 / 3) ∈ ℂ ∧ 𝑋 ∈ ℂ ∧ (1 / 2) ∈ ℂ) → ((1 / 3) + (𝑋 − (1 / 2))) = (𝑋 + ((1 / 3) − (1 / 2))))
8440, 63, 83mp3an13 1455 . . . . . 6 (𝑋 ∈ ℂ → ((1 / 3) + (𝑋 − (1 / 2))) = (𝑋 + ((1 / 3) − (1 / 2))))
8563, 40negsubdi2i 11480 . . . . . . . 8 -((1 / 2) − (1 / 3)) = ((1 / 3) − (1 / 2))
86 halfthird 12398 . . . . . . . . 9 ((1 / 2) − (1 / 3)) = (1 / 6)
8786negeqi 11386 . . . . . . . 8 -((1 / 2) − (1 / 3)) = -(1 / 6)
8885, 87eqtr3i 2762 . . . . . . 7 ((1 / 3) − (1 / 2)) = -(1 / 6)
8988oveq2i 7378 . . . . . 6 (𝑋 + ((1 / 3) − (1 / 2))) = (𝑋 + -(1 / 6))
9084, 89eqtrdi 2788 . . . . 5 (𝑋 ∈ ℂ → ((1 / 3) + (𝑋 − (1 / 2))) = (𝑋 + -(1 / 6)))
91 6cn 12272 . . . . . . 7 6 ∈ ℂ
92 6re 12271 . . . . . . . 8 6 ∈ ℝ
93 6pos 12291 . . . . . . . 8 0 < 6
9492, 93gt0ne0ii 11686 . . . . . . 7 6 ≠ 0
9591, 94reccli 11885 . . . . . 6 (1 / 6) ∈ ℂ
96 negsub 11442 . . . . . 6 ((𝑋 ∈ ℂ ∧ (1 / 6) ∈ ℂ) → (𝑋 + -(1 / 6)) = (𝑋 − (1 / 6)))
9795, 96mpan2 692 . . . . 5 (𝑋 ∈ ℂ → (𝑋 + -(1 / 6)) = (𝑋 − (1 / 6)))
9882, 90, 973eqtrd 2776 . . . 4 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(0 + 1))((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = (𝑋 − (1 / 6)))
998, 98eqtrid 2784 . . 3 (𝑋 ∈ ℂ → Σ𝑘 ∈ (0...(2 − 1))((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1))) = (𝑋 − (1 / 6)))
10099oveq2d 7383 . 2 (𝑋 ∈ ℂ → ((𝑋↑2) − Σ𝑘 ∈ (0...(2 − 1))((2C𝑘) · ((𝑘 BernPoly 𝑋) / ((2 − 𝑘) + 1)))) = ((𝑋↑2) − (𝑋 − (1 / 6))))
101 sqcl 14080 . . 3 (𝑋 ∈ ℂ → (𝑋↑2) ∈ ℂ)
102 subsub 11424 . . . 4 (((𝑋↑2) ∈ ℂ ∧ 𝑋 ∈ ℂ ∧ (1 / 6) ∈ ℂ) → ((𝑋↑2) − (𝑋 − (1 / 6))) = (((𝑋↑2) − 𝑋) + (1 / 6)))
10395, 102mp3an3 1453 . . 3 (((𝑋↑2) ∈ ℂ ∧ 𝑋 ∈ ℂ) → ((𝑋↑2) − (𝑋 − (1 / 6))) = (((𝑋↑2) − 𝑋) + (1 / 6)))
104101, 103mpancom 689 . 2 (𝑋 ∈ ℂ → ((𝑋↑2) − (𝑋 − (1 / 6))) = (((𝑋↑2) − 𝑋) + (1 / 6)))
1053, 100, 1043eqtrd 2776 1 (𝑋 ∈ ℂ → (2 BernPoly 𝑋) = (((𝑋↑2) − 𝑋) + (1 / 6)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395  wo 848   = wceq 1542  wcel 2114  wne 2933  {cpr 4570  cfv 6499  (class class class)co 7367  cc 11036  0cc0 11038  1c1 11039   + caddc 11041   · cmul 11043  cmin 11377  -cneg 11378   / cdiv 11807  2c2 12236  3c3 12237  6c6 12240  0cn0 12437  cz 12524  cuz 12788  ...cfz 13461  cexp 14023  Ccbc 14264  Σcsu 15648   BernPoly cbp 16011
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 5213  ax-sep 5232  ax-nul 5242  ax-pow 5308  ax-pr 5376  ax-un 7689  ax-inf2 9562  ax-cnex 11094  ax-resscn 11095  ax-1cn 11096  ax-icn 11097  ax-addcl 11098  ax-addrcl 11099  ax-mulcl 11100  ax-mulrcl 11101  ax-mulcom 11102  ax-addass 11103  ax-mulass 11104  ax-distr 11105  ax-i2m1 11106  ax-1ne0 11107  ax-1rid 11108  ax-rnegex 11109  ax-rrecex 11110  ax-cnre 11111  ax-pre-lttri 11112  ax-pre-lttrn 11113  ax-pre-ltadd 11114  ax-pre-mulgt0 11115  ax-pre-sup 11116
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-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 5526  df-eprel 5531  df-po 5539  df-so 5540  df-fr 5584  df-se 5585  df-we 5586  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6266  df-ord 6327  df-on 6328  df-lim 6329  df-suc 6330  df-iota 6455  df-fun 6501  df-fn 6502  df-f 6503  df-f1 6504  df-fo 6505  df-f1o 6506  df-fv 6507  df-isom 6508  df-riota 7324  df-ov 7370  df-oprab 7371  df-mpo 7372  df-om 7818  df-1st 7942  df-2nd 7943  df-frecs 8231  df-wrecs 8262  df-recs 8311  df-rdg 8349  df-1o 8405  df-er 8643  df-en 8894  df-dom 8895  df-sdom 8896  df-fin 8897  df-sup 9355  df-oi 9425  df-card 9863  df-pnf 11181  df-mnf 11182  df-xr 11183  df-ltxr 11184  df-le 11185  df-sub 11379  df-neg 11380  df-div 11808  df-nn 12175  df-2 12244  df-3 12245  df-4 12246  df-5 12247  df-6 12248  df-n0 12438  df-z 12525  df-uz 12789  df-rp 12943  df-fz 13462  df-fzo 13609  df-seq 13964  df-exp 14024  df-fac 14236  df-bc 14265  df-hash 14293  df-cj 15061  df-re 15062  df-im 15063  df-sqrt 15197  df-abs 15198  df-clim 15450  df-sum 15649  df-bpoly 16012
This theorem is referenced by:  bpoly3  16023  bpoly4  16024
  Copyright terms: Public domain W3C validator