Theorem efaddlem 16058

Description: Lemma for efadd 16059 (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 11164	. . 3 ⊢ (𝜑 → (𝐴 + 𝐵) ∈ ℂ)
4		efadd.3	. . . 4 ⊢ 𝐻 = (𝑛 ∈ ℕ0 ↦ (((𝐴 + 𝐵)↑𝑛) / (!‘𝑛)))
5	4	efcvg 16050	. . 3 ⊢ ((𝐴 + 𝐵) ∈ ℂ → seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)))
6	3, 5	syl 17	. 2 ⊢ (𝜑 → seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)))
7		efadd.1	. . . . . 6 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ ((𝐴↑𝑛) / (!‘𝑛)))
8	7	eftval 16041	. . . . 5 ⊢ (𝑗 ∈ ℕ0 → (𝐹‘𝑗) = ((𝐴↑𝑗) / (!‘𝑗)))
9	8	adantl 481	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (𝐹‘𝑗) = ((𝐴↑𝑗) / (!‘𝑗)))
10		absexp 15266	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (abs‘(𝐴↑𝑗)) = ((abs‘𝐴)↑𝑗))
11	1, 10	sylan 581	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (abs‘(𝐴↑𝑗)) = ((abs‘𝐴)↑𝑗))
12		faccl 14245	. . . . . . . 8 ⊢ (𝑗 ∈ ℕ0 → (!‘𝑗) ∈ ℕ)
13	12	adantl 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (!‘𝑗) ∈ ℕ)
14		nnre 12181	. . . . . . . 8 ⊢ ((!‘𝑗) ∈ ℕ → (!‘𝑗) ∈ ℝ)
15		nnnn0 12444	. . . . . . . . 9 ⊢ ((!‘𝑗) ∈ ℕ → (!‘𝑗) ∈ ℕ0)
16	15	nn0ge0d 12501	. . . . . . . 8 ⊢ ((!‘𝑗) ∈ ℕ → 0 ≤ (!‘𝑗))
17	14, 16	absidd 15385	. . . . . . 7 ⊢ ((!‘𝑗) ∈ ℕ → (abs‘(!‘𝑗)) = (!‘𝑗))
18	13, 17	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (abs‘(!‘𝑗)) = (!‘𝑗))
19	11, 18	oveq12d 7385	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((abs‘(𝐴↑𝑗)) / (abs‘(!‘𝑗))) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
20		expcl 14041	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (𝐴↑𝑗) ∈ ℂ)
21	1, 20	sylan 581	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (𝐴↑𝑗) ∈ ℂ)
22	13	nncnd 12190	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (!‘𝑗) ∈ ℂ)
23	13	nnne0d 12227	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (!‘𝑗) ≠ 0)
24	21, 22, 23	absdivd 15420	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (abs‘((𝐴↑𝑗) / (!‘𝑗))) = ((abs‘(𝐴↑𝑗)) / (abs‘(!‘𝑗))))
25		eqid 2736	. . . . . . 7 ⊢ (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛))) = (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))
26	25	eftval 16041	. . . . . 6 ⊢ (𝑗 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
27	26	adantl 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
28	19, 24, 27	3eqtr4rd 2782	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (abs‘((𝐴↑𝑗) / (!‘𝑗))))
29		eftcl 16038	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → ((𝐴↑𝑗) / (!‘𝑗)) ∈ ℂ)
30	1, 29	sylan 581	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((𝐴↑𝑗) / (!‘𝑗)) ∈ ℂ)
31		efadd.2	. . . . . 6 ⊢ 𝐺 = (𝑛 ∈ ℕ0 ↦ ((𝐵↑𝑛) / (!‘𝑛)))
32	31	eftval 16041	. . . . 5 ⊢ (𝑘 ∈ ℕ0 → (𝐺‘𝑘) = ((𝐵↑𝑘) / (!‘𝑘)))
33	32	adantl 481	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐺‘𝑘) = ((𝐵↑𝑘) / (!‘𝑘)))
34		eftcl 16038	. . . . 5 ⊢ ((𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((𝐵↑𝑘) / (!‘𝑘)) ∈ ℂ)
35	2, 34	sylan 581	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → ((𝐵↑𝑘) / (!‘𝑘)) ∈ ℂ)
36	4	eftval 16041	. . . . . 6 ⊢ (𝑘 ∈ ℕ0 → (𝐻‘𝑘) = (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)))
37	36	adantl 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐻‘𝑘) = (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)))
38	1	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → 𝐴 ∈ ℂ)
39	2	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → 𝐵 ∈ ℂ)
40		simpr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
41		binom 15795	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((𝐴 + 𝐵)↑𝑘) = Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
42	38, 39, 40, 41	syl3anc 1374	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → ((𝐴 + 𝐵)↑𝑘) = Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
43	42	oveq1d 7382	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)) = (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)))
44		fzfid 13935	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (0...𝑘) ∈ Fin)
45		faccl 14245	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ0 → (!‘𝑘) ∈ ℕ)
46	45	adantl 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℕ)
47	46	nncnd 12190	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℂ)
48		bccl2 14285	. . . . . . . . . . 11 ⊢ (𝑗 ∈ (0...𝑘) → (𝑘C𝑗) ∈ ℕ)
49	48	adantl 481	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) ∈ ℕ)
50	49	nncnd 12190	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) ∈ ℂ)
51	1	ad2antrr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝐴 ∈ ℂ)
52		fznn0sub 13510	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (0...𝑘) → (𝑘 − 𝑗) ∈ ℕ0)
53	52	adantl 481	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − 𝑗) ∈ ℕ0)
54	51, 53	expcld 14108	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑(𝑘 − 𝑗)) ∈ ℂ)
55	2	ad2antrr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝐵 ∈ ℂ)
56		elfznn0 13574	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (0...𝑘) → 𝑗 ∈ ℕ0)
57	56	adantl 481	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑗 ∈ ℕ0)
58	55, 57	expcld 14108	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐵↑𝑗) ∈ ℂ)
59	54, 58	mulcld 11165	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗)) ∈ ℂ)
60	50, 59	mulcld 11165	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) ∈ ℂ)
61	46	nnne0d 12227	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ≠ 0)
62	44, 47, 60, 61	fsumdivc 15748	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)))
63	51, 57	expcld 14108	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑𝑗) ∈ ℂ)
64	57, 12	syl 17	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ∈ ℕ)
65	64	nncnd 12190	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ∈ ℂ)
66	64	nnne0d 12227	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ≠ 0)
67	63, 65, 66	divcld 11931	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑𝑗) / (!‘𝑗)) ∈ ℂ)
68	31	eftval 16041	. . . . . . . . . . . 12 ⊢ ((𝑘 − 𝑗) ∈ ℕ0 → (𝐺‘(𝑘 − 𝑗)) = ((𝐵↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))))
69	53, 68	syl 17	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘 − 𝑗)) = ((𝐵↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))))
70	55, 53	expcld 14108	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐵↑(𝑘 − 𝑗)) ∈ ℂ)
71		faccl 14245	. . . . . . . . . . . . . 14 ⊢ ((𝑘 − 𝑗) ∈ ℕ0 → (!‘(𝑘 − 𝑗)) ∈ ℕ)
72	53, 71	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘 − 𝑗)) ∈ ℕ)
73	72	nncnd 12190	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘 − 𝑗)) ∈ ℂ)
74	72	nnne0d 12227	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘 − 𝑗)) ≠ 0)
75	70, 73, 74	divcld 11931	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐵↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) ∈ ℂ)
76	69, 75	eqeltrd 2836	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘 − 𝑗)) ∈ ℂ)
77	67, 76	mulcld 11165	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) ∈ ℂ)
78		oveq2 7375	. . . . . . . . . . 11 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (𝐴↑𝑗) = (𝐴↑((0 + 𝑘) − 𝑚)))
79		fveq2 6840	. . . . . . . . . . 11 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (!‘𝑗) = (!‘((0 + 𝑘) − 𝑚)))
80	78, 79	oveq12d 7385	. . . . . . . . . 10 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → ((𝐴↑𝑗) / (!‘𝑗)) = ((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))))
81		oveq2 7375	. . . . . . . . . . 11 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (𝑘 − 𝑗) = (𝑘 − ((0 + 𝑘) − 𝑚)))
82	81	fveq2d 6844	. . . . . . . . . 10 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (𝐺‘(𝑘 − 𝑗)) = (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
83	80, 82	oveq12d 7385	. . . . . . . . 9 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) = (((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
84	77, 83	fsumrev2 15744	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
85	31	eftval 16041	. . . . . . . . . . . . . 14 ⊢ (𝑗 ∈ ℕ0 → (𝐺‘𝑗) = ((𝐵↑𝑗) / (!‘𝑗)))
86	57, 85	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘𝑗) = ((𝐵↑𝑗) / (!‘𝑗)))
87	86	oveq2d 7383	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · (𝐺‘𝑗)) = (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · ((𝐵↑𝑗) / (!‘𝑗))))
88	72, 64	nnmulcld 12230	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘 − 𝑗)) · (!‘𝑗)) ∈ ℕ)
89	88	nncnd 12190	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘 − 𝑗)) · (!‘𝑗)) ∈ ℂ)
90	88	nnne0d 12227	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘 − 𝑗)) · (!‘𝑗)) ≠ 0)
91	59, 89, 90	divrec2d 11935	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) = ((1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
92	54, 73, 58, 65, 74, 66	divmuldivd 11972	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · ((𝐵↑𝑗) / (!‘𝑗))) = (((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
93		bcval2 14267	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ (0...𝑘) → (𝑘C𝑗) = ((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
94	93	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) = ((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
95	94	oveq1d 7382	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) / (!‘𝑘)) = (((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) / (!‘𝑘)))
96	47	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑘) ∈ ℂ)
97	61	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑘) ≠ 0)
98	96, 89, 96, 90, 97	divdiv32d 11956	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) / (!‘𝑘)) = (((!‘𝑘) / (!‘𝑘)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
99	96, 97	dividd 11929	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘𝑘) / (!‘𝑘)) = 1)
100	99	oveq1d 7382	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / (!‘𝑘)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) = (1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
101	98, 100	eqtrd 2771	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) / (!‘𝑘)) = (1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
102	95, 101	eqtrd 2771	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) / (!‘𝑘)) = (1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
103	102	oveq1d 7382	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) = ((1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
104	91, 92, 103	3eqtr4rd 2782	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) = (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · ((𝐵↑𝑗) / (!‘𝑗))))
105	87, 104	eqtr4d 2774	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · (𝐺‘𝑗)) = (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
106		nn0cn 12447	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℕ0 → 𝑘 ∈ ℂ)
107	106	ad2antlr 728	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑘 ∈ ℂ)
108	107	addlidd 11347	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (0 + 𝑘) = 𝑘)
109	108	oveq1d 7382	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((0 + 𝑘) − 𝑗) = (𝑘 − 𝑗))
110	109	oveq2d 7383	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑((0 + 𝑘) − 𝑗)) = (𝐴↑(𝑘 − 𝑗)))
111	109	fveq2d 6844	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘((0 + 𝑘) − 𝑗)) = (!‘(𝑘 − 𝑗)))
112	110, 111	oveq12d 7385	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) = ((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))))
113	109	oveq2d 7383	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − ((0 + 𝑘) − 𝑗)) = (𝑘 − (𝑘 − 𝑗)))
114		nn0cn 12447	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 ∈ ℕ0 → 𝑗 ∈ ℂ)
115	57, 114	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑗 ∈ ℂ)
116	107, 115	nncand 11510	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − (𝑘 − 𝑗)) = 𝑗)
117	113, 116	eqtrd 2771	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − ((0 + 𝑘) − 𝑗)) = 𝑗)
118	117	fveq2d 6844	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗))) = (𝐺‘𝑗))
119	112, 118	oveq12d 7385	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · (𝐺‘𝑗)))
120	50, 59, 96, 97	div23d 11968	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
121	105, 119, 120	3eqtr4rd 2782	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))))
122	121	sumeq2dv 15664	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))))
123		oveq2 7375	. . . . . . . . . . . . 13 ⊢ (𝑗 = 𝑚 → ((0 + 𝑘) − 𝑗) = ((0 + 𝑘) − 𝑚))
124	123	oveq2d 7383	. . . . . . . . . . . 12 ⊢ (𝑗 = 𝑚 → (𝐴↑((0 + 𝑘) − 𝑗)) = (𝐴↑((0 + 𝑘) − 𝑚)))
125	123	fveq2d 6844	. . . . . . . . . . . 12 ⊢ (𝑗 = 𝑚 → (!‘((0 + 𝑘) − 𝑗)) = (!‘((0 + 𝑘) − 𝑚)))
126	124, 125	oveq12d 7385	. . . . . . . . . . 11 ⊢ (𝑗 = 𝑚 → ((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) = ((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))))
127	123	oveq2d 7383	. . . . . . . . . . . 12 ⊢ (𝑗 = 𝑚 → (𝑘 − ((0 + 𝑘) − 𝑗)) = (𝑘 − ((0 + 𝑘) − 𝑚)))
128	127	fveq2d 6844	. . . . . . . . . . 11 ⊢ (𝑗 = 𝑚 → (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗))) = (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
129	126, 128	oveq12d 7385	. . . . . . . . . 10 ⊢ (𝑗 = 𝑚 → (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = (((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
130	129	cbvsumv 15658	. . . . . . . . 9 ⊢ Σ𝑗 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
131	122, 130	eqtrdi 2787	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
132	84, 131	eqtr4d 2774	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) = Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)))
133	62, 132	eqtr4d 2774	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))))
134	43, 133	eqtrd 2771	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))))
135	37, 134	eqtrd 2771	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐻‘𝑘) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))))
136	1	abscld 15401	. . . . . 6 ⊢ (𝜑 → (abs‘𝐴) ∈ ℝ)
137	136	recnd 11173	. . . . 5 ⊢ (𝜑 → (abs‘𝐴) ∈ ℂ)
138	25	efcllem 16042	. . . . 5 ⊢ ((abs‘𝐴) ∈ ℂ → seq0( + , (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))) ∈ dom ⇝ )
139	137, 138	syl 17	. . . 4 ⊢ (𝜑 → seq0( + , (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))) ∈ dom ⇝ )
140	31	efcllem 16042	. . . . 5 ⊢ (𝐵 ∈ ℂ → seq0( + , 𝐺) ∈ dom ⇝ )
141	2, 140	syl 17	. . . 4 ⊢ (𝜑 → seq0( + , 𝐺) ∈ dom ⇝ )
142	9, 28, 30, 33, 35, 135, 139, 141	mertens 15851	. . 3 ⊢ (𝜑 → seq0( + , 𝐻) ⇝ (Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)) · Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘))))
143		efval 16044	. . . . 5 ⊢ (𝐴 ∈ ℂ → (exp‘𝐴) = Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)))
144	1, 143	syl 17	. . . 4 ⊢ (𝜑 → (exp‘𝐴) = Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)))
145		efval 16044	. . . . 5 ⊢ (𝐵 ∈ ℂ → (exp‘𝐵) = Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘)))
146	2, 145	syl 17	. . . 4 ⊢ (𝜑 → (exp‘𝐵) = Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘)))
147	144, 146	oveq12d 7385	. . 3 ⊢ (𝜑 → ((exp‘𝐴) · (exp‘𝐵)) = (Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)) · Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘))))
148	142, 147	breqtrrd 5113	. 2 ⊢ (𝜑 → seq0( + , 𝐻) ⇝ ((exp‘𝐴) · (exp‘𝐵)))
149		climuni 15514	. 2 ⊢ ((seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)) ∧ seq0( + , 𝐻) ⇝ ((exp‘𝐴) · (exp‘𝐵))) → (exp‘(𝐴 + 𝐵)) = ((exp‘𝐴) · (exp‘𝐵)))
150	6, 148, 149	syl2anc 585	1 ⊢ (𝜑 → (exp‘(𝐴 + 𝐵)) = ((exp‘𝐴) · (exp‘𝐵)))

