logtayl - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > logtayl		Structured version Visualization version GIF version

Theorem logtayl 26509

Description: The Taylor series for -log(1 − 𝐴). (Contributed by Mario Carneiro, 1-Apr-2015.)

**Assertion**
Ref	Expression
logtayl	⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ⇝ -(log‘(1 − 𝐴)))

Distinct variable group: 𝐴,𝑘

Proof of Theorem logtayl Dummy variables 𝑗 𝑚 𝑛 𝑟 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		nn0uz 12871	. . . 4 ⊢ ℕ₀ = (ℤ_≥‘0)
2		0zd 12577	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℤ)
3		eqeq1 2735	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → (𝑘 = 0 ↔ 𝑛 = 0))
4		oveq2 7420	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → (1 / 𝑘) = (1 / 𝑛))
5	3, 4	ifbieq2d 4554	. . . . . . 7 ⊢ (𝑘 = 𝑛 → if(𝑘 = 0, 0, (1 / 𝑘)) = if(𝑛 = 0, 0, (1 / 𝑛)))
6		oveq2 7420	. . . . . . 7 ⊢ (𝑘 = 𝑛 → (𝐴↑𝑘) = (𝐴↑𝑛))
7	5, 6	oveq12d 7430	. . . . . 6 ⊢ (𝑘 = 𝑛 → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
8		eqid 2731	. . . . . 6 ⊢ (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))) = (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))
9		ovex 7445	. . . . . 6 ⊢ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ V
10	7, 8, 9	fvmpt 6998	. . . . 5 ⊢ (𝑛 ∈ ℕ₀ → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
11	10	adantl 481	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
12		0cnd 11214	. . . . . 6 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 0 ∈ ℂ)
13		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → 𝑛 ∈ ℕ₀)
14		elnn0 12481	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ₀ ↔ (𝑛 ∈ ℕ ∨ 𝑛 = 0))
15	13, 14	sylib 217	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (𝑛 ∈ ℕ ∨ 𝑛 = 0))
16	15	ord 861	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 ∈ ℕ → 𝑛 = 0))
17	16	con1d 145	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 = 0 → 𝑛 ∈ ℕ))
18	17	imp 406	. . . . . . . 8 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑛 ∈ ℕ)
19	18	nnrecred 12270	. . . . . . 7 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℝ)
20	19	recnd 11249	. . . . . 6 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℂ)
21	12, 20	ifclda 4563	. . . . 5 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → if(𝑛 = 0, 0, (1 / 𝑛)) ∈ ℂ)
22		expcl 14052	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (𝐴↑𝑛) ∈ ℂ)
23	22	adantlr 712	. . . . 5 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (𝐴↑𝑛) ∈ ℂ)
24	21, 23	mulcld 11241	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ ℂ)
25		logtayllem 26508	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ dom ⇝ )
26	1, 2, 11, 24, 25	isumclim2 15711	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
27		simpl 482	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ ℂ)
28		0cn 11213	. . . . . . . 8 ⊢ 0 ∈ ℂ
29		eqid 2731	. . . . . . . . 9 ⊢ (abs ∘ − ) = (abs ∘ − )
30	29	cnmetdval 24608	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 0 ∈ ℂ) → (𝐴(abs ∘ − )0) = (abs‘(𝐴 − 0)))
31	27, 28, 30	sylancl 585	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) = (abs‘(𝐴 − 0)))
32		subid1 11487	. . . . . . . . 9 ⊢ (𝐴 ∈ ℂ → (𝐴 − 0) = 𝐴)
33	32	adantr 480	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴 − 0) = 𝐴)
34	33	fveq2d 6895	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘(𝐴 − 0)) = (abs‘𝐴))
35	31, 34	eqtrd 2771	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) = (abs‘𝐴))
36		simpr 484	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) < 1)
37	35, 36	eqbrtrd 5170	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) < 1)
38		cnxmet 24610	. . . . . . 7 ⊢ (abs ∘ − ) ∈ (∞Met‘ℂ)
39		1xr 11280	. . . . . . 7 ⊢ 1 ∈ ℝ^*
40		elbl3 24219	. . . . . . 7 ⊢ ((((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℝ^*) ∧ (0 ∈ ℂ ∧ 𝐴 ∈ ℂ)) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
41	38, 39, 40	mpanl12 699	. . . . . 6 ⊢ ((0 ∈ ℂ ∧ 𝐴 ∈ ℂ) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
42	28, 27, 41	sylancr 586	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
43	37, 42	mpbird 257	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ (0(ball‘(abs ∘ − ))1))
44		tru 1544	. . . . . 6 ⊢ ⊤
45		eqid 2731	. . . . . . . 8 ⊢ (0(ball‘(abs ∘ − ))1) = (0(ball‘(abs ∘ − ))1)
46		0cnd 11214	. . . . . . . 8 ⊢ (⊤ → 0 ∈ ℂ)
47	39	a1i 11	. . . . . . . 8 ⊢ (⊤ → 1 ∈ ℝ^*)
48		ax-1cn 11174	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℂ
49		blssm 24245	. . . . . . . . . . . . . . 15 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ^*) → (0(ball‘(abs ∘ − ))1) ⊆ ℂ)
50	38, 28, 39, 49	mp3an 1460	. . . . . . . . . . . . . 14 ⊢ (0(ball‘(abs ∘ − ))1) ⊆ ℂ
51	50	sseli 3978	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 𝑦 ∈ ℂ)
52		subcl 11466	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
53	48, 51, 52	sylancr 586	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ∈ ℂ)
54	51	abscld 15390	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ ℝ)
55	29	cnmetdval 24608	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℂ ∧ 0 ∈ ℂ) → (𝑦(abs ∘ − )0) = (abs‘(𝑦 − 0)))
56	51, 28, 55	sylancl 585	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) = (abs‘(𝑦 − 0)))
57	51	subid1d 11567	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦 − 0) = 𝑦)
58	57	fveq2d 6895	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(𝑦 − 0)) = (abs‘𝑦))
59	56, 58	eqtrd 2771	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) = (abs‘𝑦))
60		elbl3 24219	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℝ^*) ∧ (0 ∈ ℂ ∧ 𝑦 ∈ ℂ)) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
61	38, 39, 60	mpanl12 699	. . . . . . . . . . . . . . . . . 18 ⊢ ((0 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
62	28, 51, 61	sylancr 586	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
63	62	ibi 267	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) < 1)
64	59, 63	eqbrtrrd 5172	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < 1)
65	54, 64	gtned 11356	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ≠ (abs‘𝑦))
66		abs1 15251	. . . . . . . . . . . . . . . 16 ⊢ (abs‘1) = 1
67		fveq2 6891	. . . . . . . . . . . . . . . 16 ⊢ (1 = 𝑦 → (abs‘1) = (abs‘𝑦))
68	66, 67	eqtr3id 2785	. . . . . . . . . . . . . . 15 ⊢ (1 = 𝑦 → 1 = (abs‘𝑦))
69	68	necon3i 2972	. . . . . . . . . . . . . 14 ⊢ (1 ≠ (abs‘𝑦) → 1 ≠ 𝑦)
70	65, 69	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ≠ 𝑦)
71		subeq0 11493	. . . . . . . . . . . . . . 15 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((1 − 𝑦) = 0 ↔ 1 = 𝑦))
72	71	necon3bid 2984	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((1 − 𝑦) ≠ 0 ↔ 1 ≠ 𝑦))
73	48, 51, 72	sylancr 586	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 − 𝑦) ≠ 0 ↔ 1 ≠ 𝑦))
74	70, 73	mpbird 257	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ≠ 0)
75	53, 74	logcld 26420	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (log‘(1 − 𝑦)) ∈ ℂ)
76	75	negcld 11565	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -(log‘(1 − 𝑦)) ∈ ℂ)
77	76	adantl 481	. . . . . . . . 9 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → -(log‘(1 − 𝑦)) ∈ ℂ)
78	77	fmpttd 7116	. . . . . . . 8 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))):(0(ball‘(abs ∘ − ))1)⟶ℂ)
79	51	absge0d 15398	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ≤ (abs‘𝑦))
80	54	rexrd 11271	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ ℝ^*)
81		peano2re 11394	. . . . . . . . . . . . . . . 16 ⊢ ((abs‘𝑦) ∈ ℝ → ((abs‘𝑦) + 1) ∈ ℝ)
82	54, 81	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) + 1) ∈ ℝ)
83	82	rehalfcld 12466	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℝ)
84	83	rexrd 11271	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℝ^*)
85		iccssxr 13414	. . . . . . . . . . . . . . 15 ⊢ (0[,]+∞) ⊆ ℝ^*
86		eqeq1 2735	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑚 = 𝑗 → (𝑚 = 0 ↔ 𝑗 = 0))
87		oveq2 7420	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑚 = 𝑗 → (1 / 𝑚) = (1 / 𝑗))
88	86, 87	ifbieq2d 4554	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑗 → if(𝑚 = 0, 0, (1 / 𝑚)) = if(𝑗 = 0, 0, (1 / 𝑗)))
89		eqid 2731	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))) = (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))
90		c0ex 11215	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 0 ∈ V
91		ovex 7445	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (1 / 𝑗) ∈ V
92	90, 91	ifex 4578	. . . . . . . . . . . . . . . . . . . . 21 ⊢ if(𝑗 = 0, 0, (1 / 𝑗)) ∈ V
93	88, 89, 92	fvmpt 6998	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 ∈ ℕ₀ → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) = if(𝑗 = 0, 0, (1 / 𝑗)))
94	93	eqcomd 2737	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ → if(𝑗 = 0, 0, (1 / 𝑗)) = ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗))
95	94	oveq1d 7427	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑗 ∈ ℕ₀ → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗)))
96	95	mpteq2ia 5251	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗)))
97	96	mpteq2i 5253	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)))) = (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗))))
98		0cnd 11214	. . . . . . . . . . . . . . . . . 18 ⊢ (((⊤ ∧ 𝑚 ∈ ℕ₀) ∧ 𝑚 = 0) → 0 ∈ ℂ)
99		nn0cn 12489	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 ∈ ℕ₀ → 𝑚 ∈ ℂ)
100	99	adantl 481	. . . . . . . . . . . . . . . . . . 19 ⊢ ((⊤ ∧ 𝑚 ∈ ℕ₀) → 𝑚 ∈ ℂ)
101		neqne 2947	. . . . . . . . . . . . . . . . . . 19 ⊢ (¬ 𝑚 = 0 → 𝑚 ≠ 0)
102		reccl 11886	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑚 ∈ ℂ ∧ 𝑚 ≠ 0) → (1 / 𝑚) ∈ ℂ)
103	100, 101, 102	syl2an 595	. . . . . . . . . . . . . . . . . 18 ⊢ (((⊤ ∧ 𝑚 ∈ ℕ₀) ∧ ¬ 𝑚 = 0) → (1 / 𝑚) ∈ ℂ)
104	98, 103	ifclda 4563	. . . . . . . . . . . . . . . . 17 ⊢ ((⊤ ∧ 𝑚 ∈ ℕ₀) → if(𝑚 = 0, 0, (1 / 𝑚)) ∈ ℂ)
105	104	fmpttd 7116	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))):ℕ₀⟶ℂ)
106		recn 11206	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑟 ∈ ℝ → 𝑟 ∈ ℂ)
107		oveq1 7419	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑥 = 𝑟 → (𝑥↑𝑗) = (𝑟↑𝑗))
108	107	oveq2d 7428	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑥 = 𝑟 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))
109	108	mpteq2dv 5250	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 = 𝑟 → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))))
110		eqid 2731	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)))) = (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))
111		nn0ex 12485	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ℕ₀ ∈ V
112	111	mptex 7227	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))) ∈ V
113	109, 110, 112	fvmpt 6998	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑟 ∈ ℂ → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))))
114	106, 113	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑟 ∈ ℝ → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))))
115	114	eqcomd 2737	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑟 ∈ ℝ → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))) = ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟))
116	115	seqeq3d 13981	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑟 ∈ ℝ → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) = seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)))
117	116	eleq1d 2817	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑟 ∈ ℝ → (seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ ↔ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ ))
118	117	rabbiia 3435	. . . . . . . . . . . . . . . . 17 ⊢ {𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ } = {𝑟 ∈ ℝ ∣ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ }
119	118	supeq1i 9448	. . . . . . . . . . . . . . . 16 ⊢ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) = sup({𝑟 ∈ ℝ ∣ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ }, ℝ^, < )
120	97, 105, 119	radcnvcl 26269	. . . . . . . . . . . . . . 15 ⊢ (⊤ → sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ) ∈ (0[,]+∞))
121	85, 120	sselid 3980	. . . . . . . . . . . . . 14 ⊢ (⊤ → sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) ∈ ℝ^)
122	44, 121	mp1i 13	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) ∈ ℝ^)
123		1re 11221	. . . . . . . . . . . . . . 15 ⊢ 1 ∈ ℝ
124		avglt1 12457	. . . . . . . . . . . . . . 15 ⊢ (((abs‘𝑦) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝑦) < 1 ↔ (abs‘𝑦) < (((abs‘𝑦) + 1) / 2)))
125	54, 123, 124	sylancl 585	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) < 1 ↔ (abs‘𝑦) < (((abs‘𝑦) + 1) / 2)))
126	64, 125	mpbid 231	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < (((abs‘𝑦) + 1) / 2))
127		0red 11224	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ∈ ℝ)
128	127, 54, 83, 79, 126	lelttrd 11379	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 < (((abs‘𝑦) + 1) / 2))
129	127, 83, 128	ltled 11369	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ≤ (((abs‘𝑦) + 1) / 2))
130	83, 129	absidd 15376	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) = (((abs‘𝑦) + 1) / 2))
131	44, 105	mp1i 13	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))):ℕ₀⟶ℂ)
132	83	recnd 11249	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℂ)
133		oveq1 7419	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (𝑥↑𝑗) = ((((abs‘𝑦) + 1) / 2)↑𝑗))
134	133	oveq2d 7428	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))
135	134	mpteq2dv 5250	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))))
136	111	mptex 7227	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))) ∈ V
137	135, 110, 136	fvmpt 6998	. . . . . . . . . . . . . . . . . 18 ⊢ ((((abs‘𝑦) + 1) / 2) ∈ ℂ → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2)) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))))
138	132, 137	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2)) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))))
139	138	seqeq3d 13981	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2))) = seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))))
140		avglt2 12458	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((abs‘𝑦) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝑦) < 1 ↔ (((abs‘𝑦) + 1) / 2) < 1))
141	54, 123, 140	sylancl 585	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) < 1 ↔ (((abs‘𝑦) + 1) / 2) < 1))
142	64, 141	mpbid 231	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) < 1)
143	130, 142	eqbrtrd 5170	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) < 1)
144		logtayllem 26508	. . . . . . . . . . . . . . . . 17 ⊢ (((((abs‘𝑦) + 1) / 2) ∈ ℂ ∧ (abs‘(((abs‘𝑦) + 1) / 2)) < 1) → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))) ∈ dom ⇝ )
145	132, 143, 144	syl2anc 583	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))) ∈ dom ⇝ )
146	139, 145	eqeltrd 2832	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2))) ∈ dom ⇝ )
147	97, 131, 119, 132, 146	radcnvle 26272	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) ≤ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
148	130, 147	eqbrtrrd 5172	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ≤ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
149	80, 84, 122, 126, 148	xrltletrd 13147	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
150		0re 11223	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℝ
151		elico2 13395	. . . . . . . . . . . . 13 ⊢ ((0 ∈ ℝ ∧ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) ∈ ℝ^) → ((abs‘𝑦) ∈ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )) ↔ ((abs‘𝑦) ∈ ℝ ∧ 0 ≤ (abs‘𝑦) ∧ (abs‘𝑦) < sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))))
152	150, 122, 151	sylancr 586	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) ∈ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )) ↔ ((abs‘𝑦) ∈ ℝ ∧ 0 ≤ (abs‘𝑦) ∧ (abs‘𝑦) < sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))))
153	54, 79, 149, 152	mpbir3and 1341	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))
154		absf 15291	. . . . . . . . . . . 12 ⊢ abs:ℂ⟶ℝ
155		ffn 6717	. . . . . . . . . . . 12 ⊢ (abs:ℂ⟶ℝ → abs Fn ℂ)
156		elpreima 7059	. . . . . . . . . . . 12 ⊢ (abs Fn ℂ → (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↔ (𝑦 ∈ ℂ ∧ (abs‘𝑦) ∈ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))))
157	154, 155, 156	mp2b 10	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↔ (𝑦 ∈ ℂ ∧ (abs‘𝑦) ∈ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))))
158	51, 153, 157	sylanbrc 582	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))))
159		cnvimass 6080	. . . . . . . . . . . . . . . . 17 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) ⊆ dom abs
160	154	fdmi 6729	. . . . . . . . . . . . . . . . 17 ⊢ dom abs = ℂ
161	159, 160	sseqtri 4018	. . . . . . . . . . . . . . . 16 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) ⊆ ℂ
162	161	sseli 3978	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → 𝑦 ∈ ℂ)
163		oveq1 7419	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 = 𝑦 → (𝑥↑𝑗) = (𝑦↑𝑗))
164	163	oveq2d 7428	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑦 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))
165	164	mpteq2dv 5250	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑦 → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
166	111	mptex 7227	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))) ∈ V
167	165, 110, 166	fvmpt 6998	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ ℂ → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
168	167	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
169	168	fveq1d 6893	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛))
170		eqeq1 2735	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 𝑛 → (𝑗 = 0 ↔ 𝑛 = 0))
171		oveq2 7420	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 𝑛 → (1 / 𝑗) = (1 / 𝑛))
172	170, 171	ifbieq2d 4554	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝑛 → if(𝑗 = 0, 0, (1 / 𝑗)) = if(𝑛 = 0, 0, (1 / 𝑛)))
173		oveq2 7420	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝑛 → (𝑦↑𝑗) = (𝑦↑𝑛))
174	172, 173	oveq12d 7430	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 = 𝑛 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
175		eqid 2731	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))
176		ovex 7445	. . . . . . . . . . . . . . . . . . 19 ⊢ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ V
177	174, 175, 176	fvmpt 6998	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ₀ → ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
178	177	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
179	169, 178	eqtr2d 2772	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛))
180	179	sumeq2dv 15656	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℂ → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛))
181	162, 180	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛))
182	181	mpteq2ia 5251	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))) = (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛))
183		eqid 2731	. . . . . . . . . . . . 13 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) = (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))
184		eqid 2731	. . . . . . . . . . . . 13 ⊢ if(sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) ∈ ℝ, (((abs‘𝑧) + sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )) / 2), ((abs‘𝑧) + 1)) = if(sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) ∈ ℝ, (((abs‘𝑧) + sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )) / 2), ((abs‘𝑧) + 1))
185	97, 182, 105, 119, 183, 184	psercn 26279	. . . . . . . . . . . 12 ⊢ (⊤ → (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))) ∈ ((^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))–cn→ℂ))
186		cncff 24734	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))) ∈ ((^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))–cn→ℂ) → (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))):(^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))⟶ℂ)
187	185, 186	syl 17	. . . . . . . . . . 11 ⊢ (⊤ → (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))):(^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))⟶ℂ)
188	187	fvmptelcdm 7114	. . . . . . . . . 10 ⊢ ((⊤ ∧ 𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ ℂ)
189	158, 188	sylan2 592	. . . . . . . . 9 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ ℂ)
190	189	fmpttd 7116	. . . . . . . 8 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))):(0(ball‘(abs ∘ − ))1)⟶ℂ)
191		cnelprrecn 11209	. . . . . . . . . . . . 13 ⊢ ℂ ∈ {ℝ, ℂ}
192	191	a1i 11	. . . . . . . . . . . 12 ⊢ (⊤ → ℂ ∈ {ℝ, ℂ})
193	75	adantl 481	. . . . . . . . . . . 12 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → (log‘(1 − 𝑦)) ∈ ℂ)
194		ovexd 7447	. . . . . . . . . . . 12 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → ((1 / (1 − 𝑦)) · -1) ∈ V)
195	29	cnmetdval 24608	. . . . . . . . . . . . . . . . . 18 ⊢ ((1 ∈ ℂ ∧ (1 − 𝑦) ∈ ℂ) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘(1 − (1 − 𝑦))))
196	48, 53, 195	sylancr 586	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘(1 − (1 − 𝑦))))
197		nncan 11496	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − (1 − 𝑦)) = 𝑦)
198	48, 51, 197	sylancr 586	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − (1 − 𝑦)) = 𝑦)
199	198	fveq2d 6895	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(1 − (1 − 𝑦))) = (abs‘𝑦))
200	196, 199	eqtrd 2771	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘𝑦))
201	200, 64	eqbrtrd 5170	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) < 1)
202		elbl 24215	. . . . . . . . . . . . . . . 16 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℂ ∧ 1 ∈ ℝ^*) → ((1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1) ↔ ((1 − 𝑦) ∈ ℂ ∧ (1(abs ∘ − )(1 − 𝑦)) < 1)))
203	38, 48, 39, 202	mp3an 1460	. . . . . . . . . . . . . . 15 ⊢ ((1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1) ↔ ((1 − 𝑦) ∈ ℂ ∧ (1(abs ∘ − )(1 − 𝑦)) < 1))
204	53, 201, 203	sylanbrc 582	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1))
205	204	adantl 481	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → (1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1))
206		neg1cn 12333	. . . . . . . . . . . . . 14 ⊢ -1 ∈ ℂ
207	206	a1i 11	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → -1 ∈ ℂ)
208		eqid 2731	. . . . . . . . . . . . . . . . . 18 ⊢ (1(ball‘(abs ∘ − ))1) = (1(ball‘(abs ∘ − ))1)
209	208	dvlog2lem 26501	. . . . . . . . . . . . . . . . 17 ⊢ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ (-∞(,]0))
210	209	sseli 3978	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ∈ (ℂ ∖ (-∞(,]0)))
211	210	eldifad 3960	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ∈ ℂ)
212		eqid 2731	. . . . . . . . . . . . . . . . 17 ⊢ (ℂ ∖ (-∞(,]0)) = (ℂ ∖ (-∞(,]0))
213	212	logdmn0 26489	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (ℂ ∖ (-∞(,]0)) → 𝑥 ≠ 0)
214	210, 213	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ≠ 0)
215	211, 214	logcld 26420	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → (log‘𝑥) ∈ ℂ)
216	215	adantl 481	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑥 ∈ (1(ball‘(abs ∘ − ))1)) → (log‘𝑥) ∈ ℂ)
217		ovexd 7447	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑥 ∈ (1(ball‘(abs ∘ − ))1)) → (1 / 𝑥) ∈ V)
218		simpr 484	. . . . . . . . . . . . . . 15 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 𝑦 ∈ ℂ)
219	48, 218, 52	sylancr 586	. . . . . . . . . . . . . 14 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
220	206	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → -1 ∈ ℂ)
221		1cnd 11216	. . . . . . . . . . . . . . . 16 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 1 ∈ ℂ)
222		0cnd 11214	. . . . . . . . . . . . . . . 16 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 0 ∈ ℂ)
223		1cnd 11216	. . . . . . . . . . . . . . . . 17 ⊢ (⊤ → 1 ∈ ℂ)
224	192, 223	dvmptc 25811	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ 1)) = (𝑦 ∈ ℂ ↦ 0))
225	192	dvmptid 25810	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ 𝑦)) = (𝑦 ∈ ℂ ↦ 1))
226	192, 221, 222, 224, 218, 221, 225	dvmptsub 25820	. . . . . . . . . . . . . . 15 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ (1 − 𝑦))) = (𝑦 ∈ ℂ ↦ (0 − 1)))
227		df-neg 11454	. . . . . . . . . . . . . . . 16 ⊢ -1 = (0 − 1)
228	227	mpteq2i 5253	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℂ ↦ -1) = (𝑦 ∈ ℂ ↦ (0 − 1))
229	226, 228	eqtr4di 2789	. . . . . . . . . . . . . 14 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ (1 − 𝑦))) = (𝑦 ∈ ℂ ↦ -1))
230	50	a1i 11	. . . . . . . . . . . . . 14 ⊢ (⊤ → (0(ball‘(abs ∘ − ))1) ⊆ ℂ)
231		eqid 2731	. . . . . . . . . . . . . . . 16 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
232	231	cnfldtopon 24620	. . . . . . . . . . . . . . 15 ⊢ (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ)
233	232	toponrestid 22744	. . . . . . . . . . . . . 14 ⊢ (TopOpen‘ℂ_fld) = ((TopOpen‘ℂ_fld) ↾_t ℂ)
234	231	cnfldtopn 24619	. . . . . . . . . . . . . . . . 17 ⊢ (TopOpen‘ℂ_fld) = (MetOpen‘(abs ∘ − ))
235	234	blopn 24330	. . . . . . . . . . . . . . . 16 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ^*) → (0(ball‘(abs ∘ − ))1) ∈ (TopOpen‘ℂ_fld))
236	38, 28, 39, 235	mp3an 1460	. . . . . . . . . . . . . . 15 ⊢ (0(ball‘(abs ∘ − ))1) ∈ (TopOpen‘ℂ_fld)
237	236	a1i 11	. . . . . . . . . . . . . 14 ⊢ (⊤ → (0(ball‘(abs ∘ − ))1) ∈ (TopOpen‘ℂ_fld))
238	192, 219, 220, 229, 230, 233, 231, 237	dvmptres 25816	. . . . . . . . . . . . 13 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -1))
239		logf1o 26414	. . . . . . . . . . . . . . . . . . . 20 ⊢ log:(ℂ ∖ {0})–1-1-onto→ran log
240		f1of 6833	. . . . . . . . . . . . . . . . . . . 20 ⊢ (log:(ℂ ∖ {0})–1-1-onto→ran log → log:(ℂ ∖ {0})⟶ran log)
241	239, 240	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ log:(ℂ ∖ {0})⟶ran log
242	212	logdmss 26491	. . . . . . . . . . . . . . . . . . . 20 ⊢ (ℂ ∖ (-∞(,]0)) ⊆ (ℂ ∖ {0})
243	209, 242	sstri 3991	. . . . . . . . . . . . . . . . . . 19 ⊢ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ {0})
244		fssres 6757	. . . . . . . . . . . . . . . . . . 19 ⊢ ((log:(ℂ ∖ {0})⟶ran log ∧ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ {0})) → (log ↾ (1(ball‘(abs ∘ − ))1)):(1(ball‘(abs ∘ − ))1)⟶ran log)
245	241, 243, 244	mp2an 689	. . . . . . . . . . . . . . . . . 18 ⊢ (log ↾ (1(ball‘(abs ∘ − ))1)):(1(ball‘(abs ∘ − ))1)⟶ran log
246	245	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)):(1(ball‘(abs ∘ − ))1)⟶ran log)
247	246	feqmptd 6960	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥)))
248		fvres 6910	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥) = (log‘𝑥))
249	248	mpteq2ia 5251	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))
250	247, 249	eqtrdi 2787	. . . . . . . . . . . . . . 15 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥)))
251	250	oveq2d 7428	. . . . . . . . . . . . . 14 ⊢ (⊤ → (ℂ D (log ↾ (1(ball‘(abs ∘ − ))1))) = (ℂ D (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))))
252	208	dvlog2 26502	. . . . . . . . . . . . . 14 ⊢ (ℂ D (log ↾ (1(ball‘(abs ∘ − ))1))) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (1 / 𝑥))
253	251, 252	eqtr3di 2786	. . . . . . . . . . . . 13 ⊢ (⊤ → (ℂ D (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (1 / 𝑥)))
254		fveq2 6891	. . . . . . . . . . . . 13 ⊢ (𝑥 = (1 − 𝑦) → (log‘𝑥) = (log‘(1 − 𝑦)))
255		oveq2 7420	. . . . . . . . . . . . 13 ⊢ (𝑥 = (1 − 𝑦) → (1 / 𝑥) = (1 / (1 − 𝑦)))
256	192, 192, 205, 207, 216, 217, 238, 253, 254, 255	dvmptco 25825	. . . . . . . . . . . 12 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ ((1 / (1 − 𝑦)) · -1)))
257	192, 193, 194, 256	dvmptneg 25819	. . . . . . . . . . 11 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -((1 / (1 − 𝑦)) · -1)))
258	53, 74	reccld 11990	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 / (1 − 𝑦)) ∈ ℂ)
259		mulcom 11202	. . . . . . . . . . . . . . . 16 ⊢ (((1 / (1 − 𝑦)) ∈ ℂ ∧ -1 ∈ ℂ) → ((1 / (1 − 𝑦)) · -1) = (-1 · (1 / (1 − 𝑦))))
260	258, 206, 259	sylancl 585	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 / (1 − 𝑦)) · -1) = (-1 · (1 / (1 − 𝑦))))
261	258	mulm1d 11673	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (-1 · (1 / (1 − 𝑦))) = -(1 / (1 − 𝑦)))
262	260, 261	eqtrd 2771	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 / (1 − 𝑦)) · -1) = -(1 / (1 − 𝑦)))
263	262	negeqd 11461	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -((1 / (1 − 𝑦)) · -1) = --(1 / (1 − 𝑦)))
264	258	negnegd 11569	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → --(1 / (1 − 𝑦)) = (1 / (1 − 𝑦)))
265	263, 264	eqtrd 2771	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -((1 / (1 − 𝑦)) · -1) = (1 / (1 − 𝑦)))
266	265	mpteq2ia 5251	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -((1 / (1 − 𝑦)) · -1)) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦)))
267	257, 266	eqtrdi 2787	. . . . . . . . . 10 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
268	267	dmeqd 5905	. . . . . . . . 9 ⊢ (⊤ → dom (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
269		dmmptg 6241	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ (0(ball‘(abs ∘ − ))1)(1 / (1 − 𝑦)) ∈ V → dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))) = (0(ball‘(abs ∘ − ))1))
270		ovexd 7447	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 / (1 − 𝑦)) ∈ V)
271	269, 270	mprg 3066	. . . . . . . . 9 ⊢ dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))) = (0(ball‘(abs ∘ − ))1)
272	268, 271	eqtrdi 2787	. . . . . . . 8 ⊢ (⊤ → dom (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (0(ball‘(abs ∘ − ))1))
273		sumex 15641	. . . . . . . . . . . 12 ⊢ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) ∈ V
274	273	a1i 11	. . . . . . . . . . 11 ⊢ ((⊤ ∧ 𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) ∈ V)
275		fveq2 6891	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 𝑘 → (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
276	275	cbvsumv 15649	. . . . . . . . . . . . . 14 ⊢ Σ𝑛 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = Σ𝑘 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘)
277	181, 276	eqtrdi 2787	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑘 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
278	277	mpteq2ia 5251	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))) = (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑘 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
279		eqid 2731	. . . . . . . . . . . 12 ⊢ (0(ball‘(abs ∘ − ))(((abs‘𝑧) + if(sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) ∈ ℝ, (((abs‘𝑧) + sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )) / 2), ((abs‘𝑧) + 1))) / 2)) = (0(ball‘(abs ∘ − ))(((abs‘𝑧) + if(sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) ∈ ℝ, (((abs‘𝑧) + sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )) / 2), ((abs‘𝑧) + 1))) / 2))
280	97, 278, 105, 119, 183, 184, 279	pserdv2 26283	. . . . . . . . . . 11 ⊢ (⊤ → (ℂ D (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))) = (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1)))))
281	158	ssriv 3986	. . . . . . . . . . . 12 ⊢ (0(ball‘(abs ∘ − ))1) ⊆ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))
282	281	a1i 11	. . . . . . . . . . 11 ⊢ (⊤ → (0(ball‘(abs ∘ − ))1) ⊆ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))))
283	192, 188, 274, 280, 282, 233, 231, 237	dvmptres 25816	. . . . . . . . . 10 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1)))))
284		nnnn0 12486	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ₀)
285	284	adantl 481	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ₀)
286		eqeq1 2735	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (𝑚 = 0 ↔ 𝑛 = 0))
287		oveq2 7420	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (1 / 𝑚) = (1 / 𝑛))
288	286, 287	ifbieq2d 4554	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 = 𝑛 → if(𝑚 = 0, 0, (1 / 𝑚)) = if(𝑛 = 0, 0, (1 / 𝑛)))
289		ovex 7445	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (1 / 𝑛) ∈ V
290	90, 289	ifex 4578	. . . . . . . . . . . . . . . . . . . 20 ⊢ if(𝑛 = 0, 0, (1 / 𝑛)) ∈ V
291	288, 89, 290	fvmpt 6998	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ₀ → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)))
292	285, 291	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)))
293		nnne0 12253	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 𝑛 ≠ 0)
294	293	adantl 481	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
295	294	neneqd 2944	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ¬ 𝑛 = 0)
296	295	iffalsed 4539	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → if(𝑛 = 0, 0, (1 / 𝑛)) = (1 / 𝑛))
297	292, 296	eqtrd 2771	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛) = (1 / 𝑛))
298	297	oveq2d 7428	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) = (𝑛 · (1 / 𝑛)))
299		nncn 12227	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
300	299	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
301	300, 294	recidd 11992	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · (1 / 𝑛)) = 1)
302	298, 301	eqtrd 2771	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) = 1)
303	302	oveq1d 7427	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (1 · (𝑦↑(𝑛 − 1))))
304		nnm1nn0 12520	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → (𝑛 − 1) ∈ ℕ₀)
305		expcl 14052	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℂ ∧ (𝑛 − 1) ∈ ℕ₀) → (𝑦↑(𝑛 − 1)) ∈ ℂ)
306	51, 304, 305	syl2an 595	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑦↑(𝑛 − 1)) ∈ ℂ)
307	306	mullidd 11239	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (1 · (𝑦↑(𝑛 − 1))) = (𝑦↑(𝑛 − 1)))
308	303, 307	eqtrd 2771	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (𝑦↑(𝑛 − 1)))
309	308	sumeq2dv 15656	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)))
310		nnuz 12872	. . . . . . . . . . . . . . 15 ⊢ ℕ = (ℤ_≥‘1)
311		1e0p1 12726	. . . . . . . . . . . . . . . 16 ⊢ 1 = (0 + 1)
312	311	fveq2i 6894	. . . . . . . . . . . . . . 15 ⊢ (ℤ_≥‘1) = (ℤ_≥‘(0 + 1))
313	310, 312	eqtri 2759	. . . . . . . . . . . . . 14 ⊢ ℕ = (ℤ_≥‘(0 + 1))
314		oveq1 7419	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = (1 + 𝑚) → (𝑛 − 1) = ((1 + 𝑚) − 1))
315	314	oveq2d 7428	. . . . . . . . . . . . . 14 ⊢ (𝑛 = (1 + 𝑚) → (𝑦↑(𝑛 − 1)) = (𝑦↑((1 + 𝑚) − 1)))
316		1zzd 12600	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ∈ ℤ)
317		0zd 12577	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ∈ ℤ)
318	1, 313, 315, 316, 317, 306	isumshft 15792	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑((1 + 𝑚) − 1)))
319		pncan2 11474	. . . . . . . . . . . . . . . 16 ⊢ ((1 ∈ ℂ ∧ 𝑚 ∈ ℂ) → ((1 + 𝑚) − 1) = 𝑚)
320	48, 99, 319	sylancr 586	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ ℕ₀ → ((1 + 𝑚) − 1) = 𝑚)
321	320	oveq2d 7428	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ ℕ₀ → (𝑦↑((1 + 𝑚) − 1)) = (𝑦↑𝑚))
322	321	sumeq2i 15652	. . . . . . . . . . . . 13 ⊢ Σ𝑚 ∈ ℕ₀ (𝑦↑((1 + 𝑚) − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚)
323	318, 322	eqtrdi 2787	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚))
324		geoisum 15830	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ ℂ ∧ (abs‘𝑦) < 1) → Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚) = (1 / (1 − 𝑦)))
325	51, 64, 324	syl2anc 583	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚) = (1 / (1 − 𝑦)))
326	309, 323, 325	3eqtrd 2775	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (1 / (1 − 𝑦)))
327	326	mpteq2ia 5251	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦)))
328	283, 327	eqtrdi 2787	. . . . . . . . 9 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
329	267, 328	eqtr4d 2774	. . . . . . . 8 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))))
330		1rp 12985	. . . . . . . . . 10 ⊢ 1 ∈ ℝ⁺
331		blcntr 24240	. . . . . . . . . 10 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ⁺) → 0 ∈ (0(ball‘(abs ∘ − ))1))
332	38, 28, 330, 331	mp3an 1460	. . . . . . . . 9 ⊢ 0 ∈ (0(ball‘(abs ∘ − ))1)
333	332	a1i 11	. . . . . . . 8 ⊢ (⊤ → 0 ∈ (0(ball‘(abs ∘ − ))1))
334		oveq2 7420	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 0 → (1 − 𝑦) = (1 − 0))
335		1m0e1 12340	. . . . . . . . . . . . . . . 16 ⊢ (1 − 0) = 1
336	334, 335	eqtrdi 2787	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = 0 → (1 − 𝑦) = 1)
337	336	fveq2d 6895	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 0 → (log‘(1 − 𝑦)) = (log‘1))
338		log1 26435	. . . . . . . . . . . . . 14 ⊢ (log‘1) = 0
339	337, 338	eqtrdi 2787	. . . . . . . . . . . . 13 ⊢ (𝑦 = 0 → (log‘(1 − 𝑦)) = 0)
340	339	negeqd 11461	. . . . . . . . . . . 12 ⊢ (𝑦 = 0 → -(log‘(1 − 𝑦)) = -0)
341		neg0 11513	. . . . . . . . . . . 12 ⊢ -0 = 0
342	340, 341	eqtrdi 2787	. . . . . . . . . . 11 ⊢ (𝑦 = 0 → -(log‘(1 − 𝑦)) = 0)
343		eqid 2731	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))
344	342, 343, 90	fvmpt 6998	. . . . . . . . . 10 ⊢ (0 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘0) = 0)
345	332, 344	mp1i 13	. . . . . . . . 9 ⊢ (⊤ → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘0) = 0)
346		oveq1 7419	. . . . . . . . . . . . . . 15 ⊢ (0 = if(𝑛 = 0, 0, (1 / 𝑛)) → (0 · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
347	346	eqeq1d 2733	. . . . . . . . . . . . . 14 ⊢ (0 = if(𝑛 = 0, 0, (1 / 𝑛)) → ((0 · (𝑦↑𝑛)) = 0 ↔ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0))
348		oveq1 7419	. . . . . . . . . . . . . . 15 ⊢ ((1 / 𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)) → ((1 / 𝑛) · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
349	348	eqeq1d 2733	. . . . . . . . . . . . . 14 ⊢ ((1 / 𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)) → (((1 / 𝑛) · (𝑦↑𝑛)) = 0 ↔ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0))
350		simpll 764	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑦 = 0)
351	350, 28	eqeltrdi 2840	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑦 ∈ ℂ)
352		simplr 766	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑛 ∈ ℕ₀)
353	351, 352	expcld 14118	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → (𝑦↑𝑛) ∈ ℂ)
354	353	mul02d 11419	. . . . . . . . . . . . . 14 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → (0 · (𝑦↑𝑛)) = 0)
355		simpll 764	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑦 = 0)
356	355	oveq1d 7427	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (𝑦↑𝑛) = (0↑𝑛))
357		simpr 484	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → 𝑛 ∈ ℕ₀)
358	357, 14	sylib 217	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (𝑛 ∈ ℕ ∨ 𝑛 = 0))
359	358	ord 861	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 ∈ ℕ → 𝑛 = 0))
360	359	con1d 145	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 = 0 → 𝑛 ∈ ℕ))
361	360	imp 406	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑛 ∈ ℕ)
362	361	0expd 14111	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (0↑𝑛) = 0)
363	356, 362	eqtrd 2771	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (𝑦↑𝑛) = 0)
364	363	oveq2d 7428	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · (𝑦↑𝑛)) = ((1 / 𝑛) · 0))
365	361	nnrecred 12270	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℝ)
366	365	recnd 11249	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℂ)
367	366	mul01d 11420	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · 0) = 0)
368	364, 367	eqtrd 2771	. . . . . . . . . . . . . 14 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · (𝑦↑𝑛)) = 0)
369	347, 349, 354, 368	ifbothda 4566	. . . . . . . . . . . . 13 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0)
370	369	sumeq2dv 15656	. . . . . . . . . . . 12 ⊢ (𝑦 = 0 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ 0)
371	1	eqimssi 4042	. . . . . . . . . . . . . 14 ⊢ ℕ₀ ⊆ (ℤ_≥‘0)
372	371	orci 862	. . . . . . . . . . . . 13 ⊢ (ℕ₀ ⊆ (ℤ_≥‘0) ∨ ℕ₀ ∈ Fin)
373		sumz 15675	. . . . . . . . . . . . 13 ⊢ ((ℕ₀ ⊆ (ℤ_≥‘0) ∨ ℕ₀ ∈ Fin) → Σ𝑛 ∈ ℕ₀ 0 = 0)
374	372, 373	ax-mp 5	. . . . . . . . . . . 12 ⊢ Σ𝑛 ∈ ℕ₀ 0 = 0
375	370, 374	eqtrdi 2787	. . . . . . . . . . 11 ⊢ (𝑦 = 0 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0)
376		eqid 2731	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
377	375, 376, 90	fvmpt 6998	. . . . . . . . . 10 ⊢ (0 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘0) = 0)
378	332, 377	mp1i 13	. . . . . . . . 9 ⊢ (⊤ → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘0) = 0)
379	345, 378	eqtr4d 2774	. . . . . . . 8 ⊢ (⊤ → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘0) = ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘0))
380	45, 46, 47, 78, 190, 272, 329, 333, 379	dv11cn 25855	. . . . . . 7 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))))
381	380	fveq1d 6893	. . . . . 6 ⊢ (⊤ → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘𝐴) = ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘𝐴))
382	44, 381	mp1i 13	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘𝐴) = ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘𝐴))
383		oveq2 7420	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (1 − 𝑦) = (1 − 𝐴))
384	383	fveq2d 6895	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (log‘(1 − 𝑦)) = (log‘(1 − 𝐴)))
385	384	negeqd 11461	. . . . . 6 ⊢ (𝑦 = 𝐴 → -(log‘(1 − 𝑦)) = -(log‘(1 − 𝐴)))
386		negex 11465	. . . . . 6 ⊢ -(log‘(1 − 𝐴)) ∈ V
387	385, 343, 386	fvmpt 6998	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘𝐴) = -(log‘(1 − 𝐴)))
388		oveq1 7419	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (𝑦↑𝑛) = (𝐴↑𝑛))
389	388	oveq2d 7428	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
390	389	sumeq2sdv 15657	. . . . . 6 ⊢ (𝑦 = 𝐴 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
391		sumex 15641	. . . . . 6 ⊢ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ V
392	390, 376, 391	fvmpt 6998	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘𝐴) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
393	382, 387, 392	3eqtr3d 2779	. . . 4 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → -(log‘(1 − 𝐴)) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
394	43, 393	syl 17	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → -(log‘(1 − 𝐴)) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
395	26, 394	breqtrrd 5176	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ -(log‘(1 − 𝐴)))
396		seqex 13975	. . . 4 ⊢ seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ V
397	396	a1i 11	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ V)
398		seqex 13975	. . . 4 ⊢ seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ∈ V
399	398	a1i 11	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ∈ V)
400		1zzd 12600	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 1 ∈ ℤ)
401		elnnuz 12873	. . . . . 6 ⊢ (𝑛 ∈ ℕ ↔ 𝑛 ∈ (ℤ_≥‘1))
402		fvres 6910	. . . . . 6 ⊢ (𝑛 ∈ (ℤ_≥‘1) → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛))
403	401, 402	sylbi 216	. . . . 5 ⊢ (𝑛 ∈ ℕ → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛))
404	403	eqcomd 2737	. . . 4 ⊢ (𝑛 ∈ ℕ → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛) = ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛))
405		addlid 11404	. . . . . . . 8 ⊢ (𝑛 ∈ ℂ → (0 + 𝑛) = 𝑛)
406	405	adantl 481	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℂ) → (0 + 𝑛) = 𝑛)
407		0cnd 11214	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℂ)
408		1eluzge0 12883	. . . . . . . 8 ⊢ 1 ∈ (ℤ_≥‘0)
409	408	a1i 11	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 1 ∈ (ℤ_≥‘0))
410		0cnd 11214	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) ∧ 𝑘 = 0) → 0 ∈ ℂ)
411		nn0cn 12489	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ₀ → 𝑘 ∈ ℂ)
412	411	adantl 481	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → 𝑘 ∈ ℂ)
413		neqne 2947	. . . . . . . . . . . 12 ⊢ (¬ 𝑘 = 0 → 𝑘 ≠ 0)
414		reccl 11886	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℂ ∧ 𝑘 ≠ 0) → (1 / 𝑘) ∈ ℂ)
415	412, 413, 414	syl2an 595	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) ∧ ¬ 𝑘 = 0) → (1 / 𝑘) ∈ ℂ)
416	410, 415	ifclda 4563	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → if(𝑘 = 0, 0, (1 / 𝑘)) ∈ ℂ)
417		expcl 14052	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ₀) → (𝐴↑𝑘) ∈ ℂ)
418	417	adantlr 712	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → (𝐴↑𝑘) ∈ ℂ)
419	416, 418	mulcld 11241	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) ∈ ℂ)
420	419	fmpttd 7116	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))):ℕ₀⟶ℂ)
421		1nn0 12495	. . . . . . . 8 ⊢ 1 ∈ ℕ₀
422		ffvelcdm 7083	. . . . . . . 8 ⊢ (((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))):ℕ₀⟶ℂ ∧ 1 ∈ ℕ₀) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘1) ∈ ℂ)
423	420, 421, 422	sylancl 585	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘1) ∈ ℂ)
424		elfz1eq 13519	. . . . . . . . . 10 ⊢ (𝑛 ∈ (0...0) → 𝑛 = 0)
425		1m1e0 12291	. . . . . . . . . . 11 ⊢ (1 − 1) = 0
426	425	oveq2i 7423	. . . . . . . . . 10 ⊢ (0...(1 − 1)) = (0...0)
427	424, 426	eleq2s 2850	. . . . . . . . 9 ⊢ (𝑛 ∈ (0...(1 − 1)) → 𝑛 = 0)
428	427	fveq2d 6895	. . . . . . . 8 ⊢ (𝑛 ∈ (0...(1 − 1)) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0))
429		0nn0 12494	. . . . . . . . . 10 ⊢ 0 ∈ ℕ₀
430		iftrue 4534	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → if(𝑘 = 0, 0, (1 / 𝑘)) = 0)
431		oveq2 7420	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → (𝐴↑𝑘) = (𝐴↑0))
432	430, 431	oveq12d 7430	. . . . . . . . . . 11 ⊢ (𝑘 = 0 → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) = (0 · (𝐴↑0)))
433		ovex 7445	. . . . . . . . . . 11 ⊢ (0 · (𝐴↑0)) ∈ V
434	432, 8, 433	fvmpt 6998	. . . . . . . . . 10 ⊢ (0 ∈ ℕ₀ → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0) = (0 · (𝐴↑0)))
435	429, 434	ax-mp 5	. . . . . . . . 9 ⊢ ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0) = (0 · (𝐴↑0))
436		expcl 14052	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 0 ∈ ℕ₀) → (𝐴↑0) ∈ ℂ)
437	27, 429, 436	sylancl 585	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴↑0) ∈ ℂ)
438	437	mul02d 11419	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (0 · (𝐴↑0)) = 0)
439	435, 438	eqtrid 2783	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0) = 0)
440	428, 439	sylan9eqr 2793	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ (0...(1 − 1))) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = 0)
441	406, 407, 409, 423, 440	seqid 14020	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1)) = seq1( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))))
442	293	adantl 481	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
443	442	neneqd 2944	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ¬ 𝑛 = 0)
444	443	iffalsed 4539	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → if(𝑛 = 0, 0, (1 / 𝑛)) = (1 / 𝑛))
445	444	oveq1d 7427	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) = ((1 / 𝑛) · (𝐴↑𝑛)))
446	284, 23	sylan2 592	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (𝐴↑𝑛) ∈ ℂ)
447	299	adantl 481	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
448	446, 447, 442	divrec2d 12001	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝐴↑𝑛) / 𝑛) = ((1 / 𝑛) · (𝐴↑𝑛)))
449	445, 448	eqtr4d 2774	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) = ((𝐴↑𝑛) / 𝑛))
450	284, 11	sylan2 592	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
451		id 22	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑛 → 𝑘 = 𝑛)
452	6, 451	oveq12d 7430	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑛 → ((𝐴↑𝑘) / 𝑘) = ((𝐴↑𝑛) / 𝑛))
453		eqid 2731	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)) = (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))
454		ovex 7445	. . . . . . . . . . 11 ⊢ ((𝐴↑𝑛) / 𝑛) ∈ V
455	452, 453, 454	fvmpt 6998	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛) = ((𝐴↑𝑛) / 𝑛))
456	455	adantl 481	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛) = ((𝐴↑𝑛) / 𝑛))
457	449, 450, 456	3eqtr4d 2781	. . . . . . . 8 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛))
458	401, 457	sylan2br 594	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ (ℤ_≥‘1)) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛))
459	400, 458	seqfeq 14000	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) = seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))))
460	441, 459	eqtrd 2771	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1)) = seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))))
461	460	fveq1d 6893	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)))‘𝑛))
462	404, 461	sylan9eqr 2793	. . 3 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛) = (seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)))‘𝑛))
463	310, 397, 399, 400, 462	climeq 15518	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ -(log‘(1 − 𝐴)) ↔ seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ⇝ -(log‘(1 − 𝐴))))
464	395, 463	mpbid 231	1 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ⇝ -(log‘(1 − 𝐴)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 395 ∨ wo 844 ∧ w3a 1086 = wceq 1540 ⊤wtru 1541 ∈ wcel 2105 ≠ wne 2939 {crab 3431 Vcvv 3473 ∖ cdif 3945 ⊆ wss 3948 ifcif 4528 {csn 4628 {cpr 4630 class class class wbr 5148 ↦ cmpt 5231 ^◡ccnv 5675 dom cdm 5676 ran crn 5677 ↾ cres 5678 “ cima 5679 ∘ ccom 5680 Fn wfn 6538 ⟶wf 6539 –1-1-onto→wf1o 6542 ‘cfv 6543 (class class class)co 7412 Fincfn 8945 supcsup 9441 ℂcc 11114 ℝcr 11115 0cc0 11116 1c1 11117 + caddc 11119 · cmul 11121 +∞cpnf 11252 -∞cmnf 11253 ℝ^*cxr 11254 < clt 11255 ≤ cle 11256 − cmin 11451 -cneg 11452 / cdiv 11878 ℕcn 12219 2c2 12274 ℕ₀cn0 12479 ℤ_≥cuz 12829 ℝ⁺crp 12981 (,]cioc 13332 [,)cico 13333 [,]cicc 13334 ...cfz 13491 seqcseq 13973 ↑cexp 14034 abscabs 15188 ⇝ cli 15435 Σcsu 15639 TopOpenctopn 17374 ∞Metcxmet 21219 ballcbl 21221 ℂ_fldccnfld 21234 –cn→ccncf 24717 D cdv 25713 logclog 26404

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1912 ax-6 1970 ax-7 2010 ax-8 2107 ax-9 2115 ax-10 2136 ax-11 2153 ax-12 2170 ax-ext 2702 ax-rep 5285 ax-sep 5299 ax-nul 5306 ax-pow 5363 ax-pr 5427 ax-un 7729 ax-inf2 9642 ax-cnex 11172 ax-resscn 11173 ax-1cn 11174 ax-icn 11175 ax-addcl 11176 ax-addrcl 11177 ax-mulcl 11178 ax-mulrcl 11179 ax-mulcom 11180 ax-addass 11181 ax-mulass 11182 ax-distr 11183 ax-i2m1 11184 ax-1ne0 11185 ax-1rid 11186 ax-rnegex 11187 ax-rrecex 11188 ax-cnre 11189 ax-pre-lttri 11190 ax-pre-lttrn 11191 ax-pre-ltadd 11192 ax-pre-mulgt0 11193 ax-pre-sup 11194 ax-addf 11195

This theorem depends on definitions: df-bi 206 df-an 396 df-or 845 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1781 df-nf 1785 df-sb 2067 df-mo 2533 df-eu 2562 df-clab 2709 df-cleq 2723 df-clel 2809 df-nfc 2884 df-ne 2940 df-nel 3046 df-ral 3061 df-rex 3070 df-rmo 3375 df-reu 3376 df-rab 3432 df-v 3475 df-sbc 3778 df-csb 3894 df-dif 3951 df-un 3953 df-in 3955 df-ss 3965 df-pss 3967 df-nul 4323 df-if 4529 df-pw 4604 df-sn 4629 df-pr 4631 df-tp 4633 df-op 4635 df-uni 4909 df-int 4951 df-iun 4999 df-iin 5000 df-br 5149 df-opab 5211 df-mpt 5232 df-tr 5266 df-id 5574 df-eprel 5580 df-po 5588 df-so 5589 df-fr 5631 df-se 5632 df-we 5633 df-xp 5682 df-rel 5683 df-cnv 5684 df-co 5685 df-dm 5686 df-rn 5687 df-res 5688 df-ima 5689 df-pred 6300 df-ord 6367 df-on 6368 df-lim 6369 df-suc 6370 df-iota 6495 df-fun 6545 df-fn 6546 df-f 6547 df-f1 6548 df-fo 6549 df-f1o 6550 df-fv 6551 df-isom 6552 df-riota 7368 df-ov 7415 df-oprab 7416 df-mpo 7417 df-of 7674 df-om 7860 df-1st 7979 df-2nd 7980 df-supp 8152 df-frecs 8272 df-wrecs 8303 df-recs 8377 df-rdg 8416 df-1o 8472 df-2o 8473 df-er 8709 df-map 8828 df-pm 8829 df-ixp 8898 df-en 8946 df-dom 8947 df-sdom 8948 df-fin 8949 df-fsupp 9368 df-fi 9412 df-sup 9443 df-inf 9444 df-oi 9511 df-card 9940 df-pnf 11257 df-mnf 11258 df-xr 11259 df-ltxr 11260 df-le 11261 df-sub 11453 df-neg 11454 df-div 11879 df-nn 12220 df-2 12282 df-3 12283 df-4 12284 df-5 12285 df-6 12286 df-7 12287 df-8 12288 df-9 12289 df-n0 12480 df-z 12566 df-dec 12685 df-uz 12830 df-q 12940 df-rp 12982 df-xneg 13099 df-xadd 13100 df-xmul 13101 df-ioo 13335 df-ioc 13336 df-ico 13337 df-icc 13338 df-fz 13492 df-fzo 13635 df-fl 13764 df-mod 13842 df-seq 13974 df-exp 14035 df-fac 14241 df-bc 14270 df-hash 14298 df-shft 15021 df-cj 15053 df-re 15054 df-im 15055 df-sqrt 15189 df-abs 15190 df-limsup 15422 df-clim 15439 df-rlim 15440 df-sum 15640 df-ef 16018 df-sin 16020 df-cos 16021 df-tan 16022 df-pi 16023 df-struct 17087 df-sets 17104 df-slot 17122 df-ndx 17134 df-base 17152 df-ress 17181 df-plusg 17217 df-mulr 17218 df-starv 17219 df-sca 17220 df-vsca 17221 df-ip 17222 df-tset 17223 df-ple 17224 df-ds 17226 df-unif 17227 df-hom 17228 df-cco 17229 df-rest 17375 df-topn 17376 df-0g 17394 df-gsum 17395 df-topgen 17396 df-pt 17397 df-prds 17400 df-xrs 17455 df-qtop 17460 df-imas 17461 df-xps 17463 df-mre 17537 df-mrc 17538 df-acs 17540 df-mgm 18571 df-sgrp 18650 df-mnd 18666 df-submnd 18712 df-mulg 18994 df-cntz 19229 df-cmn 19698 df-psmet 21226 df-xmet 21227 df-met 21228 df-bl 21229 df-mopn 21230 df-fbas 21231 df-fg 21232 df-cnfld 21235 df-top 22717 df-topon 22734 df-topsp 22756 df-bases 22770 df-cld 22844 df-ntr 22845 df-cls 22846 df-nei 22923 df-lp 22961 df-perf 22962 df-cn 23052 df-cnp 23053 df-haus 23140 df-cmp 23212 df-tx 23387 df-hmeo 23580 df-fil 23671 df-fm 23763 df-flim 23764 df-flf 23765 df-xms 24147 df-ms 24148 df-tms 24149 df-cncf 24719 df-limc 25716 df-dv 25717 df-ulm 26229 df-log 26406

This theorem is referenced by: logtaylsum 26510 logtayl2 26511 atantayl 26784 stirlinglem5 45256

W3C validator