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

Theorem efaddlem 11820
Description: Lemma for efadd 11821 (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 8041 . . 3 (𝜑 → (𝐴 + 𝐵) ∈ ℂ)
4 efadd.3 . . . 4 𝐻 = (𝑛 ∈ ℕ0 ↦ (((𝐴 + 𝐵)↑𝑛) / (!‘𝑛)))
54efcvg 11812 . . 3 ((𝐴 + 𝐵) ∈ ℂ → seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)))
63, 5syl 14 . 2 (𝜑 → seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)))
7 efadd.1 . . . . . 6 𝐹 = (𝑛 ∈ ℕ0 ↦ ((𝐴𝑛) / (!‘𝑛)))
87eftvalcn 11803 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (𝐹𝑗) = ((𝐴𝑗) / (!‘𝑗)))
91, 8sylan 283 . . . 4 ((𝜑𝑗 ∈ ℕ0) → (𝐹𝑗) = ((𝐴𝑗) / (!‘𝑗)))
10 absexp 11226 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (abs‘(𝐴𝑗)) = ((abs‘𝐴)↑𝑗))
111, 10sylan 283 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (abs‘(𝐴𝑗)) = ((abs‘𝐴)↑𝑗))
12 faccl 10809 . . . . . . . 8 (𝑗 ∈ ℕ0 → (!‘𝑗) ∈ ℕ)
1312adantl 277 . . . . . . 7 ((𝜑𝑗 ∈ ℕ0) → (!‘𝑗) ∈ ℕ)
14 nnre 8991 . . . . . . . 8 ((!‘𝑗) ∈ ℕ → (!‘𝑗) ∈ ℝ)
15 nnnn0 9250 . . . . . . . . 9 ((!‘𝑗) ∈ ℕ → (!‘𝑗) ∈ ℕ0)
1615nn0ge0d 9299 . . . . . . . 8 ((!‘𝑗) ∈ ℕ → 0 ≤ (!‘𝑗))
1714, 16absidd 11314 . . . . . . 7 ((!‘𝑗) ∈ ℕ → (abs‘(!‘𝑗)) = (!‘𝑗))
1813, 17syl 14 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (abs‘(!‘𝑗)) = (!‘𝑗))
1911, 18oveq12d 5937 . . . . 5 ((𝜑𝑗 ∈ ℕ0) → ((abs‘(𝐴𝑗)) / (abs‘(!‘𝑗))) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
20 expcl 10631 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (𝐴𝑗) ∈ ℂ)
211, 20sylan 283 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (𝐴𝑗) ∈ ℂ)
2213nncnd 8998 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (!‘𝑗) ∈ ℂ)
2313nnap0d 9030 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (!‘𝑗) # 0)
2421, 22, 23absdivapd 11342 . . . . 5 ((𝜑𝑗 ∈ ℕ0) → (abs‘((𝐴𝑗) / (!‘𝑗))) = ((abs‘(𝐴𝑗)) / (abs‘(!‘𝑗))))
251abscld 11328 . . . . . . 7 (𝜑 → (abs‘𝐴) ∈ ℝ)
2625recnd 8050 . . . . . 6 (𝜑 → (abs‘𝐴) ∈ ℂ)
27 eqid 2193 . . . . . . 7 (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛))) = (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))
2827eftvalcn 11803 . . . . . 6 (((abs‘𝐴) ∈ ℂ ∧ 𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
2926, 28sylan 283 . . . . 5 ((𝜑𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
3019, 24, 293eqtr4rd 2237 . . . 4 ((𝜑𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (abs‘((𝐴𝑗) / (!‘𝑗))))
31 eftcl 11800 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → ((𝐴𝑗) / (!‘𝑗)) ∈ ℂ)
321, 31sylan 283 . . . 4 ((𝜑𝑗 ∈ ℕ0) → ((𝐴𝑗) / (!‘𝑗)) ∈ ℂ)
33 efadd.2 . . . . . 6 𝐺 = (𝑛 ∈ ℕ0 ↦ ((𝐵𝑛) / (!‘𝑛)))
3433eftvalcn 11803 . . . . 5 ((𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝐺𝑘) = ((𝐵𝑘) / (!‘𝑘)))
352, 34sylan 283 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝐺𝑘) = ((𝐵𝑘) / (!‘𝑘)))
36 eftcl 11800 . . . . 5 ((𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((𝐵𝑘) / (!‘𝑘)) ∈ ℂ)
372, 36sylan 283 . . . 4 ((𝜑𝑘 ∈ ℕ0) → ((𝐵𝑘) / (!‘𝑘)) ∈ ℂ)
384eftvalcn 11803 . . . . . 6 (((𝐴 + 𝐵) ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝐻𝑘) = (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)))
393, 38sylan 283 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) = (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)))
401adantr 276 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → 𝐴 ∈ ℂ)
412adantr 276 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → 𝐵 ∈ ℂ)
42 simpr 110 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
43 binom 11630 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((𝐴 + 𝐵)↑𝑘) = Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
4440, 41, 42, 43syl3anc 1249 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → ((𝐴 + 𝐵)↑𝑘) = Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
4544oveq1d 5934 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)) = (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)))
46 0zd 9332 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → 0 ∈ ℤ)
4742nn0zd 9440 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℤ)
4846, 47fzfigd 10505 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (0...𝑘) ∈ Fin)
49 faccl 10809 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (!‘𝑘) ∈ ℕ)
5049adantl 277 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℕ)
5150nncnd 8998 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℂ)
52 bccl2 10842 . . . . . . . . . . 11 (𝑗 ∈ (0...𝑘) → (𝑘C𝑗) ∈ ℕ)
5352adantl 277 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) ∈ ℕ)
5453nncnd 8998 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) ∈ ℂ)
551ad2antrr 488 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝐴 ∈ ℂ)
56 fznn0sub 10126 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑘) → (𝑘𝑗) ∈ ℕ0)
5756adantl 277 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘𝑗) ∈ ℕ0)
5855, 57expcld 10747 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑(𝑘𝑗)) ∈ ℂ)
592ad2antrr 488 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝐵 ∈ ℂ)
60 elfznn0 10183 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑘) → 𝑗 ∈ ℕ0)
6160adantl 277 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑗 ∈ ℕ0)
6259, 61expcld 10747 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐵𝑗) ∈ ℂ)
6358, 62mulcld 8042 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑(𝑘𝑗)) · (𝐵𝑗)) ∈ ℂ)
6454, 63mulcld 8042 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) ∈ ℂ)
6550nnap0d 9030 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (!‘𝑘) # 0)
6648, 51, 64, 65fsumdivapc 11596 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)))
6755, 61expcld 10747 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴𝑗) ∈ ℂ)
6861, 12syl 14 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ∈ ℕ)
6968nncnd 8998 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ∈ ℂ)
7068nnap0d 9030 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) # 0)
7167, 69, 70divclapd 8811 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴𝑗) / (!‘𝑗)) ∈ ℂ)
7233eftvalcn 11803 . . . . . . . . . . . 12 ((𝐵 ∈ ℂ ∧ (𝑘𝑗) ∈ ℕ0) → (𝐺‘(𝑘𝑗)) = ((𝐵↑(𝑘𝑗)) / (!‘(𝑘𝑗))))
7359, 57, 72syl2anc 411 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘𝑗)) = ((𝐵↑(𝑘𝑗)) / (!‘(𝑘𝑗))))
7459, 57expcld 10747 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐵↑(𝑘𝑗)) ∈ ℂ)
75 faccl 10809 . . . . . . . . . . . . . 14 ((𝑘𝑗) ∈ ℕ0 → (!‘(𝑘𝑗)) ∈ ℕ)
7657, 75syl 14 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘𝑗)) ∈ ℕ)
7776nncnd 8998 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘𝑗)) ∈ ℂ)
7876nnap0d 9030 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘𝑗)) # 0)
7974, 77, 78divclapd 8811 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐵↑(𝑘𝑗)) / (!‘(𝑘𝑗))) ∈ ℂ)
8073, 79eqeltrd 2270 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘𝑗)) ∈ ℂ)
8171, 80mulcld 8042 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))) ∈ ℂ)
82 oveq2 5927 . . . . . . . . . . 11 (𝑗 = ((0 + 𝑘) − 𝑚) → (𝐴𝑗) = (𝐴↑((0 + 𝑘) − 𝑚)))
83 fveq2 5555 . . . . . . . . . . 11 (𝑗 = ((0 + 𝑘) − 𝑚) → (!‘𝑗) = (!‘((0 + 𝑘) − 𝑚)))
8482, 83oveq12d 5937 . . . . . . . . . 10 (𝑗 = ((0 + 𝑘) − 𝑚) → ((𝐴𝑗) / (!‘𝑗)) = ((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))))
85 oveq2 5927 . . . . . . . . . . 11 (𝑗 = ((0 + 𝑘) − 𝑚) → (𝑘𝑗) = (𝑘 − ((0 + 𝑘) − 𝑚)))
8685fveq2d 5559 . . . . . . . . . 10 (𝑗 = ((0 + 𝑘) − 𝑚) → (𝐺‘(𝑘𝑗)) = (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
8784, 86oveq12d 5937 . . . . . . . . 9 (𝑗 = ((0 + 𝑘) − 𝑚) → (((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))) = (((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
8846, 47, 81, 87fisumrev2 11592 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
8933eftvalcn 11803 . . . . . . . . . . . . . 14 ((𝐵 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (𝐺𝑗) = ((𝐵𝑗) / (!‘𝑗)))
9059, 61, 89syl2anc 411 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺𝑗) = ((𝐵𝑗) / (!‘𝑗)))
9190oveq2d 5935 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · (𝐺𝑗)) = (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · ((𝐵𝑗) / (!‘𝑗))))
9276, 68nnmulcld 9033 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘𝑗)) · (!‘𝑗)) ∈ ℕ)
9392nncnd 8998 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘𝑗)) · (!‘𝑗)) ∈ ℂ)
9477, 69, 78, 70mulap0d 8679 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘𝑗)) · (!‘𝑗)) # 0)
9563, 93, 94divrecap2d 8815 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘𝑗)) · (𝐵𝑗)) / ((!‘(𝑘𝑗)) · (!‘𝑗))) = ((1 / ((!‘(𝑘𝑗)) · (!‘𝑗))) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
9658, 77, 62, 69, 78, 70divmuldivapd 8853 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · ((𝐵𝑗) / (!‘𝑗))) = (((𝐴↑(𝑘𝑗)) · (𝐵𝑗)) / ((!‘(𝑘𝑗)) · (!‘𝑗))))
97 bcval2 10824 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ (0...𝑘) → (𝑘C𝑗) = ((!‘𝑘) / ((!‘(𝑘𝑗)) · (!‘𝑗))))
9897adantl 277 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) = ((!‘𝑘) / ((!‘(𝑘𝑗)) · (!‘𝑗))))
9998oveq1d 5934 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) / (!‘𝑘)) = (((!‘𝑘) / ((!‘(𝑘𝑗)) · (!‘𝑗))) / (!‘𝑘)))
10051adantr 276 . . . . . . . . . . . . . . . . 17 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑘) ∈ ℂ)
10165adantr 276 . . . . . . . . . . . . . . . . 17 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑘) # 0)
102100, 93, 100, 94, 101divdiv32apd 8837 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / ((!‘(𝑘𝑗)) · (!‘𝑗))) / (!‘𝑘)) = (((!‘𝑘) / (!‘𝑘)) / ((!‘(𝑘𝑗)) · (!‘𝑗))))
103100, 101dividapd 8807 . . . . . . . . . . . . . . . . 17 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘𝑘) / (!‘𝑘)) = 1)
104103oveq1d 5934 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / (!‘𝑘)) / ((!‘(𝑘𝑗)) · (!‘𝑗))) = (1 / ((!‘(𝑘𝑗)) · (!‘𝑗))))
105102, 104eqtrd 2226 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / ((!‘(𝑘𝑗)) · (!‘𝑗))) / (!‘𝑘)) = (1 / ((!‘(𝑘𝑗)) · (!‘𝑗))))
10699, 105eqtrd 2226 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) / (!‘𝑘)) = (1 / ((!‘(𝑘𝑗)) · (!‘𝑗))))
107106oveq1d 5934 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) = ((1 / ((!‘(𝑘𝑗)) · (!‘𝑗))) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
10895, 96, 1073eqtr4rd 2237 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) = (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · ((𝐵𝑗) / (!‘𝑗))))
10991, 108eqtr4d 2229 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · (𝐺𝑗)) = (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
110 nn0cn 9253 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
111110ad2antlr 489 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑘 ∈ ℂ)
112111addlidd 8171 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (0 + 𝑘) = 𝑘)
113112oveq1d 5934 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((0 + 𝑘) − 𝑗) = (𝑘𝑗))
114113oveq2d 5935 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑((0 + 𝑘) − 𝑗)) = (𝐴↑(𝑘𝑗)))
115113fveq2d 5559 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘((0 + 𝑘) − 𝑗)) = (!‘(𝑘𝑗)))
116114, 115oveq12d 5937 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) = ((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))))
117113oveq2d 5935 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − ((0 + 𝑘) − 𝑗)) = (𝑘 − (𝑘𝑗)))
118 nn0cn 9253 . . . . . . . . . . . . . . . 16 (𝑗 ∈ ℕ0𝑗 ∈ ℂ)
11961, 118syl 14 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑗 ∈ ℂ)
120111, 119nncand 8337 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − (𝑘𝑗)) = 𝑗)
121117, 120eqtrd 2226 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − ((0 + 𝑘) − 𝑗)) = 𝑗)
122121fveq2d 5559 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗))) = (𝐺𝑗))
123116, 122oveq12d 5937 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = (((𝐴↑(𝑘𝑗)) / (!‘(𝑘𝑗))) · (𝐺𝑗)))
12454, 63, 100, 101div23apd 8849 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))))
125109, 123, 1243eqtr4rd 2237 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))))
126125sumeq2dv 11514 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))))
127 oveq2 5927 . . . . . . . . . . . . 13 (𝑗 = 𝑚 → ((0 + 𝑘) − 𝑗) = ((0 + 𝑘) − 𝑚))
128127oveq2d 5935 . . . . . . . . . . . 12 (𝑗 = 𝑚 → (𝐴↑((0 + 𝑘) − 𝑗)) = (𝐴↑((0 + 𝑘) − 𝑚)))
129127fveq2d 5559 . . . . . . . . . . . 12 (𝑗 = 𝑚 → (!‘((0 + 𝑘) − 𝑗)) = (!‘((0 + 𝑘) − 𝑚)))
130128, 129oveq12d 5937 . . . . . . . . . . 11 (𝑗 = 𝑚 → ((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) = ((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))))
131127oveq2d 5935 . . . . . . . . . . . 12 (𝑗 = 𝑚 → (𝑘 − ((0 + 𝑘) − 𝑗)) = (𝑘 − ((0 + 𝑘) − 𝑚)))
132131fveq2d 5559 . . . . . . . . . . 11 (𝑗 = 𝑚 → (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗))) = (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
133130, 132oveq12d 5937 . . . . . . . . . 10 (𝑗 = 𝑚 → (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = (((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
134133cbvsumv 11507 . . . . . . . . 9 Σ𝑗 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
135126, 134eqtrdi 2242 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
13688, 135eqtr4d 2229 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))) = Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)))
13766, 136eqtr4d 2229 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘𝑗)) · (𝐵𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))))
13845, 137eqtrd 2226 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))))
13939, 138eqtrd 2226 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) = Σ𝑗 ∈ (0...𝑘)(((𝐴𝑗) / (!‘𝑗)) · (𝐺‘(𝑘𝑗))))
14027efcllem 11805 . . . . 5 ((abs‘𝐴) ∈ ℂ → seq0( + , (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))) ∈ dom ⇝ )
14126, 140syl 14 . . . 4 (𝜑 → seq0( + , (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))) ∈ dom ⇝ )
14233efcllem 11805 . . . . 5 (𝐵 ∈ ℂ → seq0( + , 𝐺) ∈ dom ⇝ )
1432, 142syl 14 . . . 4 (𝜑 → seq0( + , 𝐺) ∈ dom ⇝ )
1447efcllem 11805 . . . . 5 (𝐴 ∈ ℂ → seq0( + , 𝐹) ∈ dom ⇝ )
1451, 144syl 14 . . . 4 (𝜑 → seq0( + , 𝐹) ∈ dom ⇝ )
1469, 30, 32, 35, 37, 139, 141, 143, 145mertensabs 11683 . . 3 (𝜑 → seq0( + , 𝐻) ⇝ (Σ𝑗 ∈ ℕ0 ((𝐴𝑗) / (!‘𝑗)) · Σ𝑘 ∈ ℕ0 ((𝐵𝑘) / (!‘𝑘))))
147 efval 11807 . . . . 5 (𝐴 ∈ ℂ → (exp‘𝐴) = Σ𝑗 ∈ ℕ0 ((𝐴𝑗) / (!‘𝑗)))
1481, 147syl 14 . . . 4 (𝜑 → (exp‘𝐴) = Σ𝑗 ∈ ℕ0 ((𝐴𝑗) / (!‘𝑗)))
149 efval 11807 . . . . 5 (𝐵 ∈ ℂ → (exp‘𝐵) = Σ𝑘 ∈ ℕ0 ((𝐵𝑘) / (!‘𝑘)))
1502, 149syl 14 . . . 4 (𝜑 → (exp‘𝐵) = Σ𝑘 ∈ ℕ0 ((𝐵𝑘) / (!‘𝑘)))
151148, 150oveq12d 5937 . . 3 (𝜑 → ((exp‘𝐴) · (exp‘𝐵)) = (Σ𝑗 ∈ ℕ0 ((𝐴𝑗) / (!‘𝑗)) · Σ𝑘 ∈ ℕ0 ((𝐵𝑘) / (!‘𝑘))))
152146, 151breqtrrd 4058 . 2 (𝜑 → seq0( + , 𝐻) ⇝ ((exp‘𝐴) · (exp‘𝐵)))
153 climuni 11439 . 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 1364  wcel 2164   class class class wbr 4030  cmpt 4091  dom cdm 4660  cfv 5255  (class class class)co 5919  cc 7872  0cc0 7874  1c1 7875   + caddc 7877   · cmul 7879  cmin 8192   # cap 8602   / cdiv 8693  cn 8984  0cn0 9243  ...cfz 10077  seqcseq 10521  cexp 10612  !cfa 10799  Ccbc 10821  abscabs 11144  cli 11424  Σcsu 11499  expce 11788
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 615  ax-in2 616  ax-io 710  ax-5 1458  ax-7 1459  ax-gen 1460  ax-ie1 1504  ax-ie2 1505  ax-8 1515  ax-10 1516  ax-11 1517  ax-i12 1518  ax-bndl 1520  ax-4 1521  ax-17 1537  ax-i9 1541  ax-ial 1545  ax-i5r 1546  ax-13 2166  ax-14 2167  ax-ext 2175  ax-coll 4145  ax-sep 4148  ax-nul 4156  ax-pow 4204  ax-pr 4239  ax-un 4465  ax-setind 4570  ax-iinf 4621  ax-cnex 7965  ax-resscn 7966  ax-1cn 7967  ax-1re 7968  ax-icn 7969  ax-addcl 7970  ax-addrcl 7971  ax-mulcl 7972  ax-mulrcl 7973  ax-addcom 7974  ax-mulcom 7975  ax-addass 7976  ax-mulass 7977  ax-distr 7978  ax-i2m1 7979  ax-0lt1 7980  ax-1rid 7981  ax-0id 7982  ax-rnegex 7983  ax-precex 7984  ax-cnre 7985  ax-pre-ltirr 7986  ax-pre-ltwlin 7987  ax-pre-lttrn 7988  ax-pre-apti 7989  ax-pre-ltadd 7990  ax-pre-mulgt0 7991  ax-pre-mulext 7992  ax-arch 7993  ax-caucvg 7994
This theorem depends on definitions:  df-bi 117  df-dc 836  df-3or 981  df-3an 982  df-tru 1367  df-fal 1370  df-nf 1472  df-sb 1774  df-eu 2045  df-mo 2046  df-clab 2180  df-cleq 2186  df-clel 2189  df-nfc 2325  df-ne 2365  df-nel 2460  df-ral 2477  df-rex 2478  df-reu 2479  df-rmo 2480  df-rab 2481  df-v 2762  df-sbc 2987  df-csb 3082  df-dif 3156  df-un 3158  df-in 3160  df-ss 3167  df-nul 3448  df-if 3559  df-pw 3604  df-sn 3625  df-pr 3626  df-op 3628  df-uni 3837  df-int 3872  df-iun 3915  df-disj 4008  df-br 4031  df-opab 4092  df-mpt 4093  df-tr 4129  df-id 4325  df-po 4328  df-iso 4329  df-iord 4398  df-on 4400  df-ilim 4401  df-suc 4403  df-iom 4624  df-xp 4666  df-rel 4667  df-cnv 4668  df-co 4669  df-dm 4670  df-rn 4671  df-res 4672  df-ima 4673  df-iota 5216  df-fun 5257  df-fn 5258  df-f 5259  df-f1 5260  df-fo 5261  df-f1o 5262  df-fv 5263  df-isom 5264  df-riota 5874  df-ov 5922  df-oprab 5923  df-mpo 5924  df-1st 6195  df-2nd 6196  df-recs 6360  df-irdg 6425  df-frec 6446  df-1o 6471  df-oadd 6475  df-er 6589  df-en 6797  df-dom 6798  df-fin 6799  df-sup 7045  df-pnf 8058  df-mnf 8059  df-xr 8060  df-ltxr 8061  df-le 8062  df-sub 8194  df-neg 8195  df-reap 8596  df-ap 8603  df-div 8694  df-inn 8985  df-2 9043  df-3 9044  df-4 9045  df-n0 9244  df-z 9321  df-uz 9596  df-q 9688  df-rp 9723  df-ico 9963  df-fz 10078  df-fzo 10212  df-seqfrec 10522  df-exp 10613  df-fac 10800  df-bc 10822  df-ihash 10850  df-cj 10989  df-re 10990  df-im 10991  df-rsqrt 11145  df-abs 11146  df-clim 11425  df-sumdc 11500  df-ef 11794
This theorem is referenced by:  efadd  11821
  Copyright terms: Public domain W3C validator