Theorem efaddlem 15195

Description: Lemma for efadd 15196 (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.

Step	Hyp	Ref	Expression
1		efadd.4	. . . 4 ⊢ (𝜑 → 𝐴 ∈ ℂ)
2		efadd.5	. . . 4 ⊢ (𝜑 → 𝐵 ∈ ℂ)
3	1, 2	addcld 10376	. . 3 ⊢ (𝜑 → (𝐴 + 𝐵) ∈ ℂ)
4		efadd.3	. . . 4 ⊢ 𝐻 = (𝑛 ∈ ℕ0 ↦ (((𝐴 + 𝐵)↑𝑛) / (!‘𝑛)))
5	4	efcvg 15187	. . 3 ⊢ ((𝐴 + 𝐵) ∈ ℂ → seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)))
6	3, 5	syl 17	. 2 ⊢ (𝜑 → seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)))
7		efadd.1	. . . . . 6 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ ((𝐴↑𝑛) / (!‘𝑛)))
8	7	eftval 15179	. . . . 5 ⊢ (𝑗 ∈ ℕ0 → (𝐹‘𝑗) = ((𝐴↑𝑗) / (!‘𝑗)))
9	8	adantl 475	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (𝐹‘𝑗) = ((𝐴↑𝑗) / (!‘𝑗)))
10		absexp 14421	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (abs‘(𝐴↑𝑗)) = ((abs‘𝐴)↑𝑗))
11	1, 10	sylan 575	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (abs‘(𝐴↑𝑗)) = ((abs‘𝐴)↑𝑗))
12		faccl 13363	. . . . . . . 8 ⊢ (𝑗 ∈ ℕ0 → (!‘𝑗) ∈ ℕ)
13	12	adantl 475	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (!‘𝑗) ∈ ℕ)
14		nnre 11358	. . . . . . . 8 ⊢ ((!‘𝑗) ∈ ℕ → (!‘𝑗) ∈ ℝ)
15		nnnn0 11626	. . . . . . . . 9 ⊢ ((!‘𝑗) ∈ ℕ → (!‘𝑗) ∈ ℕ0)
16	15	nn0ge0d 11681	. . . . . . . 8 ⊢ ((!‘𝑗) ∈ ℕ → 0 ≤ (!‘𝑗))
17	14, 16	absidd 14538	. . . . . . 7 ⊢ ((!‘𝑗) ∈ ℕ → (abs‘(!‘𝑗)) = (!‘𝑗))
18	13, 17	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (abs‘(!‘𝑗)) = (!‘𝑗))
19	11, 18	oveq12d 6923	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((abs‘(𝐴↑𝑗)) / (abs‘(!‘𝑗))) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
20		expcl 13172	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (𝐴↑𝑗) ∈ ℂ)
21	1, 20	sylan 575	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (𝐴↑𝑗) ∈ ℂ)
22	13	nncnd 11368	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (!‘𝑗) ∈ ℂ)
23	13	nnne0d 11401	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (!‘𝑗) ≠ 0)
24	21, 22, 23	absdivd 14571	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (abs‘((𝐴↑𝑗) / (!‘𝑗))) = ((abs‘(𝐴↑𝑗)) / (abs‘(!‘𝑗))))
25		eqid 2825	. . . . . . 7 ⊢ (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛))) = (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))
26	25	eftval 15179	. . . . . 6 ⊢ (𝑗 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
27	26	adantl 475	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
28	19, 24, 27	3eqtr4rd 2872	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (abs‘((𝐴↑𝑗) / (!‘𝑗))))
29		eftcl 15176	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → ((𝐴↑𝑗) / (!‘𝑗)) ∈ ℂ)
30	1, 29	sylan 575	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((𝐴↑𝑗) / (!‘𝑗)) ∈ ℂ)
31		efadd.2	. . . . . 6 ⊢ 𝐺 = (𝑛 ∈ ℕ0 ↦ ((𝐵↑𝑛) / (!‘𝑛)))
32	31	eftval 15179	. . . . 5 ⊢ (𝑘 ∈ ℕ0 → (𝐺‘𝑘) = ((𝐵↑𝑘) / (!‘𝑘)))
33	32	adantl 475	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐺‘𝑘) = ((𝐵↑𝑘) / (!‘𝑘)))
34		eftcl 15176	. . . . 5 ⊢ ((𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((𝐵↑𝑘) / (!‘𝑘)) ∈ ℂ)
35	2, 34	sylan 575	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → ((𝐵↑𝑘) / (!‘𝑘)) ∈ ℂ)
36	4	eftval 15179	. . . . . 6 ⊢ (𝑘 ∈ ℕ0 → (𝐻‘𝑘) = (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)))
37	36	adantl 475	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐻‘𝑘) = (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)))
38	1	adantr 474	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → 𝐴 ∈ ℂ)
39	2	adantr 474	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → 𝐵 ∈ ℂ)
40		simpr 479	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
41		binom 14936	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((𝐴 + 𝐵)↑𝑘) = Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
42	38, 39, 40, 41	syl3anc 1494	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → ((𝐴 + 𝐵)↑𝑘) = Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
43	42	oveq1d 6920	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)) = (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)))
44		fzfid 13067	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (0...𝑘) ∈ Fin)
45		faccl 13363	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ0 → (!‘𝑘) ∈ ℕ)
46	45	adantl 475	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℕ)
47	46	nncnd 11368	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℂ)
48		bccl2 13403	. . . . . . . . . . 11 ⊢ (𝑗 ∈ (0...𝑘) → (𝑘C𝑗) ∈ ℕ)
49	48	adantl 475	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) ∈ ℕ)
50	49	nncnd 11368	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) ∈ ℂ)
51	1	ad2antrr 717	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝐴 ∈ ℂ)
52		fznn0sub 12666	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (0...𝑘) → (𝑘 − 𝑗) ∈ ℕ0)
53	52	adantl 475	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − 𝑗) ∈ ℕ0)
54	51, 53	expcld 13302	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑(𝑘 − 𝑗)) ∈ ℂ)
55	2	ad2antrr 717	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝐵 ∈ ℂ)
56		elfznn0 12727	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (0...𝑘) → 𝑗 ∈ ℕ0)
57	56	adantl 475	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑗 ∈ ℕ0)
58	55, 57	expcld 13302	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐵↑𝑗) ∈ ℂ)
59	54, 58	mulcld 10377	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗)) ∈ ℂ)
60	50, 59	mulcld 10377	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) ∈ ℂ)
61	46	nnne0d 11401	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ≠ 0)
62	44, 47, 60, 61	fsumdivc 14892	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)))
63	51, 57	expcld 13302	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑𝑗) ∈ ℂ)
64	57, 12	syl 17	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ∈ ℕ)
65	64	nncnd 11368	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ∈ ℂ)
66	64	nnne0d 11401	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ≠ 0)
67	63, 65, 66	divcld 11127	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑𝑗) / (!‘𝑗)) ∈ ℂ)
68	31	eftval 15179	. . . . . . . . . . . 12 ⊢ ((𝑘 − 𝑗) ∈ ℕ0 → (𝐺‘(𝑘 − 𝑗)) = ((𝐵↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))))
69	53, 68	syl 17	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘 − 𝑗)) = ((𝐵↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))))
70	55, 53	expcld 13302	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐵↑(𝑘 − 𝑗)) ∈ ℂ)
71		faccl 13363	. . . . . . . . . . . . . 14 ⊢ ((𝑘 − 𝑗) ∈ ℕ0 → (!‘(𝑘 − 𝑗)) ∈ ℕ)
72	53, 71	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘 − 𝑗)) ∈ ℕ)
73	72	nncnd 11368	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘 − 𝑗)) ∈ ℂ)
74	72	nnne0d 11401	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘 − 𝑗)) ≠ 0)
75	70, 73, 74	divcld 11127	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐵↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) ∈ ℂ)
76	69, 75	eqeltrd 2906	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘 − 𝑗)) ∈ ℂ)
77	67, 76	mulcld 10377	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) ∈ ℂ)
78		oveq2 6913	. . . . . . . . . . 11 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (𝐴↑𝑗) = (𝐴↑((0 + 𝑘) − 𝑚)))
79		fveq2 6433	. . . . . . . . . . 11 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (!‘𝑗) = (!‘((0 + 𝑘) − 𝑚)))
80	78, 79	oveq12d 6923	. . . . . . . . . 10 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → ((𝐴↑𝑗) / (!‘𝑗)) = ((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))))
81		oveq2 6913	. . . . . . . . . . 11 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (𝑘 − 𝑗) = (𝑘 − ((0 + 𝑘) − 𝑚)))
82	81	fveq2d 6437	. . . . . . . . . 10 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (𝐺‘(𝑘 − 𝑗)) = (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
83	80, 82	oveq12d 6923	. . . . . . . . 9 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) = (((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
84	77, 83	fsumrev2 14888	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
85	31	eftval 15179	. . . . . . . . . . . . . 14 ⊢ (𝑗 ∈ ℕ0 → (𝐺‘𝑗) = ((𝐵↑𝑗) / (!‘𝑗)))
86	57, 85	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘𝑗) = ((𝐵↑𝑗) / (!‘𝑗)))
87	86	oveq2d 6921	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · (𝐺‘𝑗)) = (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · ((𝐵↑𝑗) / (!‘𝑗))))
88	72, 64	nnmulcld 11404	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘 − 𝑗)) · (!‘𝑗)) ∈ ℕ)
89	88	nncnd 11368	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘 − 𝑗)) · (!‘𝑗)) ∈ ℂ)
90	88	nnne0d 11401	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘 − 𝑗)) · (!‘𝑗)) ≠ 0)
91	59, 89, 90	divrec2d 11131	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) = ((1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
92	54, 73, 58, 65, 74, 66	divmuldivd 11168	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · ((𝐵↑𝑗) / (!‘𝑗))) = (((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
93		bcval2 13385	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ (0...𝑘) → (𝑘C𝑗) = ((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
94	93	adantl 475	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) = ((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
95	94	oveq1d 6920	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) / (!‘𝑘)) = (((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) / (!‘𝑘)))
96	47	adantr 474	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑘) ∈ ℂ)
97	61	adantr 474	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑘) ≠ 0)
98	96, 89, 96, 90, 97	divdiv32d 11152	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) / (!‘𝑘)) = (((!‘𝑘) / (!‘𝑘)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
99	96, 97	dividd 11125	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘𝑘) / (!‘𝑘)) = 1)
100	99	oveq1d 6920	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / (!‘𝑘)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) = (1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
101	98, 100	eqtrd 2861	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) / (!‘𝑘)) = (1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
102	95, 101	eqtrd 2861	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) / (!‘𝑘)) = (1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
103	102	oveq1d 6920	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) = ((1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
104	91, 92, 103	3eqtr4rd 2872	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) = (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · ((𝐵↑𝑗) / (!‘𝑗))))
105	87, 104	eqtr4d 2864	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · (𝐺‘𝑗)) = (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
106		nn0cn 11629	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℕ0 → 𝑘 ∈ ℂ)
107	106	ad2antlr 718	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑘 ∈ ℂ)
108	107	addid2d 10556	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (0 + 𝑘) = 𝑘)
109	108	oveq1d 6920	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((0 + 𝑘) − 𝑗) = (𝑘 − 𝑗))
110	109	oveq2d 6921	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑((0 + 𝑘) − 𝑗)) = (𝐴↑(𝑘 − 𝑗)))
111	109	fveq2d 6437	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘((0 + 𝑘) − 𝑗)) = (!‘(𝑘 − 𝑗)))
112	110, 111	oveq12d 6923	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) = ((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))))
113	109	oveq2d 6921	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − ((0 + 𝑘) − 𝑗)) = (𝑘 − (𝑘 − 𝑗)))
114		nn0cn 11629	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 ∈ ℕ0 → 𝑗 ∈ ℂ)
115	57, 114	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑗 ∈ ℂ)
116	107, 115	nncand 10718	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − (𝑘 − 𝑗)) = 𝑗)
117	113, 116	eqtrd 2861	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − ((0 + 𝑘) − 𝑗)) = 𝑗)
118	117	fveq2d 6437	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗))) = (𝐺‘𝑗))
119	112, 118	oveq12d 6923	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · (𝐺‘𝑗)))
120	50, 59, 96, 97	div23d 11164	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
121	105, 119, 120	3eqtr4rd 2872	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))))
122	121	sumeq2dv 14810	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))))
123		oveq2 6913	. . . . . . . . . . . . 13 ⊢ (𝑗 = 𝑚 → ((0 + 𝑘) − 𝑗) = ((0 + 𝑘) − 𝑚))
124	123	oveq2d 6921	. . . . . . . . . . . 12 ⊢ (𝑗 = 𝑚 → (𝐴↑((0 + 𝑘) − 𝑗)) = (𝐴↑((0 + 𝑘) − 𝑚)))
125	123	fveq2d 6437	. . . . . . . . . . . 12 ⊢ (𝑗 = 𝑚 → (!‘((0 + 𝑘) − 𝑗)) = (!‘((0 + 𝑘) − 𝑚)))
126	124, 125	oveq12d 6923	. . . . . . . . . . 11 ⊢ (𝑗 = 𝑚 → ((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) = ((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))))
127	123	oveq2d 6921	. . . . . . . . . . . 12 ⊢ (𝑗 = 𝑚 → (𝑘 − ((0 + 𝑘) − 𝑗)) = (𝑘 − ((0 + 𝑘) − 𝑚)))
128	127	fveq2d 6437	. . . . . . . . . . 11 ⊢ (𝑗 = 𝑚 → (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗))) = (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
129	126, 128	oveq12d 6923	. . . . . . . . . 10 ⊢ (𝑗 = 𝑚 → (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = (((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
130	129	cbvsumv 14803	. . . . . . . . 9 ⊢ Σ𝑗 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
131	122, 130	syl6eq 2877	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
132	84, 131	eqtr4d 2864	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) = Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)))
133	62, 132	eqtr4d 2864	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))))
134	43, 133	eqtrd 2861	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))))
135	37, 134	eqtrd 2861	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐻‘𝑘) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))))
136	1	abscld 14552	. . . . . 6 ⊢ (𝜑 → (abs‘𝐴) ∈ ℝ)
137	136	recnd 10385	. . . . 5 ⊢ (𝜑 → (abs‘𝐴) ∈ ℂ)
138	25	efcllem 15180	. . . . 5 ⊢ ((abs‘𝐴) ∈ ℂ → seq0( + , (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))) ∈ dom ⇝ )
139	137, 138	syl 17	. . . 4 ⊢ (𝜑 → seq0( + , (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))) ∈ dom ⇝ )
140	31	efcllem 15180	. . . . 5 ⊢ (𝐵 ∈ ℂ → seq0( + , 𝐺) ∈ dom ⇝ )
141	2, 140	syl 17	. . . 4 ⊢ (𝜑 → seq0( + , 𝐺) ∈ dom ⇝ )
142	9, 28, 30, 33, 35, 135, 139, 141	mertens 14991	. . 3 ⊢ (𝜑 → seq0( + , 𝐻) ⇝ (Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)) · Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘))))
143		efval 15182	. . . . 5 ⊢ (𝐴 ∈ ℂ → (exp‘𝐴) = Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)))
144	1, 143	syl 17	. . . 4 ⊢ (𝜑 → (exp‘𝐴) = Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)))
145		efval 15182	. . . . 5 ⊢ (𝐵 ∈ ℂ → (exp‘𝐵) = Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘)))
146	2, 145	syl 17	. . . 4 ⊢ (𝜑 → (exp‘𝐵) = Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘)))
147	144, 146	oveq12d 6923	. . 3 ⊢ (𝜑 → ((exp‘𝐴) · (exp‘𝐵)) = (Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)) · Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘))))
148	142, 147	breqtrrd 4901	. 2 ⊢ (𝜑 → seq0( + , 𝐻) ⇝ ((exp‘𝐴) · (exp‘𝐵)))
149		climuni 14660	. 2 ⊢ ((seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)) ∧ seq0( + , 𝐻) ⇝ ((exp‘𝐴) · (exp‘𝐵))) → (exp‘(𝐴 + 𝐵)) = ((exp‘𝐴) · (exp‘𝐵)))
150	6, 148, 149	syl2anc 579	1 ⊢ (𝜑 → (exp‘(𝐴 + 𝐵)) = ((exp‘𝐴) · (exp‘𝐵)))

