Theorem efaddlem 16300

Description: Lemma for efadd 16301 (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 11365	. . 3 ⊢ (𝜑 → (𝐴 + 𝐵) ∈ ℂ)
4		efadd.3	. . . 4 ⊢ 𝐻 = (𝑛 ∈ ℕ0 ↦ (((𝐴 + 𝐵)↑𝑛) / (!‘𝑛)))
5	4	efcvg 16292	. . 3 ⊢ ((𝐴 + 𝐵) ∈ ℂ → seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)))
6	3, 5	syl 18	. 2 ⊢ (𝜑 → seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)))
7		efadd.1	. . . . . 6 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ ((𝐴↑𝑛) / (!‘𝑛)))
8	7	eftval 16283	. . . . 5 ⊢ (𝑗 ∈ ℕ0 → (𝐹‘𝑗) = ((𝐴↑𝑗) / (!‘𝑗)))
9	8	adantl 487	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (𝐹‘𝑗) = ((𝐴↑𝑗) / (!‘𝑗)))
10		absexp 15512	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (abs‘(𝐴↑𝑗)) = ((abs‘𝐴)↑𝑗))
11	1, 10	sylan 592	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (abs‘(𝐴↑𝑗)) = ((abs‘𝐴)↑𝑗))
12		faccl 14466	. . . . . . . 8 ⊢ (𝑗 ∈ ℕ0 → (!‘𝑗) ∈ ℕ)
13	12	adantl 487	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (!‘𝑗) ∈ ℕ)
14		nnre 12380	. . . . . . . 8 ⊢ ((!‘𝑗) ∈ ℕ → (!‘𝑗) ∈ ℝ)
15		nnnn0 12651	. . . . . . . . 9 ⊢ ((!‘𝑗) ∈ ℕ → (!‘𝑗) ∈ ℕ0)
16	15	nn0ge0d 12708	. . . . . . . 8 ⊢ ((!‘𝑗) ∈ ℕ → 0 ≤ (!‘𝑗))
17	14, 16	absidd 15631	. . . . . . 7 ⊢ ((!‘𝑗) ∈ ℕ → (abs‘(!‘𝑗)) = (!‘𝑗))
18	13, 17	syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (abs‘(!‘𝑗)) = (!‘𝑗))
19	11, 18	oveq12d 7467	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((abs‘(𝐴↑𝑗)) / (abs‘(!‘𝑗))) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
20		expcl 14260	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (𝐴↑𝑗) ∈ ℂ)
21	1, 20	sylan 592	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (𝐴↑𝑗) ∈ ℂ)
22	13	nncnd 12389	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (!‘𝑗) ∈ ℂ)
23	13	nnne0d 12426	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (!‘𝑗) ≠ 0)
24	21, 22, 23	absdivd 15666	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (abs‘((𝐴↑𝑗) / (!‘𝑗))) = ((abs‘(𝐴↑𝑗)) / (abs‘(!‘𝑗))))
25		eqid 2763	. . . . . . 7 ⊢ (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛))) = (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))
26	25	eftval 16283	. . . . . 6 ⊢ (𝑗 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
27	26	adantl 487	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (((abs‘𝐴)↑𝑗) / (!‘𝑗)))
28	19, 24, 27	3eqtr4rd 2809	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))‘𝑗) = (abs‘((𝐴↑𝑗) / (!‘𝑗))))
29		eftcl 16280	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → ((𝐴↑𝑗) / (!‘𝑗)) ∈ ℂ)
30	1, 29	sylan 592	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → ((𝐴↑𝑗) / (!‘𝑗)) ∈ ℂ)
31		efadd.2	. . . . . 6 ⊢ 𝐺 = (𝑛 ∈ ℕ0 ↦ ((𝐵↑𝑛) / (!‘𝑛)))
32	31	eftval 16283	. . . . 5 ⊢ (𝑘 ∈ ℕ0 → (𝐺‘𝑘) = ((𝐵↑𝑘) / (!‘𝑘)))
33	32	adantl 487	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐺‘𝑘) = ((𝐵↑𝑘) / (!‘𝑘)))
34		eftcl 16280	. . . . 5 ⊢ ((𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((𝐵↑𝑘) / (!‘𝑘)) ∈ ℂ)
35	2, 34	sylan 592	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → ((𝐵↑𝑘) / (!‘𝑘)) ∈ ℂ)
36	4	eftval 16283	. . . . . 6 ⊢ (𝑘 ∈ ℕ0 → (𝐻‘𝑘) = (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)))
37	36	adantl 487	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐻‘𝑘) = (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)))
38	1	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → 𝐴 ∈ ℂ)
39	2	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → 𝐵 ∈ ℂ)
40		simpr 490	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
41		binom 16040	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((𝐴 + 𝐵)↑𝑘) = Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
42	38, 39, 40, 41	syl3anc 1399	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → ((𝐴 + 𝐵)↑𝑘) = Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
43	42	oveq1d 7464	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)) = (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)))
44		fzfid 14154	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (0...𝑘) ∈ Fin)
45		faccl 14466	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ0 → (!‘𝑘) ∈ ℕ)
46	45	adantl 487	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℕ)
47	46	nncnd 12389	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℂ)
48		bccl2 14506	. . . . . . . . . . 11 ⊢ (𝑗 ∈ (0...𝑘) → (𝑘C𝑗) ∈ ℕ)
49	48	adantl 487	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) ∈ ℕ)
50	49	nncnd 12389	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) ∈ ℂ)
51	1	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝐴 ∈ ℂ)
52		fznn0sub 13728	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (0...𝑘) → (𝑘 − 𝑗) ∈ ℕ0)
53	52	adantl 487	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − 𝑗) ∈ ℕ0)
54	51, 53	expcld 14327	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑(𝑘 − 𝑗)) ∈ ℂ)
55	2	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝐵 ∈ ℂ)
56		elfznn0 13792	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (0...𝑘) → 𝑗 ∈ ℕ0)
57	56	adantl 487	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑗 ∈ ℕ0)
58	55, 57	expcld 14327	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐵↑𝑗) ∈ ℂ)
59	54, 58	mulcld 11366	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗)) ∈ ℂ)
60	50, 59	mulcld 11366	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) ∈ ℂ)
61	46	nnne0d 12426	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ≠ 0)
62	44, 47, 60, 61	fsumdivc 15993	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)))
63	51, 57	expcld 14327	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑𝑗) ∈ ℂ)
64	57, 12	syl 18	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ∈ ℕ)
65	64	nncnd 12389	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ∈ ℂ)
66	64	nnne0d 12426	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑗) ≠ 0)
67	63, 65, 66	divcld 12131	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑𝑗) / (!‘𝑗)) ∈ ℂ)
68	31	eftval 16283	. . . . . . . . . . . 12 ⊢ ((𝑘 − 𝑗) ∈ ℕ0 → (𝐺‘(𝑘 − 𝑗)) = ((𝐵↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))))
69	53, 68	syl 18	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘 − 𝑗)) = ((𝐵↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))))
70	55, 53	expcld 14327	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐵↑(𝑘 − 𝑗)) ∈ ℂ)
71		faccl 14466	. . . . . . . . . . . . . 14 ⊢ ((𝑘 − 𝑗) ∈ ℕ0 → (!‘(𝑘 − 𝑗)) ∈ ℕ)
72	53, 71	syl 18	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘 − 𝑗)) ∈ ℕ)
73	72	nncnd 12389	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘 − 𝑗)) ∈ ℂ)
74	72	nnne0d 12426	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘(𝑘 − 𝑗)) ≠ 0)
75	70, 73, 74	divcld 12131	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐵↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) ∈ ℂ)
76	69, 75	eqeltrd 2864	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘 − 𝑗)) ∈ ℂ)
77	67, 76	mulcld 11366	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) ∈ ℂ)
78		oveq2 7457	. . . . . . . . . . 11 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (𝐴↑𝑗) = (𝐴↑((0 + 𝑘) − 𝑚)))
79		fveq2 6914	. . . . . . . . . . 11 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (!‘𝑗) = (!‘((0 + 𝑘) − 𝑚)))
80	78, 79	oveq12d 7467	. . . . . . . . . 10 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → ((𝐴↑𝑗) / (!‘𝑗)) = ((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))))
81		oveq2 7457	. . . . . . . . . . 11 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (𝑘 − 𝑗) = (𝑘 − ((0 + 𝑘) − 𝑚)))
82	81	fveq2d 6918	. . . . . . . . . 10 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (𝐺‘(𝑘 − 𝑗)) = (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
83	80, 82	oveq12d 7467	. . . . . . . . 9 ⊢ (𝑗 = ((0 + 𝑘) − 𝑚) → (((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) = (((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
84	77, 83	fsumrev2 15989	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
85	31	eftval 16283	. . . . . . . . . . . . . 14 ⊢ (𝑗 ∈ ℕ0 → (𝐺‘𝑗) = ((𝐵↑𝑗) / (!‘𝑗)))
86	57, 85	syl 18	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘𝑗) = ((𝐵↑𝑗) / (!‘𝑗)))
87	86	oveq2d 7465	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · (𝐺‘𝑗)) = (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · ((𝐵↑𝑗) / (!‘𝑗))))
88	72, 64	nnmulcld 12429	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘 − 𝑗)) · (!‘𝑗)) ∈ ℕ)
89	88	nncnd 12389	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘 − 𝑗)) · (!‘𝑗)) ∈ ℂ)
90	88	nnne0d 12426	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘(𝑘 − 𝑗)) · (!‘𝑗)) ≠ 0)
91	59, 89, 90	divrec2d 12135	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) = ((1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
92	54, 73, 58, 65, 74, 66	divmuldivd 12172	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · ((𝐵↑𝑗) / (!‘𝑗))) = (((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
93		bcval2 14488	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ (0...𝑘) → (𝑘C𝑗) = ((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
94	93	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘C𝑗) = ((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
95	94	oveq1d 7464	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) / (!‘𝑘)) = (((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) / (!‘𝑘)))
96	47	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑘) ∈ ℂ)
97	61	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘𝑘) ≠ 0)
98	96, 89, 96, 90, 97	divdiv32d 12156	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) / (!‘𝑘)) = (((!‘𝑘) / (!‘𝑘)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
99	96, 97	dividd 12129	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((!‘𝑘) / (!‘𝑘)) = 1)
100	99	oveq1d 7464	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / (!‘𝑘)) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) = (1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
101	98, 100	eqtrd 2798	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((!‘𝑘) / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) / (!‘𝑘)) = (1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
102	95, 101	eqtrd 2798	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝑘C𝑗) / (!‘𝑘)) = (1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))))
103	102	oveq1d 7464	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) = ((1 / ((!‘(𝑘 − 𝑗)) · (!‘𝑗))) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
104	91, 92, 103	3eqtr4rd 2809	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) = (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · ((𝐵↑𝑗) / (!‘𝑗))))
105	87, 104	eqtr4d 2801	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · (𝐺‘𝑗)) = (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
106		nn0cn 12654	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℕ0 → 𝑘 ∈ ℂ)
107	106	ad2antlr 740	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑘 ∈ ℂ)
108	107	addlidd 11548	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (0 + 𝑘) = 𝑘)
109	108	oveq1d 7464	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((0 + 𝑘) − 𝑗) = (𝑘 − 𝑗))
110	109	oveq2d 7465	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐴↑((0 + 𝑘) − 𝑗)) = (𝐴↑(𝑘 − 𝑗)))
111	109	fveq2d 6918	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (!‘((0 + 𝑘) − 𝑗)) = (!‘(𝑘 − 𝑗)))
112	110, 111	oveq12d 7467	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → ((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) = ((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))))
113	109	oveq2d 7465	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − ((0 + 𝑘) − 𝑗)) = (𝑘 − (𝑘 − 𝑗)))
114		nn0cn 12654	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 ∈ ℕ0 → 𝑗 ∈ ℂ)
115	57, 114	syl 18	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → 𝑗 ∈ ℂ)
116	107, 115	nncand 11711	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − (𝑘 − 𝑗)) = 𝑗)
117	113, 116	eqtrd 2798	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝑘 − ((0 + 𝑘) − 𝑗)) = 𝑗)
118	117	fveq2d 6918	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗))) = (𝐺‘𝑗))
119	112, 118	oveq12d 7467	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = (((𝐴↑(𝑘 − 𝑗)) / (!‘(𝑘 − 𝑗))) · (𝐺‘𝑗)))
120	50, 59, 96, 97	div23d 12168	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = (((𝑘C𝑗) / (!‘𝑘)) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))))
121	105, 119, 120	3eqtr4rd 2809	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ ℕ0) ∧ 𝑗 ∈ (0...𝑘)) → (((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))))
122	121	sumeq2dv 15910	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))))
123		oveq2 7457	. . . . . . . . . . . . 13 ⊢ (𝑗 = 𝑚 → ((0 + 𝑘) − 𝑗) = ((0 + 𝑘) − 𝑚))
124	123	oveq2d 7465	. . . . . . . . . . . 12 ⊢ (𝑗 = 𝑚 → (𝐴↑((0 + 𝑘) − 𝑗)) = (𝐴↑((0 + 𝑘) − 𝑚)))
125	123	fveq2d 6918	. . . . . . . . . . . 12 ⊢ (𝑗 = 𝑚 → (!‘((0 + 𝑘) − 𝑗)) = (!‘((0 + 𝑘) − 𝑚)))
126	124, 125	oveq12d 7467	. . . . . . . . . . 11 ⊢ (𝑗 = 𝑚 → ((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) = ((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))))
127	123	oveq2d 7465	. . . . . . . . . . . 12 ⊢ (𝑗 = 𝑚 → (𝑘 − ((0 + 𝑘) − 𝑗)) = (𝑘 − ((0 + 𝑘) − 𝑚)))
128	127	fveq2d 6918	. . . . . . . . . . 11 ⊢ (𝑗 = 𝑚 → (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗))) = (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
129	126, 128	oveq12d 7467	. . . . . . . . . 10 ⊢ (𝑗 = 𝑚 → (((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = (((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
130	129	cbvsumv 15904	. . . . . . . . 9 ⊢ Σ𝑗 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑗)) / (!‘((0 + 𝑘) − 𝑗))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑗)))) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚))))
131	122, 130	eqtrdi 2814	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑚 ∈ (0...𝑘)(((𝐴↑((0 + 𝑘) − 𝑚)) / (!‘((0 + 𝑘) − 𝑚))) · (𝐺‘(𝑘 − ((0 + 𝑘) − 𝑚)))))
132	84, 131	eqtr4d 2801	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))) = Σ𝑗 ∈ (0...𝑘)(((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)))
133	62, 132	eqtr4d 2801	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (Σ𝑗 ∈ (0...𝑘)((𝑘C𝑗) · ((𝐴↑(𝑘 − 𝑗)) · (𝐵↑𝑗))) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))))
134	43, 133	eqtrd 2798	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (((𝐴 + 𝐵)↑𝑘) / (!‘𝑘)) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))))
135	37, 134	eqtrd 2798	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐻‘𝑘) = Σ𝑗 ∈ (0...𝑘)(((𝐴↑𝑗) / (!‘𝑗)) · (𝐺‘(𝑘 − 𝑗))))
136	1	abscld 15647	. . . . . 6 ⊢ (𝜑 → (abs‘𝐴) ∈ ℝ)
137	136	recnd 11374	. . . . 5 ⊢ (𝜑 → (abs‘𝐴) ∈ ℂ)
138	25	efcllem 16284	. . . . 5 ⊢ ((abs‘𝐴) ∈ ℂ → seq0( + , (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))) ∈ dom ⇝ )
139	137, 138	syl 18	. . . 4 ⊢ (𝜑 → seq0( + , (𝑛 ∈ ℕ0 ↦ (((abs‘𝐴)↑𝑛) / (!‘𝑛)))) ∈ dom ⇝ )
140	31	efcllem 16284	. . . . 5 ⊢ (𝐵 ∈ ℂ → seq0( + , 𝐺) ∈ dom ⇝ )
141	2, 140	syl 18	. . . 4 ⊢ (𝜑 → seq0( + , 𝐺) ∈ dom ⇝ )
142	9, 28, 30, 33, 35, 135, 139, 141	mertens 16096	. . 3 ⊢ (𝜑 → seq0( + , 𝐻) ⇝ (Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)) · Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘))))
143		efval 16286	. . . . 5 ⊢ (𝐴 ∈ ℂ → (exp‘𝐴) = Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)))
144	1, 143	syl 18	. . . 4 ⊢ (𝜑 → (exp‘𝐴) = Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)))
145		efval 16286	. . . . 5 ⊢ (𝐵 ∈ ℂ → (exp‘𝐵) = Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘)))
146	2, 145	syl 18	. . . 4 ⊢ (𝜑 → (exp‘𝐵) = Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘)))
147	144, 146	oveq12d 7467	. . 3 ⊢ (𝜑 → ((exp‘𝐴) · (exp‘𝐵)) = (Σ𝑗 ∈ ℕ0 ((𝐴↑𝑗) / (!‘𝑗)) · Σ𝑘 ∈ ℕ0 ((𝐵↑𝑘) / (!‘𝑘))))
148	142, 147	breqtrrd 5137	. 2 ⊢ (𝜑 → seq0( + , 𝐻) ⇝ ((exp‘𝐴) · (exp‘𝐵)))
149		climuni 15760	. 2 ⊢ ((seq0( + , 𝐻) ⇝ (exp‘(𝐴 + 𝐵)) ∧ seq0( + , 𝐻) ⇝ ((exp‘𝐴) · (exp‘𝐵))) → (exp‘(𝐴 + 𝐵)) = ((exp‘𝐴) · (exp‘𝐵)))
150	6, 148, 149	syl2anc 596	1 ⊢ (𝜑 → (exp‘(𝐴 + 𝐵)) = ((exp‘𝐴) · (exp‘𝐵)))

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2147   ≠ wne 2959   class class class wbr 5106   ↦ cmpt 5190  dom cdm 5656  ‘cfv 6564  (class class class)co 7449  ℂcc 11235  0cc0 11237  1c1 11238   + caddc 11240   · cmul 11242   − cmin 11578   / cdiv 12011  ℕcn 12373  ℕ₀cn0 12644  ...cfz 13677  seqcseq 14182  ↑cexp 14242  !cfa 14456  Ccbc 14485  abscabs 15442   ⇝ cli 15692  Σcsu 15894  expce 16268

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5236  ax-sep 5253  ax-nul 5264  ax-pow 5332  ax-pr 5396  ax-un 7781  ax-inf2 9677  ax-cnex 11293  ax-resscn 11294  ax-1cn 11295  ax-icn 11296  ax-addcl 11297  ax-addrcl 11298  ax-mulcl 11299  ax-mulrcl 11300  ax-mulcom 11301  ax-addass 11302  ax-mulass 11303  ax-distr 11304  ax-i2m1 11305  ax-1ne0 11306  ax-1rid 11307  ax-rnegex 11308  ax-rrecex 11309  ax-cnre 11310  ax-pre-lttri 11311  ax-pre-lttrn 11312  ax-pre-ltadd 11313  ax-pre-mulgt0 11314  ax-pre-sup 11315

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4839  df-uni 4871  df-int 4911  df-iun 4956  df-br 5107  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5551  df-eprel 5556  df-po 5564  df-so 5565  df-fr 5609  df-se 5610  df-we 5611  df-xp 5662  df-rel 5663  df-cnv 5664  df-co 5665  df-dm 5666  df-rn 5667  df-res 5668  df-ima 5669  df-pred 6328  df-ord 6389  df-on 6390  df-lim 6391  df-suc 6392  df-iota 6518  df-fun 6566  df-fn 6567  df-f 6568  df-f1 6569  df-fo 6570  df-f1o 6571  df-fv 6572  df-isom 6573  df-riota 7406  df-ov 7452  df-oprab 7453  df-mpo 7454  df-om 7910  df-1st 8033  df-2nd 8034  df-frecs 8335  df-wrecs 8366  df-recs 8415  df-rdg 8454  df-1o 8512  df-er 8753  df-pm 8886  df-en 9010  df-dom 9011  df-sdom 9012  df-fin 9013  df-sup 9469  df-inf 9470  df-oi 9539  df-card 10055  df-pnf 11382  df-mnf 11383  df-xr 11384  df-ltxr 11385  df-le 11386  df-sub 11580  df-neg 11581  df-div 12012  df-nn 12374  df-2 12443  df-3 12444  df-n0 12645  df-z 12732  df-uz 13004  df-rp 13159  df-ico 13520  df-fz 13678  df-fzo 13827  df-fl 13970  df-seq 14183  df-exp 14243  df-fac 14457  df-bc 14486  df-hash 14514  df-shft 15261  df-cj 15307  df-re 15308  df-im 15309  df-sqrt 15443  df-abs 15444  df-limsup 15679  df-clim 15696  df-rlim 15697  df-sum 15895  df-ef 16274

This theorem is used by:  efadd  16301