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

Theorem efi4p 16095
Description: Separate out the first four terms of the infinite series expansion of the exponential function. (Contributed by Paul Chapman, 19-Jan-2008.) (Revised by Mario Carneiro, 30-Apr-2014.)
Hypothesis
Ref Expression
efi4p.1 𝐹 = (𝑛 ∈ ℕ0 ↦ (((i · 𝐴)↑𝑛) / (!‘𝑛)))
Assertion
Ref Expression
efi4p (𝐴 ∈ ℂ → (exp‘(i · 𝐴)) = (((1 − ((𝐴↑2) / 2)) + (i · (𝐴 − ((𝐴↑3) / 6)))) + Σ𝑘 ∈ (ℤ‘4)(𝐹𝑘)))
Distinct variable groups:   𝐴,𝑘,𝑛   𝑘,𝐹
Allowed substitution hint:   𝐹(𝑛)

Proof of Theorem efi4p
StepHypRef Expression
1 ax-icn 11088 . . . 4 i ∈ ℂ
2 mulcl 11113 . . . 4 ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · 𝐴) ∈ ℂ)
31, 2mpan 691 . . 3 (𝐴 ∈ ℂ → (i · 𝐴) ∈ ℂ)
4 efi4p.1 . . . 4 𝐹 = (𝑛 ∈ ℕ0 ↦ (((i · 𝐴)↑𝑛) / (!‘𝑛)))
54ef4p 16071 . . 3 ((i · 𝐴) ∈ ℂ → (exp‘(i · 𝐴)) = ((((1 + (i · 𝐴)) + (((i · 𝐴)↑2) / 2)) + (((i · 𝐴)↑3) / 6)) + Σ𝑘 ∈ (ℤ‘4)(𝐹𝑘)))
63, 5syl 17 . 2 (𝐴 ∈ ℂ → (exp‘(i · 𝐴)) = ((((1 + (i · 𝐴)) + (((i · 𝐴)↑2) / 2)) + (((i · 𝐴)↑3) / 6)) + Σ𝑘 ∈ (ℤ‘4)(𝐹𝑘)))
7 ax-1cn 11087 . . . . . 6 1 ∈ ℂ
8 addcl 11111 . . . . . 6 ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + (i · 𝐴)) ∈ ℂ)
97, 3, 8sylancr 588 . . . . 5 (𝐴 ∈ ℂ → (1 + (i · 𝐴)) ∈ ℂ)
103sqcld 14097 . . . . . 6 (𝐴 ∈ ℂ → ((i · 𝐴)↑2) ∈ ℂ)
1110halfcld 12413 . . . . 5 (𝐴 ∈ ℂ → (((i · 𝐴)↑2) / 2) ∈ ℂ)
12 3nn0 12446 . . . . . . 7 3 ∈ ℕ0
13 expcl 14032 . . . . . . 7 (((i · 𝐴) ∈ ℂ ∧ 3 ∈ ℕ0) → ((i · 𝐴)↑3) ∈ ℂ)
143, 12, 13sylancl 587 . . . . . 6 (𝐴 ∈ ℂ → ((i · 𝐴)↑3) ∈ ℂ)
15 6cn 12263 . . . . . . 7 6 ∈ ℂ
16 6re 12262 . . . . . . . 8 6 ∈ ℝ
17 6pos 12282 . . . . . . . 8 0 < 6
1816, 17gt0ne0ii 11677 . . . . . . 7 6 ≠ 0
19 divcl 11806 . . . . . . 7 ((((i · 𝐴)↑3) ∈ ℂ ∧ 6 ∈ ℂ ∧ 6 ≠ 0) → (((i · 𝐴)↑3) / 6) ∈ ℂ)
2015, 18, 19mp3an23 1456 . . . . . 6 (((i · 𝐴)↑3) ∈ ℂ → (((i · 𝐴)↑3) / 6) ∈ ℂ)
2114, 20syl 17 . . . . 5 (𝐴 ∈ ℂ → (((i · 𝐴)↑3) / 6) ∈ ℂ)
229, 11, 21addassd 11158 . . . 4 (𝐴 ∈ ℂ → (((1 + (i · 𝐴)) + (((i · 𝐴)↑2) / 2)) + (((i · 𝐴)↑3) / 6)) = ((1 + (i · 𝐴)) + ((((i · 𝐴)↑2) / 2) + (((i · 𝐴)↑3) / 6))))
237a1i 11 . . . . 5 (𝐴 ∈ ℂ → 1 ∈ ℂ)
2423, 3, 11, 21add4d 11366 . . . 4 (𝐴 ∈ ℂ → ((1 + (i · 𝐴)) + ((((i · 𝐴)↑2) / 2) + (((i · 𝐴)↑3) / 6))) = ((1 + (((i · 𝐴)↑2) / 2)) + ((i · 𝐴) + (((i · 𝐴)↑3) / 6))))
25 2nn0 12445 . . . . . . . . . . 11 2 ∈ ℕ0
26 mulexp 14054 . . . . . . . . . . 11 ((i ∈ ℂ ∧ 𝐴 ∈ ℂ ∧ 2 ∈ ℕ0) → ((i · 𝐴)↑2) = ((i↑2) · (𝐴↑2)))
271, 25, 26mp3an13 1455 . . . . . . . . . 10 (𝐴 ∈ ℂ → ((i · 𝐴)↑2) = ((i↑2) · (𝐴↑2)))
28 i2 14155 . . . . . . . . . . . 12 (i↑2) = -1
2928oveq1i 7370 . . . . . . . . . . 11 ((i↑2) · (𝐴↑2)) = (-1 · (𝐴↑2))
3029a1i 11 . . . . . . . . . 10 (𝐴 ∈ ℂ → ((i↑2) · (𝐴↑2)) = (-1 · (𝐴↑2)))
31 sqcl 14071 . . . . . . . . . . 11 (𝐴 ∈ ℂ → (𝐴↑2) ∈ ℂ)
3231mulm1d 11593 . . . . . . . . . 10 (𝐴 ∈ ℂ → (-1 · (𝐴↑2)) = -(𝐴↑2))
3327, 30, 323eqtrd 2776 . . . . . . . . 9 (𝐴 ∈ ℂ → ((i · 𝐴)↑2) = -(𝐴↑2))
3433oveq1d 7375 . . . . . . . 8 (𝐴 ∈ ℂ → (((i · 𝐴)↑2) / 2) = (-(𝐴↑2) / 2))
35 2cn 12247 . . . . . . . . . 10 2 ∈ ℂ
36 2ne0 12276 . . . . . . . . . 10 2 ≠ 0
37 divneg 11837 . . . . . . . . . 10 (((𝐴↑2) ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0) → -((𝐴↑2) / 2) = (-(𝐴↑2) / 2))
3835, 36, 37mp3an23 1456 . . . . . . . . 9 ((𝐴↑2) ∈ ℂ → -((𝐴↑2) / 2) = (-(𝐴↑2) / 2))
3931, 38syl 17 . . . . . . . 8 (𝐴 ∈ ℂ → -((𝐴↑2) / 2) = (-(𝐴↑2) / 2))
4034, 39eqtr4d 2775 . . . . . . 7 (𝐴 ∈ ℂ → (((i · 𝐴)↑2) / 2) = -((𝐴↑2) / 2))
4140oveq2d 7376 . . . . . 6 (𝐴 ∈ ℂ → (1 + (((i · 𝐴)↑2) / 2)) = (1 + -((𝐴↑2) / 2)))
4231halfcld 12413 . . . . . . 7 (𝐴 ∈ ℂ → ((𝐴↑2) / 2) ∈ ℂ)
43 negsub 11433 . . . . . . 7 ((1 ∈ ℂ ∧ ((𝐴↑2) / 2) ∈ ℂ) → (1 + -((𝐴↑2) / 2)) = (1 − ((𝐴↑2) / 2)))
447, 42, 43sylancr 588 . . . . . 6 (𝐴 ∈ ℂ → (1 + -((𝐴↑2) / 2)) = (1 − ((𝐴↑2) / 2)))
4541, 44eqtrd 2772 . . . . 5 (𝐴 ∈ ℂ → (1 + (((i · 𝐴)↑2) / 2)) = (1 − ((𝐴↑2) / 2)))
46 mulexp 14054 . . . . . . . . . . 11 ((i ∈ ℂ ∧ 𝐴 ∈ ℂ ∧ 3 ∈ ℕ0) → ((i · 𝐴)↑3) = ((i↑3) · (𝐴↑3)))
471, 12, 46mp3an13 1455 . . . . . . . . . 10 (𝐴 ∈ ℂ → ((i · 𝐴)↑3) = ((i↑3) · (𝐴↑3)))
48 i3 14156 . . . . . . . . . . 11 (i↑3) = -i
4948oveq1i 7370 . . . . . . . . . 10 ((i↑3) · (𝐴↑3)) = (-i · (𝐴↑3))
5047, 49eqtrdi 2788 . . . . . . . . 9 (𝐴 ∈ ℂ → ((i · 𝐴)↑3) = (-i · (𝐴↑3)))
5150oveq1d 7375 . . . . . . . 8 (𝐴 ∈ ℂ → (((i · 𝐴)↑3) / 6) = ((-i · (𝐴↑3)) / 6))
52 expcl 14032 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝐴↑3) ∈ ℂ)
5312, 52mpan2 692 . . . . . . . . 9 (𝐴 ∈ ℂ → (𝐴↑3) ∈ ℂ)
54 negicn 11385 . . . . . . . . . 10 -i ∈ ℂ
5515, 18pm3.2i 470 . . . . . . . . . 10 (6 ∈ ℂ ∧ 6 ≠ 0)
56 divass 11818 . . . . . . . . . 10 ((-i ∈ ℂ ∧ (𝐴↑3) ∈ ℂ ∧ (6 ∈ ℂ ∧ 6 ≠ 0)) → ((-i · (𝐴↑3)) / 6) = (-i · ((𝐴↑3) / 6)))
5754, 55, 56mp3an13 1455 . . . . . . . . 9 ((𝐴↑3) ∈ ℂ → ((-i · (𝐴↑3)) / 6) = (-i · ((𝐴↑3) / 6)))
5853, 57syl 17 . . . . . . . 8 (𝐴 ∈ ℂ → ((-i · (𝐴↑3)) / 6) = (-i · ((𝐴↑3) / 6)))
59 divcl 11806 . . . . . . . . . . 11 (((𝐴↑3) ∈ ℂ ∧ 6 ∈ ℂ ∧ 6 ≠ 0) → ((𝐴↑3) / 6) ∈ ℂ)
6015, 18, 59mp3an23 1456 . . . . . . . . . 10 ((𝐴↑3) ∈ ℂ → ((𝐴↑3) / 6) ∈ ℂ)
6153, 60syl 17 . . . . . . . . 9 (𝐴 ∈ ℂ → ((𝐴↑3) / 6) ∈ ℂ)
62 mulneg12 11579 . . . . . . . . 9 ((i ∈ ℂ ∧ ((𝐴↑3) / 6) ∈ ℂ) → (-i · ((𝐴↑3) / 6)) = (i · -((𝐴↑3) / 6)))
631, 61, 62sylancr 588 . . . . . . . 8 (𝐴 ∈ ℂ → (-i · ((𝐴↑3) / 6)) = (i · -((𝐴↑3) / 6)))
6451, 58, 633eqtrd 2776 . . . . . . 7 (𝐴 ∈ ℂ → (((i · 𝐴)↑3) / 6) = (i · -((𝐴↑3) / 6)))
6564oveq2d 7376 . . . . . 6 (𝐴 ∈ ℂ → ((i · 𝐴) + (((i · 𝐴)↑3) / 6)) = ((i · 𝐴) + (i · -((𝐴↑3) / 6))))
6661negcld 11483 . . . . . . 7 (𝐴 ∈ ℂ → -((𝐴↑3) / 6) ∈ ℂ)
67 adddi 11118 . . . . . . . 8 ((i ∈ ℂ ∧ 𝐴 ∈ ℂ ∧ -((𝐴↑3) / 6) ∈ ℂ) → (i · (𝐴 + -((𝐴↑3) / 6))) = ((i · 𝐴) + (i · -((𝐴↑3) / 6))))
681, 67mp3an1 1451 . . . . . . 7 ((𝐴 ∈ ℂ ∧ -((𝐴↑3) / 6) ∈ ℂ) → (i · (𝐴 + -((𝐴↑3) / 6))) = ((i · 𝐴) + (i · -((𝐴↑3) / 6))))
6966, 68mpdan 688 . . . . . 6 (𝐴 ∈ ℂ → (i · (𝐴 + -((𝐴↑3) / 6))) = ((i · 𝐴) + (i · -((𝐴↑3) / 6))))
70 negsub 11433 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ ((𝐴↑3) / 6) ∈ ℂ) → (𝐴 + -((𝐴↑3) / 6)) = (𝐴 − ((𝐴↑3) / 6)))
7161, 70mpdan 688 . . . . . . 7 (𝐴 ∈ ℂ → (𝐴 + -((𝐴↑3) / 6)) = (𝐴 − ((𝐴↑3) / 6)))
7271oveq2d 7376 . . . . . 6 (𝐴 ∈ ℂ → (i · (𝐴 + -((𝐴↑3) / 6))) = (i · (𝐴 − ((𝐴↑3) / 6))))
7365, 69, 723eqtr2d 2778 . . . . 5 (𝐴 ∈ ℂ → ((i · 𝐴) + (((i · 𝐴)↑3) / 6)) = (i · (𝐴 − ((𝐴↑3) / 6))))
7445, 73oveq12d 7378 . . . 4 (𝐴 ∈ ℂ → ((1 + (((i · 𝐴)↑2) / 2)) + ((i · 𝐴) + (((i · 𝐴)↑3) / 6))) = ((1 − ((𝐴↑2) / 2)) + (i · (𝐴 − ((𝐴↑3) / 6)))))
7522, 24, 743eqtrd 2776 . . 3 (𝐴 ∈ ℂ → (((1 + (i · 𝐴)) + (((i · 𝐴)↑2) / 2)) + (((i · 𝐴)↑3) / 6)) = ((1 − ((𝐴↑2) / 2)) + (i · (𝐴 − ((𝐴↑3) / 6)))))
7675oveq1d 7375 . 2 (𝐴 ∈ ℂ → ((((1 + (i · 𝐴)) + (((i · 𝐴)↑2) / 2)) + (((i · 𝐴)↑3) / 6)) + Σ𝑘 ∈ (ℤ‘4)(𝐹𝑘)) = (((1 − ((𝐴↑2) / 2)) + (i · (𝐴 − ((𝐴↑3) / 6)))) + Σ𝑘 ∈ (ℤ‘4)(𝐹𝑘)))
776, 76eqtrd 2772 1 (𝐴 ∈ ℂ → (exp‘(i · 𝐴)) = (((1 − ((𝐴↑2) / 2)) + (i · (𝐴 − ((𝐴↑3) / 6)))) + Σ𝑘 ∈ (ℤ‘4)(𝐹𝑘)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1542  wcel 2114  wne 2933  cmpt 5167  cfv 6492  (class class class)co 7360  cc 11027  0cc0 11029  1c1 11030  ici 11031   + caddc 11032   · cmul 11034  cmin 11368  -cneg 11369   / cdiv 11798  2c2 12227  3c3 12228  4c4 12229  6c6 12231  0cn0 12428  cuz 12779  cexp 14014  !cfa 14226  Σcsu 15639  expce 16017
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-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-pm 8769  df-en 8887  df-dom 8888  df-sdom 8889  df-fin 8890  df-sup 9348  df-inf 9349  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-n0 12429  df-z 12516  df-uz 12780  df-rp 12934  df-ico 13295  df-fz 13453  df-fzo 13600  df-fl 13742  df-seq 13955  df-exp 14015  df-fac 14227  df-hash 14284  df-shft 15020  df-cj 15052  df-re 15053  df-im 15054  df-sqrt 15188  df-abs 15189  df-limsup 15424  df-clim 15441  df-rlim 15442  df-sum 15640  df-ef 16023
This theorem is referenced by:  resin4p  16096  recos4p  16097
  Copyright terms: Public domain W3C validator