Syntax hints:   → wi 4   ∧ wa 386   = wceq 1656   ∈ wcel 2164   ≠ wne 2999   class class class wbr 4873   ↦ cmpt 4952  dom cdm 5342  ‘cfv 6123  (class class class)co 6905  ℂcc 10250  0cc0 10252  1c1 10253   + caddc 10255   · cmul 10257   − cmin 10585   / cdiv 11009  ℕcn 11350  ℕ₀cn0 11618  ...cfz 12619  seqcseq 13095  ↑cexp 13154  !cfa 13353  Ccbc 13382  abscabs 14351   ⇝ cli 14592  Σcsu 14793  expce 15164

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1894  ax-4 1908  ax-5 2009  ax-6 2075  ax-7 2112  ax-8 2166  ax-9 2173  ax-10 2192  ax-11 2207  ax-12 2220  ax-13 2389  ax-ext 2803  ax-rep 4994  ax-sep 5005  ax-nul 5013  ax-pow 5065  ax-pr 5127  ax-un 7209  ax-inf2 8815  ax-cnex 10308  ax-resscn 10309  ax-1cn 10310  ax-icn 10311  ax-addcl 10312  ax-addrcl 10313  ax-mulcl 10314  ax-mulrcl 10315  ax-mulcom 10316  ax-addass 10317  ax-mulass 10318  ax-distr 10319  ax-i2m1 10320  ax-1ne0 10321  ax-1rid 10322  ax-rnegex 10323  ax-rrecex 10324  ax-cnre 10325  ax-pre-lttri 10326  ax-pre-lttrn 10327  ax-pre-ltadd 10328  ax-pre-mulgt0 10329  ax-pre-sup 10330  ax-addf 10331  ax-mulf 10332

