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 25824

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 12629	. . . 4 ⊢ ℕ₀ = (ℤ_≥‘0)
2		0zd 12340	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℤ)
3		eqeq1 2743	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → (𝑘 = 0 ↔ 𝑛 = 0))
4		oveq2 7292	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → (1 / 𝑘) = (1 / 𝑛))
5	3, 4	ifbieq2d 4486	. . . . . . 7 ⊢ (𝑘 = 𝑛 → if(𝑘 = 0, 0, (1 / 𝑘)) = if(𝑛 = 0, 0, (1 / 𝑛)))
6		oveq2 7292	. . . . . . 7 ⊢ (𝑘 = 𝑛 → (𝐴↑𝑘) = (𝐴↑𝑛))
7	5, 6	oveq12d 7302	. . . . . 6 ⊢ (𝑘 = 𝑛 → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
8		eqid 2739	. . . . . 6 ⊢ (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))) = (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))
9		ovex 7317	. . . . . 6 ⊢ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ V
10	7, 8, 9	fvmpt 6884	. . . . 5 ⊢ (𝑛 ∈ ℕ₀ → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
11	10	adantl 482	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
12		0cnd 10977	. . . . . 6 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 0 ∈ ℂ)
13		simpr 485	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → 𝑛 ∈ ℕ₀)
14		elnn0 12244	. . . . . . . . . . . 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 407	. . . . . . . 8 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑛 ∈ ℕ)
19	18	nnrecred 12033	. . . . . . 7 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℝ)
20	19	recnd 11012	. . . . . 6 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℂ)
21	12, 20	ifclda 4495	. . . . 5 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → if(𝑛 = 0, 0, (1 / 𝑛)) ∈ ℂ)
22		expcl 13809	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (𝐴↑𝑛) ∈ ℂ)
23	22	adantlr 712	. . . . 5 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (𝐴↑𝑛) ∈ ℂ)
24	21, 23	mulcld 11004	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ ℂ)
25		logtayllem 25823	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ dom ⇝ )
26	1, 2, 11, 24, 25	isumclim2 15479	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
27		simpl 483	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ ℂ)
28		0cn 10976	. . . . . . . 8 ⊢ 0 ∈ ℂ
29		eqid 2739	. . . . . . . . 9 ⊢ (abs ∘ − ) = (abs ∘ − )
30	29	cnmetdval 23943	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 0 ∈ ℂ) → (𝐴(abs ∘ − )0) = (abs‘(𝐴 − 0)))
31	27, 28, 30	sylancl 586	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) = (abs‘(𝐴 − 0)))
32		subid1 11250	. . . . . . . . 9 ⊢ (𝐴 ∈ ℂ → (𝐴 − 0) = 𝐴)
33	32	adantr 481	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴 − 0) = 𝐴)
34	33	fveq2d 6787	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘(𝐴 − 0)) = (abs‘𝐴))
35	31, 34	eqtrd 2779	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) = (abs‘𝐴))
36		simpr 485	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) < 1)
37	35, 36	eqbrtrd 5097	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) < 1)
38		cnxmet 23945	. . . . . . 7 ⊢ (abs ∘ − ) ∈ (∞Met‘ℂ)
39		1xr 11043	. . . . . . 7 ⊢ 1 ∈ ℝ^*
40		elbl3 23554	. . . . . . 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 587	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
43	37, 42	mpbird 256	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ (0(ball‘(abs ∘ − ))1))
44		tru 1543	. . . . . 6 ⊢ ⊤
45		eqid 2739	. . . . . . . 8 ⊢ (0(ball‘(abs ∘ − ))1) = (0(ball‘(abs ∘ − ))1)
46		0cnd 10977	. . . . . . . 8 ⊢ (⊤ → 0 ∈ ℂ)
47	39	a1i 11	. . . . . . . 8 ⊢ (⊤ → 1 ∈ ℝ^*)
48		ax-1cn 10938	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℂ
49		blssm 23580	. . . . . . . . . . . . . . 15 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ^*) → (0(ball‘(abs ∘ − ))1) ⊆ ℂ)
50	38, 28, 39, 49	mp3an 1460	. . . . . . . . . . . . . 14 ⊢ (0(ball‘(abs ∘ − ))1) ⊆ ℂ
51	50	sseli 3918	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 𝑦 ∈ ℂ)
52		subcl 11229	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
53	48, 51, 52	sylancr 587	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ∈ ℂ)
54	51	abscld 15157	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ ℝ)
55	29	cnmetdval 23943	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℂ ∧ 0 ∈ ℂ) → (𝑦(abs ∘ − )0) = (abs‘(𝑦 − 0)))
56	51, 28, 55	sylancl 586	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) = (abs‘(𝑦 − 0)))
57	51	subid1d 11330	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦 − 0) = 𝑦)
58	57	fveq2d 6787	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(𝑦 − 0)) = (abs‘𝑦))
59	56, 58	eqtrd 2779	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) = (abs‘𝑦))
60		elbl3 23554	. . . . . . . . . . . . . . . . . . 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 587	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
63	62	ibi 266	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) < 1)
64	59, 63	eqbrtrrd 5099	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < 1)
65	54, 64	gtned 11119	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ≠ (abs‘𝑦))
66		abs1 15018	. . . . . . . . . . . . . . . 16 ⊢ (abs‘1) = 1
67		fveq2 6783	. . . . . . . . . . . . . . . 16 ⊢ (1 = 𝑦 → (abs‘1) = (abs‘𝑦))
68	66, 67	eqtr3id 2793	. . . . . . . . . . . . . . 15 ⊢ (1 = 𝑦 → 1 = (abs‘𝑦))
69	68	necon3i 2977	. . . . . . . . . . . . . 14 ⊢ (1 ≠ (abs‘𝑦) → 1 ≠ 𝑦)
70	65, 69	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ≠ 𝑦)
71		subeq0 11256	. . . . . . . . . . . . . . 15 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((1 − 𝑦) = 0 ↔ 1 = 𝑦))
72	71	necon3bid 2989	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((1 − 𝑦) ≠ 0 ↔ 1 ≠ 𝑦))
73	48, 51, 72	sylancr 587	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 − 𝑦) ≠ 0 ↔ 1 ≠ 𝑦))
74	70, 73	mpbird 256	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ≠ 0)
75	53, 74	logcld 25735	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (log‘(1 − 𝑦)) ∈ ℂ)
76	75	negcld 11328	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -(log‘(1 − 𝑦)) ∈ ℂ)
77	76	adantl 482	. . . . . . . . 9 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → -(log‘(1 − 𝑦)) ∈ ℂ)
78	77	fmpttd 6998	. . . . . . . 8 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))):(0(ball‘(abs ∘ − ))1)⟶ℂ)
79	51	absge0d 15165	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ≤ (abs‘𝑦))
80	54	rexrd 11034	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ ℝ^*)
81		peano2re 11157	. . . . . . . . . . . . . . . 16 ⊢ ((abs‘𝑦) ∈ ℝ → ((abs‘𝑦) + 1) ∈ ℝ)
82	54, 81	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) + 1) ∈ ℝ)
83	82	rehalfcld 12229	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℝ)
84	83	rexrd 11034	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℝ^*)
85		iccssxr 13171	. . . . . . . . . . . . . . 15 ⊢ (0[,]+∞) ⊆ ℝ^*
86		eqeq1 2743	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑚 = 𝑗 → (𝑚 = 0 ↔ 𝑗 = 0))
87		oveq2 7292	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑚 = 𝑗 → (1 / 𝑚) = (1 / 𝑗))
88	86, 87	ifbieq2d 4486	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑗 → if(𝑚 = 0, 0, (1 / 𝑚)) = if(𝑗 = 0, 0, (1 / 𝑗)))
89		eqid 2739	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))) = (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))
90		c0ex 10978	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 0 ∈ V
91		ovex 7317	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (1 / 𝑗) ∈ V
92	90, 91	ifex 4510	. . . . . . . . . . . . . . . . . . . . 21 ⊢ if(𝑗 = 0, 0, (1 / 𝑗)) ∈ V
93	88, 89, 92	fvmpt 6884	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 ∈ ℕ₀ → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) = if(𝑗 = 0, 0, (1 / 𝑗)))
94	93	eqcomd 2745	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ → if(𝑗 = 0, 0, (1 / 𝑗)) = ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗))
95	94	oveq1d 7299	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑗 ∈ ℕ₀ → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗)))
96	95	mpteq2ia 5178	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗)))
97	96	mpteq2i 5180	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)))) = (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗))))
98		0cnd 10977	. . . . . . . . . . . . . . . . . 18 ⊢ (((⊤ ∧ 𝑚 ∈ ℕ₀) ∧ 𝑚 = 0) → 0 ∈ ℂ)
99		nn0cn 12252	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 ∈ ℕ₀ → 𝑚 ∈ ℂ)
100	99	adantl 482	. . . . . . . . . . . . . . . . . . 19 ⊢ ((⊤ ∧ 𝑚 ∈ ℕ₀) → 𝑚 ∈ ℂ)
101		neqne 2952	. . . . . . . . . . . . . . . . . . 19 ⊢ (¬ 𝑚 = 0 → 𝑚 ≠ 0)
102		reccl 11649	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑚 ∈ ℂ ∧ 𝑚 ≠ 0) → (1 / 𝑚) ∈ ℂ)
103	100, 101, 102	syl2an 596	. . . . . . . . . . . . . . . . . 18 ⊢ (((⊤ ∧ 𝑚 ∈ ℕ₀) ∧ ¬ 𝑚 = 0) → (1 / 𝑚) ∈ ℂ)
104	98, 103	ifclda 4495	. . . . . . . . . . . . . . . . 17 ⊢ ((⊤ ∧ 𝑚 ∈ ℕ₀) → if(𝑚 = 0, 0, (1 / 𝑚)) ∈ ℂ)
105	104	fmpttd 6998	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))):ℕ₀⟶ℂ)
106		recn 10970	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑟 ∈ ℝ → 𝑟 ∈ ℂ)
107		oveq1 7291	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑥 = 𝑟 → (𝑥↑𝑗) = (𝑟↑𝑗))
108	107	oveq2d 7300	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑥 = 𝑟 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))
109	108	mpteq2dv 5177	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 = 𝑟 → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))))
110		eqid 2739	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)))) = (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))
111		nn0ex 12248	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ℕ₀ ∈ V
112	111	mptex 7108	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))) ∈ V
113	109, 110, 112	fvmpt 6884	. . . . . . . . . . . . . . . . . . . . . 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 2745	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑟 ∈ ℝ → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))) = ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟))
116	115	seqeq3d 13738	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑟 ∈ ℝ → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) = seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)))
117	116	eleq1d 2824	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑟 ∈ ℝ → (seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ ↔ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ ))
118	117	rabbiia 3408	. . . . . . . . . . . . . . . . 17 ⊢ {𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ } = {𝑟 ∈ ℝ ∣ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ }
119	118	supeq1i 9215	. . . . . . . . . . . . . . . 16 ⊢ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) = sup({𝑟 ∈ ℝ ∣ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ }, ℝ^, < )
120	97, 105, 119	radcnvcl 25585	. . . . . . . . . . . . . . 15 ⊢ (⊤ → sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ) ∈ (0[,]+∞))
121	85, 120	sselid 3920	. . . . . . . . . . . . . 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 10984	. . . . . . . . . . . . . . 15 ⊢ 1 ∈ ℝ
124		avglt1 12220	. . . . . . . . . . . . . . 15 ⊢ (((abs‘𝑦) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝑦) < 1 ↔ (abs‘𝑦) < (((abs‘𝑦) + 1) / 2)))
125	54, 123, 124	sylancl 586	. . . . . . . . . . . . . 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 10987	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ∈ ℝ)
128	127, 54, 83, 79, 126	lelttrd 11142	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 < (((abs‘𝑦) + 1) / 2))
129	127, 83, 128	ltled 11132	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ≤ (((abs‘𝑦) + 1) / 2))
130	83, 129	absidd 15143	. . . . . . . . . . . . . 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 11012	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℂ)
133		oveq1 7291	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (𝑥↑𝑗) = ((((abs‘𝑦) + 1) / 2)↑𝑗))
134	133	oveq2d 7300	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))
135	134	mpteq2dv 5177	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))))
136	111	mptex 7108	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))) ∈ V
137	135, 110, 136	fvmpt 6884	. . . . . . . . . . . . . . . . . 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 13738	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2))) = seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))))
140		avglt2 12221	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((abs‘𝑦) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝑦) < 1 ↔ (((abs‘𝑦) + 1) / 2) < 1))
141	54, 123, 140	sylancl 586	. . . . . . . . . . . . . . . . . . 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 5097	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) < 1)
144		logtayllem 25823	. . . . . . . . . . . . . . . . 17 ⊢ (((((abs‘𝑦) + 1) / 2) ∈ ℂ ∧ (abs‘(((abs‘𝑦) + 1) / 2)) < 1) → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))) ∈ dom ⇝ )
145	132, 143, 144	syl2anc 584	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))) ∈ dom ⇝ )
146	139, 145	eqeltrd 2840	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2))) ∈ dom ⇝ )
147	97, 131, 119, 132, 146	radcnvle 25588	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) ≤ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
148	130, 147	eqbrtrrd 5099	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ≤ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
149	80, 84, 122, 126, 148	xrltletrd 12904	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
150		0re 10986	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℝ
151		elico2 13152	. . . . . . . . . . . . 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 587	. . . . . . . . . . . 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 15058	. . . . . . . . . . . 12 ⊢ abs:ℂ⟶ℝ
155		ffn 6609	. . . . . . . . . . . 12 ⊢ (abs:ℂ⟶ℝ → abs Fn ℂ)
156		elpreima 6944	. . . . . . . . . . . 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 583	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))))
159		cnvimass 5992	. . . . . . . . . . . . . . . . 17 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) ⊆ dom abs
160	154	fdmi 6621	. . . . . . . . . . . . . . . . 17 ⊢ dom abs = ℂ
161	159, 160	sseqtri 3958	. . . . . . . . . . . . . . . 16 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) ⊆ ℂ
162	161	sseli 3918	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → 𝑦 ∈ ℂ)
163		oveq1 7291	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 = 𝑦 → (𝑥↑𝑗) = (𝑦↑𝑗))
164	163	oveq2d 7300	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑦 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))
165	164	mpteq2dv 5177	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑦 → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
166	111	mptex 7108	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))) ∈ V
167	165, 110, 166	fvmpt 6884	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ ℂ → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
168	167	adantr 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
169	168	fveq1d 6785	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛))
170		eqeq1 2743	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 𝑛 → (𝑗 = 0 ↔ 𝑛 = 0))
171		oveq2 7292	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 𝑛 → (1 / 𝑗) = (1 / 𝑛))
172	170, 171	ifbieq2d 4486	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝑛 → if(𝑗 = 0, 0, (1 / 𝑗)) = if(𝑛 = 0, 0, (1 / 𝑛)))
173		oveq2 7292	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝑛 → (𝑦↑𝑗) = (𝑦↑𝑛))
174	172, 173	oveq12d 7302	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 = 𝑛 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
175		eqid 2739	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))
176		ovex 7317	. . . . . . . . . . . . . . . . . . 19 ⊢ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ V
177	174, 175, 176	fvmpt 6884	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ₀ → ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
178	177	adantl 482	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
179	169, 178	eqtr2d 2780	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛))
180	179	sumeq2dv 15424	. . . . . . . . . . . . . . 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 5178	. . . . . . . . . . . . 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 2739	. . . . . . . . . . . . 13 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) = (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))
184		eqid 2739	. . . . . . . . . . . . 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 25594	. . . . . . . . . . . 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 24065	. . . . . . . . . . . 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	fvmptelrn 6996	. . . . . . . . . 10 ⊢ ((⊤ ∧ 𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ ℂ)
189	158, 188	sylan2 593	. . . . . . . . 9 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ ℂ)
190	189	fmpttd 6998	. . . . . . . 8 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))):(0(ball‘(abs ∘ − ))1)⟶ℂ)
191		cnelprrecn 10973	. . . . . . . . . . . . 13 ⊢ ℂ ∈ {ℝ, ℂ}
192	191	a1i 11	. . . . . . . . . . . 12 ⊢ (⊤ → ℂ ∈ {ℝ, ℂ})
193	75	adantl 482	. . . . . . . . . . . 12 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → (log‘(1 − 𝑦)) ∈ ℂ)
194		ovexd 7319	. . . . . . . . . . . 12 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → ((1 / (1 − 𝑦)) · -1) ∈ V)
195	29	cnmetdval 23943	. . . . . . . . . . . . . . . . . 18 ⊢ ((1 ∈ ℂ ∧ (1 − 𝑦) ∈ ℂ) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘(1 − (1 − 𝑦))))
196	48, 53, 195	sylancr 587	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘(1 − (1 − 𝑦))))
197		nncan 11259	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − (1 − 𝑦)) = 𝑦)
198	48, 51, 197	sylancr 587	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − (1 − 𝑦)) = 𝑦)
199	198	fveq2d 6787	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(1 − (1 − 𝑦))) = (abs‘𝑦))
200	196, 199	eqtrd 2779	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘𝑦))
201	200, 64	eqbrtrd 5097	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) < 1)
202		elbl 23550	. . . . . . . . . . . . . . . 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 583	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1))
205	204	adantl 482	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → (1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1))
206		neg1cn 12096	. . . . . . . . . . . . . 14 ⊢ -1 ∈ ℂ
207	206	a1i 11	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → -1 ∈ ℂ)
208		eqid 2739	. . . . . . . . . . . . . . . . . 18 ⊢ (1(ball‘(abs ∘ − ))1) = (1(ball‘(abs ∘ − ))1)
209	208	dvlog2lem 25816	. . . . . . . . . . . . . . . . 17 ⊢ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ (-∞(,]0))
210	209	sseli 3918	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ∈ (ℂ ∖ (-∞(,]0)))
211	210	eldifad 3900	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ∈ ℂ)
212		eqid 2739	. . . . . . . . . . . . . . . . 17 ⊢ (ℂ ∖ (-∞(,]0)) = (ℂ ∖ (-∞(,]0))
213	212	logdmn0 25804	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (ℂ ∖ (-∞(,]0)) → 𝑥 ≠ 0)
214	210, 213	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ≠ 0)
215	211, 214	logcld 25735	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → (log‘𝑥) ∈ ℂ)
216	215	adantl 482	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑥 ∈ (1(ball‘(abs ∘ − ))1)) → (log‘𝑥) ∈ ℂ)
217		ovexd 7319	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑥 ∈ (1(ball‘(abs ∘ − ))1)) → (1 / 𝑥) ∈ V)
218		simpr 485	. . . . . . . . . . . . . . 15 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 𝑦 ∈ ℂ)
219	48, 218, 52	sylancr 587	. . . . . . . . . . . . . 14 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
220	206	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → -1 ∈ ℂ)
221		1cnd 10979	. . . . . . . . . . . . . . . 16 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 1 ∈ ℂ)
222		0cnd 10977	. . . . . . . . . . . . . . . 16 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 0 ∈ ℂ)
223		1cnd 10979	. . . . . . . . . . . . . . . . 17 ⊢ (⊤ → 1 ∈ ℂ)
224	192, 223	dvmptc 25131	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ 1)) = (𝑦 ∈ ℂ ↦ 0))
225	192	dvmptid 25130	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ 𝑦)) = (𝑦 ∈ ℂ ↦ 1))
226	192, 221, 222, 224, 218, 221, 225	dvmptsub 25140	. . . . . . . . . . . . . . 15 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ (1 − 𝑦))) = (𝑦 ∈ ℂ ↦ (0 − 1)))
227		df-neg 11217	. . . . . . . . . . . . . . . 16 ⊢ -1 = (0 − 1)
228	227	mpteq2i 5180	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℂ ↦ -1) = (𝑦 ∈ ℂ ↦ (0 − 1))
229	226, 228	eqtr4di 2797	. . . . . . . . . . . . . 14 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ (1 − 𝑦))) = (𝑦 ∈ ℂ ↦ -1))
230	50	a1i 11	. . . . . . . . . . . . . 14 ⊢ (⊤ → (0(ball‘(abs ∘ − ))1) ⊆ ℂ)
231		eqid 2739	. . . . . . . . . . . . . . . 16 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
232	231	cnfldtopon 23955	. . . . . . . . . . . . . . 15 ⊢ (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ)
233	232	toponrestid 22079	. . . . . . . . . . . . . 14 ⊢ (TopOpen‘ℂ_fld) = ((TopOpen‘ℂ_fld) ↾_t ℂ)
234	231	cnfldtopn 23954	. . . . . . . . . . . . . . . . 17 ⊢ (TopOpen‘ℂ_fld) = (MetOpen‘(abs ∘ − ))
235	234	blopn 23665	. . . . . . . . . . . . . . . 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 25136	. . . . . . . . . . . . 13 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -1))
239		logf1o 25729	. . . . . . . . . . . . . . . . . . . 20 ⊢ log:(ℂ ∖ {0})–1-1-onto→ran log
240		f1of 6725	. . . . . . . . . . . . . . . . . . . 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 25806	. . . . . . . . . . . . . . . . . . . 20 ⊢ (ℂ ∖ (-∞(,]0)) ⊆ (ℂ ∖ {0})
243	209, 242	sstri 3931	. . . . . . . . . . . . . . . . . . 19 ⊢ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ {0})
244		fssres 6649	. . . . . . . . . . . . . . . . . . 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 6846	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥)))
248		fvres 6802	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥) = (log‘𝑥))
249	248	mpteq2ia 5178	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))
250	247, 249	eqtrdi 2795	. . . . . . . . . . . . . . 15 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥)))
251	250	oveq2d 7300	. . . . . . . . . . . . . 14 ⊢ (⊤ → (ℂ D (log ↾ (1(ball‘(abs ∘ − ))1))) = (ℂ D (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))))
252	208	dvlog2 25817	. . . . . . . . . . . . . 14 ⊢ (ℂ D (log ↾ (1(ball‘(abs ∘ − ))1))) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (1 / 𝑥))
253	251, 252	eqtr3di 2794	. . . . . . . . . . . . 13 ⊢ (⊤ → (ℂ D (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (1 / 𝑥)))
254		fveq2 6783	. . . . . . . . . . . . 13 ⊢ (𝑥 = (1 − 𝑦) → (log‘𝑥) = (log‘(1 − 𝑦)))
255		oveq2 7292	. . . . . . . . . . . . 13 ⊢ (𝑥 = (1 − 𝑦) → (1 / 𝑥) = (1 / (1 − 𝑦)))
256	192, 192, 205, 207, 216, 217, 238, 253, 254, 255	dvmptco 25145	. . . . . . . . . . . 12 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ ((1 / (1 − 𝑦)) · -1)))
257	192, 193, 194, 256	dvmptneg 25139	. . . . . . . . . . 11 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -((1 / (1 − 𝑦)) · -1)))
258	53, 74	reccld 11753	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 / (1 − 𝑦)) ∈ ℂ)
259		mulcom 10966	. . . . . . . . . . . . . . . 16 ⊢ (((1 / (1 − 𝑦)) ∈ ℂ ∧ -1 ∈ ℂ) → ((1 / (1 − 𝑦)) · -1) = (-1 · (1 / (1 − 𝑦))))
260	258, 206, 259	sylancl 586	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 / (1 − 𝑦)) · -1) = (-1 · (1 / (1 − 𝑦))))
261	258	mulm1d 11436	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (-1 · (1 / (1 − 𝑦))) = -(1 / (1 − 𝑦)))
262	260, 261	eqtrd 2779	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 / (1 − 𝑦)) · -1) = -(1 / (1 − 𝑦)))
263	262	negeqd 11224	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -((1 / (1 − 𝑦)) · -1) = --(1 / (1 − 𝑦)))
264	258	negnegd 11332	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → --(1 / (1 − 𝑦)) = (1 / (1 − 𝑦)))
265	263, 264	eqtrd 2779	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -((1 / (1 − 𝑦)) · -1) = (1 / (1 − 𝑦)))
266	265	mpteq2ia 5178	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -((1 / (1 − 𝑦)) · -1)) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦)))
267	257, 266	eqtrdi 2795	. . . . . . . . . 10 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
268	267	dmeqd 5817	. . . . . . . . 9 ⊢ (⊤ → dom (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
269		dmmptg 6150	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ (0(ball‘(abs ∘ − ))1)(1 / (1 − 𝑦)) ∈ V → dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))) = (0(ball‘(abs ∘ − ))1))
270		ovexd 7319	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 / (1 − 𝑦)) ∈ V)
271	269, 270	mprg 3079	. . . . . . . . 9 ⊢ dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))) = (0(ball‘(abs ∘ − ))1)
272	268, 271	eqtrdi 2795	. . . . . . . 8 ⊢ (⊤ → dom (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (0(ball‘(abs ∘ − ))1))
273		sumex 15408	. . . . . . . . . . . 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 6783	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 𝑘 → (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
276	275	cbvsumv 15417	. . . . . . . . . . . . . 14 ⊢ Σ𝑛 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = Σ𝑘 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘)
277	181, 276	eqtrdi 2795	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑘 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
278	277	mpteq2ia 5178	. . . . . . . . . . . 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 2739	. . . . . . . . . . . 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 25598	. . . . . . . . . . 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 3926	. . . . . . . . . . . 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 25136	. . . . . . . . . 10 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1)))))
284		nnnn0 12249	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ₀)
285	284	adantl 482	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ₀)
286		eqeq1 2743	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (𝑚 = 0 ↔ 𝑛 = 0))
287		oveq2 7292	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (1 / 𝑚) = (1 / 𝑛))
288	286, 287	ifbieq2d 4486	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 = 𝑛 → if(𝑚 = 0, 0, (1 / 𝑚)) = if(𝑛 = 0, 0, (1 / 𝑛)))
289		ovex 7317	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (1 / 𝑛) ∈ V
290	90, 289	ifex 4510	. . . . . . . . . . . . . . . . . . . 20 ⊢ if(𝑛 = 0, 0, (1 / 𝑛)) ∈ V
291	288, 89, 290	fvmpt 6884	. . . . . . . . . . . . . . . . . . 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 12016	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 𝑛 ≠ 0)
294	293	adantl 482	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
295	294	neneqd 2949	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ¬ 𝑛 = 0)
296	295	iffalsed 4471	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → if(𝑛 = 0, 0, (1 / 𝑛)) = (1 / 𝑛))
297	292, 296	eqtrd 2779	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛) = (1 / 𝑛))
298	297	oveq2d 7300	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) = (𝑛 · (1 / 𝑛)))
299		nncn 11990	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
300	299	adantl 482	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
301	300, 294	recidd 11755	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · (1 / 𝑛)) = 1)
302	298, 301	eqtrd 2779	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) = 1)
303	302	oveq1d 7299	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (1 · (𝑦↑(𝑛 − 1))))
304		nnm1nn0 12283	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → (𝑛 − 1) ∈ ℕ₀)
305		expcl 13809	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℂ ∧ (𝑛 − 1) ∈ ℕ₀) → (𝑦↑(𝑛 − 1)) ∈ ℂ)
306	51, 304, 305	syl2an 596	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑦↑(𝑛 − 1)) ∈ ℂ)
307	306	mulid2d 11002	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (1 · (𝑦↑(𝑛 − 1))) = (𝑦↑(𝑛 − 1)))
308	303, 307	eqtrd 2779	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (𝑦↑(𝑛 − 1)))
309	308	sumeq2dv 15424	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)))
310		nnuz 12630	. . . . . . . . . . . . . . 15 ⊢ ℕ = (ℤ_≥‘1)
311		1e0p1 12488	. . . . . . . . . . . . . . . 16 ⊢ 1 = (0 + 1)
312	311	fveq2i 6786	. . . . . . . . . . . . . . 15 ⊢ (ℤ_≥‘1) = (ℤ_≥‘(0 + 1))
313	310, 312	eqtri 2767	. . . . . . . . . . . . . 14 ⊢ ℕ = (ℤ_≥‘(0 + 1))
314		oveq1 7291	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = (1 + 𝑚) → (𝑛 − 1) = ((1 + 𝑚) − 1))
315	314	oveq2d 7300	. . . . . . . . . . . . . 14 ⊢ (𝑛 = (1 + 𝑚) → (𝑦↑(𝑛 − 1)) = (𝑦↑((1 + 𝑚) − 1)))
316		1zzd 12360	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ∈ ℤ)
317		0zd 12340	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ∈ ℤ)
318	1, 313, 315, 316, 317, 306	isumshft 15560	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑((1 + 𝑚) − 1)))
319		pncan2 11237	. . . . . . . . . . . . . . . 16 ⊢ ((1 ∈ ℂ ∧ 𝑚 ∈ ℂ) → ((1 + 𝑚) − 1) = 𝑚)
320	48, 99, 319	sylancr 587	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ ℕ₀ → ((1 + 𝑚) − 1) = 𝑚)
321	320	oveq2d 7300	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ ℕ₀ → (𝑦↑((1 + 𝑚) − 1)) = (𝑦↑𝑚))
322	321	sumeq2i 15420	. . . . . . . . . . . . 13 ⊢ Σ𝑚 ∈ ℕ₀ (𝑦↑((1 + 𝑚) − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚)
323	318, 322	eqtrdi 2795	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚))
324		geoisum 15598	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ ℂ ∧ (abs‘𝑦) < 1) → Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚) = (1 / (1 − 𝑦)))
325	51, 64, 324	syl2anc 584	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚) = (1 / (1 − 𝑦)))
326	309, 323, 325	3eqtrd 2783	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (1 / (1 − 𝑦)))
327	326	mpteq2ia 5178	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦)))
328	283, 327	eqtrdi 2795	. . . . . . . . 9 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
329	267, 328	eqtr4d 2782	. . . . . . . 8 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))))
330		1rp 12743	. . . . . . . . . 10 ⊢ 1 ∈ ℝ⁺
331		blcntr 23575	. . . . . . . . . 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 7292	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 0 → (1 − 𝑦) = (1 − 0))
335		1m0e1 12103	. . . . . . . . . . . . . . . 16 ⊢ (1 − 0) = 1
336	334, 335	eqtrdi 2795	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = 0 → (1 − 𝑦) = 1)
337	336	fveq2d 6787	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 0 → (log‘(1 − 𝑦)) = (log‘1))
338		log1 25750	. . . . . . . . . . . . . 14 ⊢ (log‘1) = 0
339	337, 338	eqtrdi 2795	. . . . . . . . . . . . 13 ⊢ (𝑦 = 0 → (log‘(1 − 𝑦)) = 0)
340	339	negeqd 11224	. . . . . . . . . . . 12 ⊢ (𝑦 = 0 → -(log‘(1 − 𝑦)) = -0)
341		neg0 11276	. . . . . . . . . . . 12 ⊢ -0 = 0
342	340, 341	eqtrdi 2795	. . . . . . . . . . 11 ⊢ (𝑦 = 0 → -(log‘(1 − 𝑦)) = 0)
343		eqid 2739	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))
344	342, 343, 90	fvmpt 6884	. . . . . . . . . 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 7291	. . . . . . . . . . . . . . 15 ⊢ (0 = if(𝑛 = 0, 0, (1 / 𝑛)) → (0 · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
347	346	eqeq1d 2741	. . . . . . . . . . . . . 14 ⊢ (0 = if(𝑛 = 0, 0, (1 / 𝑛)) → ((0 · (𝑦↑𝑛)) = 0 ↔ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0))
348		oveq1 7291	. . . . . . . . . . . . . . 15 ⊢ ((1 / 𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)) → ((1 / 𝑛) · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
349	348	eqeq1d 2741	. . . . . . . . . . . . . 14 ⊢ ((1 / 𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)) → (((1 / 𝑛) · (𝑦↑𝑛)) = 0 ↔ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0))
350		simpll 764	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑦 = 0)
351	350, 28	eqeltrdi 2848	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑦 ∈ ℂ)
352		simplr 766	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑛 ∈ ℕ₀)
353	351, 352	expcld 13873	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → (𝑦↑𝑛) ∈ ℂ)
354	353	mul02d 11182	. . . . . . . . . . . . . 14 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → (0 · (𝑦↑𝑛)) = 0)
355		simpll 764	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑦 = 0)
356	355	oveq1d 7299	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (𝑦↑𝑛) = (0↑𝑛))
357		simpr 485	. . . . . . . . . . . . . . . . . . . . . 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 407	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑛 ∈ ℕ)
362	361	0expd 13866	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (0↑𝑛) = 0)
363	356, 362	eqtrd 2779	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (𝑦↑𝑛) = 0)
364	363	oveq2d 7300	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · (𝑦↑𝑛)) = ((1 / 𝑛) · 0))
365	361	nnrecred 12033	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℝ)
366	365	recnd 11012	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℂ)
367	366	mul01d 11183	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · 0) = 0)
368	364, 367	eqtrd 2779	. . . . . . . . . . . . . 14 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · (𝑦↑𝑛)) = 0)
369	347, 349, 354, 368	ifbothda 4498	. . . . . . . . . . . . 13 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0)
370	369	sumeq2dv 15424	. . . . . . . . . . . 12 ⊢ (𝑦 = 0 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ 0)
371	1	eqimssi 3980	. . . . . . . . . . . . . 14 ⊢ ℕ₀ ⊆ (ℤ_≥‘0)
372	371	orci 862	. . . . . . . . . . . . 13 ⊢ (ℕ₀ ⊆ (ℤ_≥‘0) ∨ ℕ₀ ∈ Fin)
373		sumz 15443	. . . . . . . . . . . . 13 ⊢ ((ℕ₀ ⊆ (ℤ_≥‘0) ∨ ℕ₀ ∈ Fin) → Σ𝑛 ∈ ℕ₀ 0 = 0)
374	372, 373	ax-mp 5	. . . . . . . . . . . 12 ⊢ Σ𝑛 ∈ ℕ₀ 0 = 0
375	370, 374	eqtrdi 2795	. . . . . . . . . . 11 ⊢ (𝑦 = 0 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0)
376		eqid 2739	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
377	375, 376, 90	fvmpt 6884	. . . . . . . . . 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 2782	. . . . . . . 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 25174	. . . . . . 7 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))))
381	380	fveq1d 6785	. . . . . 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 7292	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (1 − 𝑦) = (1 − 𝐴))
384	383	fveq2d 6787	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (log‘(1 − 𝑦)) = (log‘(1 − 𝐴)))
385	384	negeqd 11224	. . . . . 6 ⊢ (𝑦 = 𝐴 → -(log‘(1 − 𝑦)) = -(log‘(1 − 𝐴)))
386		negex 11228	. . . . . 6 ⊢ -(log‘(1 − 𝐴)) ∈ V
387	385, 343, 386	fvmpt 6884	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘𝐴) = -(log‘(1 − 𝐴)))
388		oveq1 7291	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (𝑦↑𝑛) = (𝐴↑𝑛))
389	388	oveq2d 7300	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
390	389	sumeq2sdv 15425	. . . . . 6 ⊢ (𝑦 = 𝐴 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
391		sumex 15408	. . . . . 6 ⊢ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ V
392	390, 376, 391	fvmpt 6884	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘𝐴) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
393	382, 387, 392	3eqtr3d 2787	. . . 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 5103	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ -(log‘(1 − 𝐴)))
396		seqex 13732	. . . 4 ⊢ seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ V
397	396	a1i 11	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ V)
398		seqex 13732	. . . 4 ⊢ seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ∈ V
399	398	a1i 11	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ∈ V)
400		1zzd 12360	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 1 ∈ ℤ)
401		elnnuz 12631	. . . . . 6 ⊢ (𝑛 ∈ ℕ ↔ 𝑛 ∈ (ℤ_≥‘1))
402		fvres 6802	. . . . . 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 2745	. . . 4 ⊢ (𝑛 ∈ ℕ → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛) = ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛))
405		addid2 11167	. . . . . . . 8 ⊢ (𝑛 ∈ ℂ → (0 + 𝑛) = 𝑛)
406	405	adantl 482	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℂ) → (0 + 𝑛) = 𝑛)
407		0cnd 10977	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℂ)
408		1eluzge0 12641	. . . . . . . 8 ⊢ 1 ∈ (ℤ_≥‘0)
409	408	a1i 11	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 1 ∈ (ℤ_≥‘0))
410		0cnd 10977	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) ∧ 𝑘 = 0) → 0 ∈ ℂ)
411		nn0cn 12252	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ₀ → 𝑘 ∈ ℂ)
412	411	adantl 482	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → 𝑘 ∈ ℂ)
413		neqne 2952	. . . . . . . . . . . 12 ⊢ (¬ 𝑘 = 0 → 𝑘 ≠ 0)
414		reccl 11649	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℂ ∧ 𝑘 ≠ 0) → (1 / 𝑘) ∈ ℂ)
415	412, 413, 414	syl2an 596	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) ∧ ¬ 𝑘 = 0) → (1 / 𝑘) ∈ ℂ)
416	410, 415	ifclda 4495	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → if(𝑘 = 0, 0, (1 / 𝑘)) ∈ ℂ)
417		expcl 13809	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ₀) → (𝐴↑𝑘) ∈ ℂ)
418	417	adantlr 712	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → (𝐴↑𝑘) ∈ ℂ)
419	416, 418	mulcld 11004	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) ∈ ℂ)
420	419	fmpttd 6998	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))):ℕ₀⟶ℂ)
421		1nn0 12258	. . . . . . . 8 ⊢ 1 ∈ ℕ₀
422		ffvelrn 6968	. . . . . . . 8 ⊢ (((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))):ℕ₀⟶ℂ ∧ 1 ∈ ℕ₀) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘1) ∈ ℂ)
423	420, 421, 422	sylancl 586	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘1) ∈ ℂ)
424		elfz1eq 13276	. . . . . . . . . 10 ⊢ (𝑛 ∈ (0...0) → 𝑛 = 0)
425		1m1e0 12054	. . . . . . . . . . 11 ⊢ (1 − 1) = 0
426	425	oveq2i 7295	. . . . . . . . . 10 ⊢ (0...(1 − 1)) = (0...0)
427	424, 426	eleq2s 2858	. . . . . . . . 9 ⊢ (𝑛 ∈ (0...(1 − 1)) → 𝑛 = 0)
428	427	fveq2d 6787	. . . . . . . 8 ⊢ (𝑛 ∈ (0...(1 − 1)) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0))
429		0nn0 12257	. . . . . . . . . 10 ⊢ 0 ∈ ℕ₀
430		iftrue 4466	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → if(𝑘 = 0, 0, (1 / 𝑘)) = 0)
431		oveq2 7292	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → (𝐴↑𝑘) = (𝐴↑0))
432	430, 431	oveq12d 7302	. . . . . . . . . . 11 ⊢ (𝑘 = 0 → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) = (0 · (𝐴↑0)))
433		ovex 7317	. . . . . . . . . . 11 ⊢ (0 · (𝐴↑0)) ∈ V
434	432, 8, 433	fvmpt 6884	. . . . . . . . . 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 13809	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 0 ∈ ℕ₀) → (𝐴↑0) ∈ ℂ)
437	27, 429, 436	sylancl 586	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴↑0) ∈ ℂ)
438	437	mul02d 11182	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (0 · (𝐴↑0)) = 0)
439	435, 438	eqtrid 2791	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0) = 0)
440	428, 439	sylan9eqr 2801	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ (0...(1 − 1))) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = 0)
441	406, 407, 409, 423, 440	seqid 13777	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1)) = seq1( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))))
442	293	adantl 482	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
443	442	neneqd 2949	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ¬ 𝑛 = 0)
444	443	iffalsed 4471	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → if(𝑛 = 0, 0, (1 / 𝑛)) = (1 / 𝑛))
445	444	oveq1d 7299	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) = ((1 / 𝑛) · (𝐴↑𝑛)))
446	284, 23	sylan2 593	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (𝐴↑𝑛) ∈ ℂ)
447	299	adantl 482	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
448	446, 447, 442	divrec2d 11764	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝐴↑𝑛) / 𝑛) = ((1 / 𝑛) · (𝐴↑𝑛)))
449	445, 448	eqtr4d 2782	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) = ((𝐴↑𝑛) / 𝑛))
450	284, 11	sylan2 593	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
451		id 22	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑛 → 𝑘 = 𝑛)
452	6, 451	oveq12d 7302	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑛 → ((𝐴↑𝑘) / 𝑘) = ((𝐴↑𝑛) / 𝑛))
453		eqid 2739	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)) = (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))
454		ovex 7317	. . . . . . . . . . 11 ⊢ ((𝐴↑𝑛) / 𝑛) ∈ V
455	452, 453, 454	fvmpt 6884	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛) = ((𝐴↑𝑛) / 𝑛))
456	455	adantl 482	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛) = ((𝐴↑𝑛) / 𝑛))
457	449, 450, 456	3eqtr4d 2789	. . . . . . . 8 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛))
458	401, 457	sylan2br 595	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ (ℤ_≥‘1)) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛))
459	400, 458	seqfeq 13757	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) = seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))))
460	441, 459	eqtrd 2779	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1)) = seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))))
461	460	fveq1d 6785	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)))‘𝑛))
462	404, 461	sylan9eqr 2801	. . 3 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛) = (seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)))‘𝑛))
463	310, 397, 399, 400, 462	climeq 15285	. 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 396 ∨ wo 844 ∧ w3a 1086 = wceq 1539 ⊤wtru 1540 ∈ wcel 2107 ≠ wne 2944 {crab 3069 Vcvv 3433 ∖ cdif 3885 ⊆ wss 3888 ifcif 4460 {csn 4562 {cpr 4564 class class class wbr 5075 ↦ cmpt 5158 ^◡ccnv 5589 dom cdm 5590 ran crn 5591 ↾ cres 5592 “ cima 5593 ∘ ccom 5594 Fn wfn 6432 ⟶wf 6433 –1-1-onto→wf1o 6436 ‘cfv 6437 (class class class)co 7284 Fincfn 8742 supcsup 9208 ℂcc 10878 ℝcr 10879 0cc0 10880 1c1 10881 + caddc 10883 · cmul 10885 +∞cpnf 11015 -∞cmnf 11016 ℝ^*cxr 11017 < clt 11018 ≤ cle 11019 − cmin 11214 -cneg 11215 / cdiv 11641 ℕcn 11982 2c2 12037 ℕ₀cn0 12242 ℤ_≥cuz 12591 ℝ⁺crp 12739 (,]cioc 13089 [,)cico 13090 [,]cicc 13091 ...cfz 13248 seqcseq 13730 ↑cexp 13791 abscabs 14954 ⇝ cli 15202 Σcsu 15406 TopOpenctopn 17141 ∞Metcxmet 20591 ballcbl 20593 ℂ_fldccnfld 20606 –cn→ccncf 24048 D cdv 25036 logclog 25719

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2710 ax-rep 5210 ax-sep 5224 ax-nul 5231 ax-pow 5289 ax-pr 5353 ax-un 7597 ax-inf2 9408 ax-cnex 10936 ax-resscn 10937 ax-1cn 10938 ax-icn 10939 ax-addcl 10940 ax-addrcl 10941 ax-mulcl 10942 ax-mulrcl 10943 ax-mulcom 10944 ax-addass 10945 ax-mulass 10946 ax-distr 10947 ax-i2m1 10948 ax-1ne0 10949 ax-1rid 10950 ax-rnegex 10951 ax-rrecex 10952 ax-cnre 10953 ax-pre-lttri 10954 ax-pre-lttrn 10955 ax-pre-ltadd 10956 ax-pre-mulgt0 10957 ax-pre-sup 10958 ax-addf 10959 ax-mulf 10960

This theorem depends on definitions: df-bi 206 df-an 397 df-or 845 df-3or 1087 df-3an 1088 df-tru 1542 df-fal 1552 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2541 df-eu 2570 df-clab 2717 df-cleq 2731 df-clel 2817 df-nfc 2890 df-ne 2945 df-nel 3051 df-ral 3070 df-rex 3071 df-rmo 3072 df-reu 3073 df-rab 3074 df-v 3435 df-sbc 3718 df-csb 3834 df-dif 3891 df-un 3893 df-in 3895 df-ss 3905 df-pss 3907 df-nul 4258 df-if 4461 df-pw 4536 df-sn 4563 df-pr 4565 df-tp 4567 df-op 4569 df-uni 4841 df-int 4881 df-iun 4927 df-iin 4928 df-br 5076 df-opab 5138 df-mpt 5159 df-tr 5193 df-id 5490 df-eprel 5496 df-po 5504 df-so 5505 df-fr 5545 df-se 5546 df-we 5547 df-xp 5596 df-rel 5597 df-cnv 5598 df-co 5599 df-dm 5600 df-rn 5601 df-res 5602 df-ima 5603 df-pred 6206 df-ord 6273 df-on 6274 df-lim 6275 df-suc 6276 df-iota 6395 df-fun 6439 df-fn 6440 df-f 6441 df-f1 6442 df-fo 6443 df-f1o 6444 df-fv 6445 df-isom 6446 df-riota 7241 df-ov 7287 df-oprab 7288 df-mpo 7289 df-of 7542 df-om 7722 df-1st 7840 df-2nd 7841 df-supp 7987 df-frecs 8106 df-wrecs 8137 df-recs 8211 df-rdg 8250 df-1o 8306 df-2o 8307 df-er 8507 df-map 8626 df-pm 8627 df-ixp 8695 df-en 8743 df-dom 8744 df-sdom 8745 df-fin 8746 df-fsupp 9138 df-fi 9179 df-sup 9210 df-inf 9211 df-oi 9278 df-card 9706 df-pnf 11020 df-mnf 11021 df-xr 11022 df-ltxr 11023 df-le 11024 df-sub 11216 df-neg 11217 df-div 11642 df-nn 11983 df-2 12045 df-3 12046 df-4 12047 df-5 12048 df-6 12049 df-7 12050 df-8 12051 df-9 12052 df-n0 12243 df-z 12329 df-dec 12447 df-uz 12592 df-q 12698 df-rp 12740 df-xneg 12857 df-xadd 12858 df-xmul 12859 df-ioo 13092 df-ioc 13093 df-ico 13094 df-icc 13095 df-fz 13249 df-fzo 13392 df-fl 13521 df-mod 13599 df-seq 13731 df-exp 13792 df-fac 13997 df-bc 14026 df-hash 14054 df-shft 14787 df-cj 14819 df-re 14820 df-im 14821 df-sqrt 14955 df-abs 14956 df-limsup 15189 df-clim 15206 df-rlim 15207 df-sum 15407 df-ef 15786 df-sin 15788 df-cos 15789 df-tan 15790 df-pi 15791 df-struct 16857 df-sets 16874 df-slot 16892 df-ndx 16904 df-base 16922 df-ress 16951 df-plusg 16984 df-mulr 16985 df-starv 16986 df-sca 16987 df-vsca 16988 df-ip 16989 df-tset 16990 df-ple 16991 df-ds 16993 df-unif 16994 df-hom 16995 df-cco 16996 df-rest 17142 df-topn 17143 df-0g 17161 df-gsum 17162 df-topgen 17163 df-pt 17164 df-prds 17167 df-xrs 17222 df-qtop 17227 df-imas 17228 df-xps 17230 df-mre 17304 df-mrc 17305 df-acs 17307 df-mgm 18335 df-sgrp 18384 df-mnd 18395 df-submnd 18440 df-mulg 18710 df-cntz 18932 df-cmn 19397 df-psmet 20598 df-xmet 20599 df-met 20600 df-bl 20601 df-mopn 20602 df-fbas 20603 df-fg 20604 df-cnfld 20607 df-top 22052 df-topon 22069 df-topsp 22091 df-bases 22105 df-cld 22179 df-ntr 22180 df-cls 22181 df-nei 22258 df-lp 22296 df-perf 22297 df-cn 22387 df-cnp 22388 df-haus 22475 df-cmp 22547 df-tx 22722 df-hmeo 22915 df-fil 23006 df-fm 23098 df-flim 23099 df-flf 23100 df-xms 23482 df-ms 23483 df-tms 23484 df-cncf 24050 df-limc 25039 df-dv 25040 df-ulm 25545 df-log 25721

This theorem is referenced by: logtaylsum 25825 logtayl2 25826 atantayl 26096 stirlinglem5 43626

W3C validator