ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  efaddlem GIF version

Theorem efaddlem 12171
Description: Lemma for efadd 12172 (exponential function addition law). (Contributed by Mario Carneiro, 29-Apr-2014.)
Hypotheses
Ref Expression
efadd.1 𝐹 = (𝑛 ∈ ℕ0 ↦ ((𝐴𝑛) / (!‘𝑛)))
efadd.2 𝐺 = (𝑛 ∈ ℕ0 ↦ ((𝐵𝑛) / (!‘𝑛)))
efadd.3 𝐻 = (𝑛 ∈ ℕ0 ↦ (((𝐴 + 𝐵)↑𝑛) / (!‘𝑛)))
efadd.4 (𝜑𝐴 ∈ ℂ)
efadd.5 (𝜑𝐵 ∈ ℂ)
Assertion
Ref Expression
efaddlem (𝜑 → (exp‘(𝐴 + 𝐵)) = ((exp‘𝐴) · (exp‘𝐵)))
Distinct variable groups:   𝐴,𝑛   𝐵,𝑛
Allowed substitution hints:   𝜑(𝑛)   𝐹(𝑛)   𝐺(𝑛)   𝐻(𝑛)

Proof of Theorem efaddlem
Dummy variables 𝑗 𝑘 𝑚 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 efadd.4 . . . 4 (𝜑𝐴 ∈ ℂ)
2 efadd.5 . . . 4 (𝜑𝐵 ∈ ℂ)
31, 2addcld 8154 . . 3 (𝜑 → (𝐴 + 𝐵) ∈ ℂ)
4 efadd.3 . . . 4 𝐻 = (𝑛 ∈ ℕ0 ↦ (((𝐴 + 𝐵)↑𝑛) / (!‘𝑛)))
54efcvg 12163 . . 3 ((𝐴 + 𝐵) ∈ ℂ → seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)))
63, 5syl 14 . 2 (𝜑 → seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)))
7 efadd.1 . . . . . 6 𝐹 = (𝑛 ∈ ℕ0 ↦ ((𝐴𝑛) / (!‘𝑛)))
87eftvalcn 12154 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (𝐹𝑗) = ((𝐴𝑗) / (!‘𝑗)))
91, 8sylan 283 . . . 4 ((𝜑𝑗 ∈ ℕ0) → (𝐹𝑗) = ((𝐴𝑗) / (!‘𝑗)))
10 absexp 11576 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (abs‘(𝐴𝑗)) = ((abs‘𝐴)↑𝑗))
111, 10sylan 283 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (abs‘(𝐴𝑗)) = ((abs‘𝐴)↑𝑗))
12 faccl 10944 . . . . . . . 8 (𝑗 ∈ ℕ0 → (!‘𝑗) ∈ ℕ)
1312adantl 277 . . . . . . 7 ((𝜑𝑗 ∈ ℕ0) → (!‘𝑗) ∈ ℕ)
14 nnre 9105 . . . . . . . 8 ((!‘𝑗) ∈ ℕ → (!‘𝑗) ∈ ℝ)
15 nnnn0 9364 . . . . . . . . 9 ((!‘𝑗) ∈ ℕ → (!‘𝑗) ∈ ℕ0)
1615nn0ge0d 9413 . . . . . . . 8 ((!‘𝑗) ∈ ℕ → 0 ≤ (!‘𝑗))
1714, 16absidd 11664 . . . . . . 7 ((!‘𝑗) ∈ ℕ → (abs‘(!‘𝑗)) = (!‘𝑗))
1813, 17syl 14 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (abs‘(!‘𝑗)) = (!‘𝑗))
1911, 18oveq12d 6012 . . . . 5 ((𝜑𝑗 ∈ ℕ0) → ((abs‘(𝐴𝑗)) / (abs‘(!‘𝑗))) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
20 expcl 10766 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (𝐴𝑗) ∈ ℂ)
211, 20sylan 283 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (𝐴𝑗) ∈ ℂ)
2213nncnd 9112 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (!‘𝑗) ∈ ℂ)
2313nnap0d 9144 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (!‘𝑗) # 0)
2421, 22, 23absdivapd 11692 . . . . 5 ((𝜑𝑗 ∈ ℕ0) → (abs‘((𝐴𝑗) / (!‘𝑗))) = ((abs‘(𝐴𝑗)) / (abs‘(!‘𝑗))))
251abscld 11678 . . . . . . 7 (𝜑 → (abs‘𝐴) ∈ ℝ)
2625recnd 8163 . . . . . 6 (𝜑 → (abs‘𝐴) ∈ ℂ)
27 eqid 2229 . . . . . . 7 (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛))) = (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))
2827eftvalcn 12154 . . . . . 6 (((abs‘𝐴) ∈ ℂ ∧ 𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
2926, 28sylan 283 . . . . 5 ((𝜑𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
3019, 24, 293eqtr4rd 2273 . . . 4 ((𝜑𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (abs‘((𝐴𝑗) / (!‘𝑗))))
31 eftcl 12151 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → ((𝐴𝑗) / (!‘𝑗)) ∈ ℂ)
321, 31sylan 283 . . . 4 ((𝜑𝑗 ∈ ℕ0) → ((𝐴𝑗) / (!‘𝑗)) ∈ ℂ)
33 efadd.2 . . . . . 6 𝐺 = (𝑛 ∈ ℕ0 ↦ ((𝐵𝑛) / (!‘𝑛)))
3433eftvalcn 12154 . . . . 5 ((𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝐺𝑘) = ((𝐵𝑘) / (!‘𝑘)))
352, 34sylan 283 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝐺𝑘) = ((𝐵𝑘) / (!‘𝑘)))
36 eftcl 12151 . . . . 5 ((𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((𝐵𝑘) / (!‘𝑘)) ∈ ℂ)
372, 36sylan 283 . . . 4 ((𝜑𝑘 ∈ ℕ0) → ((𝐵𝑘) / (!‘𝑘)) ∈ ℂ)
384eftvalcn 12154 . . . . . 6 (((𝐴 + 𝐵) ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝐻𝑘) = (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)))
393, 38sylan 283 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) = (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)))
401adantr 276 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → 𝐴 ∈ ℂ)
412adantr 276 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → 𝐵 ∈ ℂ)
42 simpr 110 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
43 binom 11981 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((𝐴 + 𝐵)↑𝑘) = Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
4440, 41, 42, 43syl3anc 1271 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → ((𝐴 + 𝐵)↑𝑘) = Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
4544oveq1d 6009 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)) = (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)))
46 0zd 9446 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → 0 ∈ ℤ)
4742nn0zd 9555 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℤ)
4846, 47fzfigd 10640 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (0...𝑘) ∈ Fin)
49 faccl 10944 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (!‘𝑘) ∈ ℕ)
5049adantl 277 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℕ)
5150nncnd 9112 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℂ)
52 bccl2 10977 . . . . . . . . . . 11 (𝑗 ∈ (0...𝑘) → (𝑘C𝑗) ∈ ℕ)
5352adantl 277 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) ∈ ℕ)
5453nncnd 9112 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) ∈ ℂ)
551ad2antrr 488 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝐴 ∈ ℂ)
56 fznn0sub 10241 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑘) → (𝑘𝑗) ∈ ℕ0)
5756adantl 277 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘𝑗) ∈ ℕ0)
5855, 57expcld 10882 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑(𝑘𝑗)) ∈ ℂ)
592ad2antrr 488 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝐵 ∈ ℂ)
60 elfznn0 10298 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑘) → 𝑗 ∈ ℕ0)
6160adantl 277 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑗 ∈ ℕ0)
6259, 61expcld 10882 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐵𝑗) ∈ ℂ)
6358, 62mulcld 8155 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑(𝑘𝑗)) · (𝐵𝑗)) ∈ ℂ)
6454, 63mulcld 8155 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) ∈ ℂ)
6550nnap0d 9144 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (!‘𝑘) # 0)
6648, 51, 64, 65fsumdivapc 11947 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)))
6755, 61expcld 10882 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴𝑗) ∈ ℂ)
6861, 12syl 14 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ∈ ℕ)
6968nncnd 9112 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ∈ ℂ)
7068nnap0d 9144 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) # 0)
7167, 69, 70divclapd 8925 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴𝑗) / (!‘𝑗)) ∈ ℂ)
7233eftvalcn 12154 . . . . . . . . . . . 12 ((𝐵 ∈ ℂ ∧ (𝑘𝑗) ∈ ℕ0) → (𝐺‘(𝑘𝑗)) = ((𝐵↑(𝑘𝑗)) / (!‘(𝑘𝑗))))
7359, 57, 72syl2anc 411 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘𝑗)) = ((𝐵↑(𝑘𝑗)) / (!‘(𝑘𝑗))))
7459, 57expcld 10882 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐵↑(𝑘𝑗)) ∈ ℂ)
75 faccl 10944 . . . . . . . . . . . . . 14 ((𝑘𝑗) ∈ ℕ0 → (!‘(𝑘𝑗)) ∈ ℕ)
7657, 75syl 14 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘𝑗)) ∈ ℕ)
7776nncnd 9112 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘𝑗)) ∈ ℂ)
7876nnap0d 9144 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘𝑗)) # 0)
7974, 77, 78divclapd 8925 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐵↑(𝑘𝑗)) / (!‘(𝑘𝑗))) ∈ ℂ)
8073, 79eqeltrd 2306 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘𝑗)) ∈ ℂ)
8171, 80mulcld 8155 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))) ∈ ℂ)
82 oveq2 6002 . . . . . . . . . . 11 (𝑗 = ((0 + 𝑘) − 𝑚) → (𝐴𝑗) = (𝐴↑((0 + 𝑘) − 𝑚)))
83 fveq2 5623 . . . . . . . . . . 11 (𝑗 = ((0 + 𝑘) − 𝑚) → (!‘𝑗) = (!‘((0 + 𝑘) − 𝑚)))
8482, 83oveq12d 6012 . . . . . . . . . 10 (𝑗 = ((0 + 𝑘) − 𝑚) → ((𝐴𝑗) / (!‘𝑗)) = ((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))))
85 oveq2 6002 . . . . . . . . . . 11 (𝑗 = ((0 + 𝑘) − 𝑚) → (𝑘𝑗) = (𝑘 − ((0 + 𝑘) − 𝑚)))
8685fveq2d 5627 . . . . . . . . . 10 (𝑗 = ((0 + 𝑘) − 𝑚) → (𝐺‘(𝑘𝑗)) = (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
8784, 86oveq12d 6012 . . . . . . . . 9 (𝑗 = ((0 + 𝑘) − 𝑚) → (((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))) = (((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
8846, 47, 81, 87fisumrev2 11943 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
8933eftvalcn 12154 . . . . . . . . . . . . . 14 ((𝐵 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (𝐺𝑗) = ((𝐵𝑗) / (!‘𝑗)))
9059, 61, 89syl2anc 411 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺𝑗) = ((𝐵𝑗) / (!‘𝑗)))
9190oveq2d 6010 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · (𝐺𝑗)) = (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · ((𝐵𝑗) / (!‘𝑗))))
9276, 68nnmulcld 9147 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘𝑗)) · (!‘𝑗)) ∈ ℕ)
9392nncnd 9112 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘𝑗)) · (!‘𝑗)) ∈ ℂ)
9477, 69, 78, 70mulap0d 8793 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘𝑗)) · (!‘𝑗)) # 0)
9563, 93, 94divrecap2d 8929 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘𝑗)) · (𝐵𝑗)) / ((!‘(𝑘𝑗)) · (!‘𝑗))) = ((1 / ((!‘(𝑘𝑗)) · (!‘𝑗))) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
9658, 77, 62, 69, 78, 70divmuldivapd 8967 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · ((𝐵𝑗) / (!‘𝑗))) = (((𝐴↑(𝑘𝑗)) · (𝐵𝑗)) / ((!‘(𝑘𝑗)) · (!‘𝑗))))
97 bcval2 10959 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ (0...𝑘) → (𝑘C𝑗) = ((!‘𝑘) / ((!‘(𝑘𝑗)) · (!‘𝑗))))
9897adantl 277 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) = ((!‘𝑘) / ((!‘(𝑘𝑗)) · (!‘𝑗))))
9998oveq1d 6009 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) / (!‘𝑘)) = (((!‘𝑘) / ((!‘(𝑘𝑗)) · (!‘𝑗))) / (!‘𝑘)))
10051adantr 276 . . . . . . . . . . . . . . . . 17 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑘) ∈ ℂ)
10165adantr 276 . . . . . . . . . . . . . . . . 17 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑘) # 0)
102100, 93, 100, 94, 101divdiv32apd 8951 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / ((!‘(𝑘𝑗)) · (!‘𝑗))) / (!‘𝑘)) = (((!‘𝑘) / (!‘𝑘)) / ((!‘(𝑘𝑗)) · (!‘𝑗))))
103100, 101dividapd 8921 . . . . . . . . . . . . . . . . 17 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘𝑘) / (!‘𝑘)) = 1)
104103oveq1d 6009 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / (!‘𝑘)) / ((!‘(𝑘𝑗)) · (!‘𝑗))) = (1 / ((!‘(𝑘𝑗)) · (!‘𝑗))))
105102, 104eqtrd 2262 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / ((!‘(𝑘𝑗)) · (!‘𝑗))) / (!‘𝑘)) = (1 / ((!‘(𝑘𝑗)) · (!‘𝑗))))
10699, 105eqtrd 2262 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) / (!‘𝑘)) = (1 / ((!‘(𝑘𝑗)) · (!‘𝑗))))
107106oveq1d 6009 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) = ((1 / ((!‘(𝑘𝑗)) · (!‘𝑗))) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
10895, 96, 1073eqtr4rd 2273 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) = (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · ((𝐵𝑗) / (!‘𝑗))))
10991, 108eqtr4d 2265 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · (𝐺𝑗)) = (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
110 nn0cn 9367 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
111110ad2antlr 489 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑘 ∈ ℂ)
112111addlidd 8284 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (0 + 𝑘) = 𝑘)
113112oveq1d 6009 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((0 + 𝑘) − 𝑗) = (𝑘𝑗))
114113oveq2d 6010 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑((0 + 𝑘) − 𝑗)) = (𝐴↑(𝑘𝑗)))
115113fveq2d 5627 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘((0 + 𝑘) − 𝑗)) = (!‘(𝑘𝑗)))
116114, 115oveq12d 6012 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) = ((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))))
117113oveq2d 6010 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − ((0 + 𝑘) − 𝑗)) = (𝑘 − (𝑘𝑗)))
118 nn0cn 9367 . . . . . . . . . . . . . . . 16 (𝑗 ∈ ℕ0𝑗 ∈ ℂ)
11961, 118syl 14 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑗 ∈ ℂ)
120111, 119nncand 8450 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − (𝑘𝑗)) = 𝑗)
121117, 120eqtrd 2262 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − ((0 + 𝑘) − 𝑗)) = 𝑗)
122121fveq2d 5627 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗))) = (𝐺𝑗))
123116, 122oveq12d 6012 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · (𝐺𝑗)))
12454, 63, 100, 101div23apd 8963 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
125109, 123, 1243eqtr4rd 2273 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))))
126125sumeq2dv 11865 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))))
127 oveq2 6002 . . . . . . . . . . . . 13 (𝑗 = 𝑚 → ((0 + 𝑘) − 𝑗) = ((0 + 𝑘) − 𝑚))
128127oveq2d 6010 . . . . . . . . . . . 12 (𝑗 = 𝑚 → (𝐴↑((0 + 𝑘) − 𝑗)) = (𝐴↑((0 + 𝑘) − 𝑚)))
129127fveq2d 5627 . . . . . . . . . . . 12 (𝑗 = 𝑚 → (!‘((0 + 𝑘) − 𝑗)) = (!‘((0 + 𝑘) − 𝑚)))
130128, 129oveq12d 6012 . . . . . . . . . . 11 (𝑗 = 𝑚 → ((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) = ((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))))
131127oveq2d 6010 . . . . . . . . . . . 12 (𝑗 = 𝑚 → (𝑘 − ((0 + 𝑘) − 𝑗)) = (𝑘 − ((0 + 𝑘) − 𝑚)))
132131fveq2d 5627 . . . . . . . . . . 11 (𝑗 = 𝑚 → (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗))) = (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
133130, 132oveq12d 6012 . . . . . . . . . 10 (𝑗 = 𝑚 → (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = (((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
134133cbvsumv 11858 . . . . . . . . 9 Σ𝑗 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
135126, 134eqtrdi 2278 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
13688, 135eqtr4d 2265 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))) = Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)))
13766, 136eqtr4d 2265 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))))
13845, 137eqtrd 2262 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))))
13939, 138eqtrd 2262 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) = Σ𝑗 ∈ (0...𝑘)(((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))))
14027efcllem 12156 . . . . 5 ((abs‘𝐴) ∈ ℂ → seq0( + , (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))) ∈ dom ⇝ )
14126, 140syl 14 . . . 4 (𝜑 → seq0( + , (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))) ∈ dom ⇝ )
14233efcllem 12156 . . . . 5 (𝐵 ∈ ℂ → seq0( + , 𝐺) ∈ dom ⇝ )
1432, 142syl 14 . . . 4 (𝜑 → seq0( + , 𝐺) ∈ dom ⇝ )
1447efcllem 12156 . . . . 5 (𝐴 ∈ ℂ → seq0( + , 𝐹) ∈ dom ⇝ )
1451, 144syl 14 . . . 4 (𝜑 → seq0( + , 𝐹) ∈ dom ⇝ )
1469, 30, 32, 35, 37, 139, 141, 143, 145mertensabs 12034 . . 3 (𝜑 → seq0( + , 𝐻) ⇝ (Σ𝑗 ∈ ℕ0 ((𝐴𝑗) / (!‘𝑗)) · Σ𝑘 ∈ ℕ0 ((𝐵𝑘) / (!‘𝑘))))
147 efval 12158 . . . . 5 (𝐴 ∈ ℂ → (exp‘𝐴) = Σ𝑗 ∈ ℕ0 ((𝐴𝑗) / (!‘𝑗)))
1481, 147syl 14 . . . 4 (𝜑 → (exp‘𝐴) = Σ𝑗 ∈ ℕ0 ((𝐴𝑗) / (!‘𝑗)))
149 efval 12158 . . . . 5 (𝐵 ∈ ℂ → (exp‘𝐵) = Σ𝑘 ∈ ℕ0 ((𝐵𝑘) / (!‘𝑘)))
1502, 149syl 14 . . . 4 (𝜑 → (exp‘𝐵) = Σ𝑘 ∈ ℕ0 ((𝐵𝑘) / (!‘𝑘)))
151148, 150oveq12d 6012 . . 3 (𝜑 → ((exp‘𝐴) · (exp‘𝐵)) = (Σ𝑗 ∈ ℕ0 ((𝐴𝑗) / (!‘𝑗)) · Σ𝑘 ∈ ℕ0 ((𝐵𝑘) / (!‘𝑘))))
152146, 151breqtrrd 4110 . 2 (𝜑 → seq0( + , 𝐻) ⇝ ((exp‘𝐴) · (exp‘𝐵)))
153 climuni 11790 . 2 ((seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)) ∧ seq0( + , 𝐻) ⇝ ((exp‘𝐴) · (exp‘𝐵))) → (exp‘(𝐴 + 𝐵)) = ((exp‘𝐴) · (exp‘𝐵)))
1546, 152, 153syl2anc 411 1 (𝜑 → (exp‘(𝐴 + 𝐵)) = ((exp‘𝐴) · (exp‘𝐵)))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104   = wceq 1395  wcel 2200   class class class wbr 4082  cmpt 4144  dom cdm 4716  cfv 5314  (class class class)co 5994  cc 7985  0cc0 7987  1c1 7988   + caddc 7990   · cmul 7992  cmin 8305   # cap 8716   / cdiv 8807  cn 9098  0cn0 9357  ...cfz 10192  seqcseq 10656  cexp 10747  !cfa 10934  Ccbc 10956  abscabs 11494  cli 11775  Σcsu 11850  expce 12139
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 617  ax-in2 618  ax-io 714  ax-5 1493  ax-7 1494  ax-gen 1495  ax-ie1 1539  ax-ie2 1540  ax-8 1550  ax-10 1551  ax-11 1552  ax-i12 1553  ax-bndl 1555  ax-4 1556  ax-17 1572  ax-i9 1576  ax-ial 1580  ax-i5r 1581  ax-13 2202  ax-14 2203  ax-ext 2211  ax-coll 4198  ax-sep 4201  ax-nul 4209  ax-pow 4257  ax-pr 4292  ax-un 4521  ax-setind 4626  ax-iinf 4677  ax-cnex 8078  ax-resscn 8079  ax-1cn 8080  ax-1re 8081  ax-icn 8082  ax-addcl 8083  ax-addrcl 8084  ax-mulcl 8085  ax-mulrcl 8086  ax-addcom 8087  ax-mulcom 8088  ax-addass 8089  ax-mulass 8090  ax-distr 8091  ax-i2m1 8092  ax-0lt1 8093  ax-1rid 8094  ax-0id 8095  ax-rnegex 8096  ax-precex 8097  ax-cnre 8098  ax-pre-ltirr 8099  ax-pre-ltwlin 8100  ax-pre-lttrn 8101  ax-pre-apti 8102  ax-pre-ltadd 8103  ax-pre-mulgt0 8104  ax-pre-mulext 8105  ax-arch 8106  ax-caucvg 8107
This theorem depends on definitions:  df-bi 117  df-dc 840  df-3or 1003  df-3an 1004  df-tru 1398  df-fal 1401  df-nf 1507  df-sb 1809  df-eu 2080  df-mo 2081  df-clab 2216  df-cleq 2222  df-clel 2225  df-nfc 2361  df-ne 2401  df-nel 2496  df-ral 2513  df-rex 2514  df-reu 2515  df-rmo 2516  df-rab 2517  df-v 2801  df-sbc 3029  df-csb 3125  df-dif 3199  df-un 3201  df-in 3203  df-ss 3210  df-nul 3492  df-if 3603  df-pw 3651  df-sn 3672  df-pr 3673  df-op 3675  df-uni 3888  df-int 3923  df-iun 3966  df-disj 4059  df-br 4083  df-opab 4145  df-mpt 4146  df-tr 4182  df-id 4381  df-po 4384  df-iso 4385  df-iord 4454  df-on 4456  df-ilim 4457  df-suc 4459  df-iom 4680  df-xp 4722  df-rel 4723  df-cnv 4724  df-co 4725  df-dm 4726  df-rn 4727  df-res 4728  df-ima 4729  df-iota 5274  df-fun 5316  df-fn 5317  df-f 5318  df-f1 5319  df-fo 5320  df-f1o 5321  df-fv 5322  df-isom 5323  df-riota 5947  df-ov 5997  df-oprab 5998  df-mpo 5999  df-1st 6276  df-2nd 6277  df-recs 6441  df-irdg 6506  df-frec 6527  df-1o 6552  df-oadd 6556  df-er 6670  df-en 6878  df-dom 6879  df-fin 6880  df-sup 7139  df-pnf 8171  df-mnf 8172  df-xr 8173  df-ltxr 8174  df-le 8175  df-sub 8307  df-neg 8308  df-reap 8710  df-ap 8717  df-div 8808  df-inn 9099  df-2 9157  df-3 9158  df-4 9159  df-n0 9358  df-z 9435  df-uz 9711  df-q 9803  df-rp 9838  df-ico 10078  df-fz 10193  df-fzo 10327  df-seqfrec 10657  df-exp 10748  df-fac 10935  df-bc 10957  df-ihash 10985  df-cj 11339  df-re 11340  df-im 11341  df-rsqrt 11495  df-abs 11496  df-clim 11776  df-sumdc 11851  df-ef 12145
This theorem is referenced by:  efadd  12172
  Copyright terms: Public domain W3C validator