This theorem depends on definitions:  df-bi 199  df-an 387  df-or 879  df-3or 1112  df-3an 1113  df-tru 1660  df-fal 1670  df-ex 1879  df-nf 1883  df-sb 2068  df-mo 2605  df-eu 2640  df-clab 2812  df-cleq 2818  df-clel 2821  df-nfc 2958  df-ne 3000  df-nel 3103  df-ral 3122  df-rex 3123  df-reu 3124  df-rmo 3125  df-rab 3126  df-v 3416  df-sbc 3663  df-csb 3758  df-dif 3801  df-un 3803  df-in 3805  df-ss 3812  df-pss 3814  df-nul 4145  df-if 4307  df-pw 4380  df-sn 4398  df-pr 4400  df-tp 4402  df-op 4404  df-uni 4659  df-int 4698  df-iun 4742  df-br 4874  df-opab 4936  df-mpt 4953  df-tr 4976  df-id 5250  df-eprel 5255  df-po 5263  df-so 5264  df-fr 5301  df-se 5302  df-we 5303  df-xp 5348  df-rel 5349  df-cnv 5350  df-co 5351  df-dm 5352  df-rn 5353  df-res 5354  df-ima 5355  df-pred 5920  df-ord 5966  df-on 5967  df-lim 5968  df-suc 5969  df-iota 6086  df-fun 6125  df-fn 6126  df-f 6127  df-f1 6128  df-fo 6129  df-f1o 6130  df-fv 6131  df-isom 6132  df-riota 6866  df-ov 6908  df-oprab 6909  df-mpt2 6910  df-om 7327  df-1st 7428  df-2nd 7429  df-wrecs 7672  df-recs 7734  df-rdg 7772  df-1o 7826  df-oadd 7830  df-er 8009  df-pm 8125  df-en 8223  df-dom 8224  df-sdom 8225  df-fin 8226  df-sup 8617  df-inf 8618  df-oi 8684  df-card 9078  df-pnf 10393  df-mnf 10394  df-xr 10395  df-ltxr 10396  df-le 10397  df-sub 10587  df-neg 10588  df-div 11010  df-nn 11351  df-2 11414  df-3 11415  df-n0 11619  df-z 11705  df-uz 11969  df-rp 12113  df-ico 12469  df-fz 12620  df-fzo 12761  df-fl 12888  df-seq 13096  df-exp 13155  df-fac 13354  df-bc 13383  df-hash 13411  df-shft 14184  df-cj 14216  df-re 14217  df-im 14218  df-sqrt 14352  df-abs 14353  df-limsup 14579  df-clim 14596  df-rlim 14597  df-sum 14794  df-ef 15170

This theorem is referenced by:  efadd  15196