Syntax hints:   → wi 4   ∧ wa 395   = wceq 1542   ∈ wcel 2114   ≠ wne 2932   class class class wbr 5085   ↦ cmpt 5166  dom cdm 5631  ‘cfv 6498  (class class class)co 7367  ℂcc 11036  0cc0 11038  1c1 11039   + caddc 11041   · cmul 11043   − cmin 11377   / cdiv 11807  ℕcn 12174  ℕ₀cn0 12437  ...cfz 13461  seqcseq 13963  ↑cexp 14023  !cfa 14235  Ccbc 14264  abscabs 15196   ⇝ cli 15446  Σcsu 15648  expce 16026

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 2708  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pow 5307  ax-pr 5375  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 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3062  df-rmo 3342  df-reu 3343  df-rab 3390  df-v 3431  df-sbc 3729  df-csb 3838  df-dif 3892  df-un 3894  df-in 3896  df-ss 3906  df-pss 3909  df-nul 4274  df-if 4467  df-pw 4543  df-sn 4568  df-pr 4570  df-op 4574  df-uni 4851  df-int 4890  df-iun 4935  df-br 5086  df-opab 5148  df-mpt 5167  df-tr 5193  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 6265  df-ord 6326  df-on 6327  df-lim 6328  df-suc 6329  df-iota 6454  df-fun 6500  df-fn 6501  df-f 6502  df-f1 6503  df-fo 6504  df-f1o 6505  df-fv 6506  df-isom 6507  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-pm 8776  df-en 8894  df-dom 8895  df-sdom 8896  df-fin 8897  df-sup 9355  df-inf 9356  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-n0 12438  df-z 12525  df-uz 12789  df-rp 12943  df-ico 13304  df-fz 13462  df-fzo 13609  df-fl 13751  df-seq 13964  df-exp 14024  df-fac 14236  df-bc 14265  df-hash 14293  df-shft 15029  df-cj 15061  df-re 15062  df-im 15063  df-sqrt 15197  df-abs 15198  df-limsup 15433  df-clim 15450  df-rlim 15451  df-sum 15649  df-ef 16032

This theorem is referenced by:  efadd  16059