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 26612

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 12815	. . . 4 ⊢ ℕ₀ = (ℤ_≥‘0)
2		0zd 12525	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℤ)
3		eqeq1 2739	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → (𝑘 = 0 ↔ 𝑛 = 0))
4		oveq2 7364	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → (1 / 𝑘) = (1 / 𝑛))
5	3, 4	ifbieq2d 4483	. . . . . . 7 ⊢ (𝑘 = 𝑛 → if(𝑘 = 0, 0, (1 / 𝑘)) = if(𝑛 = 0, 0, (1 / 𝑛)))
6		oveq2 7364	. . . . . . 7 ⊢ (𝑘 = 𝑛 → (𝐴↑𝑘) = (𝐴↑𝑛))
7	5, 6	oveq12d 7374	. . . . . 6 ⊢ (𝑘 = 𝑛 → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
8		eqid 2735	. . . . . 6 ⊢ (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))) = (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))
9		ovex 7389	. . . . . 6 ⊢ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ V
10	7, 8, 9	fvmpt 6936	. . . . 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 11126	. . . . . 6 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 0 ∈ ℂ)
13		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → 𝑛 ∈ ℕ₀)
14		elnn0 12428	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ₀ ↔ (𝑛 ∈ ℕ ∨ 𝑛 = 0))
15	13, 14	sylib 218	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (𝑛 ∈ ℕ ∨ 𝑛 = 0))
16	15	ord 865	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 ∈ ℕ → 𝑛 = 0))
17	16	con1d 145	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 = 0 → 𝑛 ∈ ℕ))
18	17	imp 406	. . . . . . . 8 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑛 ∈ ℕ)
19	18	nnrecred 12217	. . . . . . 7 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℝ)
20	19	recnd 11162	. . . . . 6 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℂ)
21	12, 20	ifclda 4492	. . . . 5 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → if(𝑛 = 0, 0, (1 / 𝑛)) ∈ ℂ)
22		expcl 14030	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (𝐴↑𝑛) ∈ ℂ)
23	22	adantlr 716	. . . . 5 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (𝐴↑𝑛) ∈ ℂ)
24	21, 23	mulcld 11154	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ ℂ)
25		logtayllem 26611	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ dom ⇝ )
26	1, 2, 11, 24, 25	isumclim2 15709	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
27		simpl 482	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ ℂ)
28		0cn 11125	. . . . . . . 8 ⊢ 0 ∈ ℂ
29		eqid 2735	. . . . . . . . 9 ⊢ (abs ∘ − ) = (abs ∘ − )
30	29	cnmetdval 24723	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 0 ∈ ℂ) → (𝐴(abs ∘ − )0) = (abs‘(𝐴 − 0)))
31	27, 28, 30	sylancl 587	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) = (abs‘(𝐴 − 0)))
32		subid1 11403	. . . . . . . . 9 ⊢ (𝐴 ∈ ℂ → (𝐴 − 0) = 𝐴)
33	32	adantr 480	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴 − 0) = 𝐴)
34	33	fveq2d 6833	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘(𝐴 − 0)) = (abs‘𝐴))
35	31, 34	eqtrd 2770	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) = (abs‘𝐴))
36		simpr 484	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) < 1)
37	35, 36	eqbrtrd 5096	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) < 1)
38		cnxmet 24725	. . . . . . 7 ⊢ (abs ∘ − ) ∈ (∞Met‘ℂ)
39		1xr 11193	. . . . . . 7 ⊢ 1 ∈ ℝ^*
40		elbl3 24345	. . . . . . 7 ⊢ ((((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℝ^*) ∧ (0 ∈ ℂ ∧ 𝐴 ∈ ℂ)) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
41	38, 39, 40	mpanl12 703	. . . . . 6 ⊢ ((0 ∈ ℂ ∧ 𝐴 ∈ ℂ) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
42	28, 27, 41	sylancr 588	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
43	37, 42	mpbird 257	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ (0(ball‘(abs ∘ − ))1))
44		tru 1546	. . . . . 6 ⊢ ⊤
45		eqid 2735	. . . . . . . 8 ⊢ (0(ball‘(abs ∘ − ))1) = (0(ball‘(abs ∘ − ))1)
46		0cnd 11126	. . . . . . . 8 ⊢ (⊤ → 0 ∈ ℂ)
47	39	a1i 11	. . . . . . . 8 ⊢ (⊤ → 1 ∈ ℝ^*)
48		ax-1cn 11085	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℂ
49		blssm 24371	. . . . . . . . . . . . . . 15 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ^*) → (0(ball‘(abs ∘ − ))1) ⊆ ℂ)
50	38, 28, 39, 49	mp3an 1464	. . . . . . . . . . . . . 14 ⊢ (0(ball‘(abs ∘ − ))1) ⊆ ℂ
51	50	sseli 3913	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 𝑦 ∈ ℂ)
52		subcl 11381	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
53	48, 51, 52	sylancr 588	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ∈ ℂ)
54	51	abscld 15390	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ ℝ)
55	29	cnmetdval 24723	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℂ ∧ 0 ∈ ℂ) → (𝑦(abs ∘ − )0) = (abs‘(𝑦 − 0)))
56	51, 28, 55	sylancl 587	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) = (abs‘(𝑦 − 0)))
57	51	subid1d 11483	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦 − 0) = 𝑦)
58	57	fveq2d 6833	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(𝑦 − 0)) = (abs‘𝑦))
59	56, 58	eqtrd 2770	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) = (abs‘𝑦))
60		elbl3 24345	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℝ^*) ∧ (0 ∈ ℂ ∧ 𝑦 ∈ ℂ)) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
61	38, 39, 60	mpanl12 703	. . . . . . . . . . . . . . . . . 18 ⊢ ((0 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
62	28, 51, 61	sylancr 588	. . . . . . . . . . . . . . . . 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 5098	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < 1)
65	54, 64	gtned 11270	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ≠ (abs‘𝑦))
66		abs1 15248	. . . . . . . . . . . . . . . 16 ⊢ (abs‘1) = 1
67		fveq2 6829	. . . . . . . . . . . . . . . 16 ⊢ (1 = 𝑦 → (abs‘1) = (abs‘𝑦))
68	66, 67	eqtr3id 2784	. . . . . . . . . . . . . . 15 ⊢ (1 = 𝑦 → 1 = (abs‘𝑦))
69	68	necon3i 2962	. . . . . . . . . . . . . 14 ⊢ (1 ≠ (abs‘𝑦) → 1 ≠ 𝑦)
70	65, 69	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ≠ 𝑦)
71		subeq0 11409	. . . . . . . . . . . . . . 15 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((1 − 𝑦) = 0 ↔ 1 = 𝑦))
72	71	necon3bid 2974	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((1 − 𝑦) ≠ 0 ↔ 1 ≠ 𝑦))
73	48, 51, 72	sylancr 588	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 − 𝑦) ≠ 0 ↔ 1 ≠ 𝑦))
74	70, 73	mpbird 257	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ≠ 0)
75	53, 74	logcld 26522	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (log‘(1 − 𝑦)) ∈ ℂ)
76	75	negcld 11481	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -(log‘(1 − 𝑦)) ∈ ℂ)
77	76	adantl 481	. . . . . . . . 9 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → -(log‘(1 − 𝑦)) ∈ ℂ)
78	77	fmpttd 7056	. . . . . . . 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 11184	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ ℝ^*)
81		peano2re 11308	. . . . . . . . . . . . . . . 16 ⊢ ((abs‘𝑦) ∈ ℝ → ((abs‘𝑦) + 1) ∈ ℝ)
82	54, 81	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) + 1) ∈ ℝ)
83	82	rehalfcld 12413	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℝ)
84	83	rexrd 11184	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℝ^*)
85		iccssxr 13372	. . . . . . . . . . . . . . 15 ⊢ (0[,]+∞) ⊆ ℝ^*
86		eqeq1 2739	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑚 = 𝑗 → (𝑚 = 0 ↔ 𝑗 = 0))
87		oveq2 7364	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑚 = 𝑗 → (1 / 𝑚) = (1 / 𝑗))
88	86, 87	ifbieq2d 4483	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑗 → if(𝑚 = 0, 0, (1 / 𝑚)) = if(𝑗 = 0, 0, (1 / 𝑗)))
89		eqid 2735	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))) = (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))
90		c0ex 11127	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 0 ∈ V
91		ovex 7389	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (1 / 𝑗) ∈ V
92	90, 91	ifex 4507	. . . . . . . . . . . . . . . . . . . . 21 ⊢ if(𝑗 = 0, 0, (1 / 𝑗)) ∈ V
93	88, 89, 92	fvmpt 6936	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 ∈ ℕ₀ → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) = if(𝑗 = 0, 0, (1 / 𝑗)))
94	93	eqcomd 2741	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ → if(𝑗 = 0, 0, (1 / 𝑗)) = ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗))
95	94	oveq1d 7371	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑗 ∈ ℕ₀ → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗)))
96	95	mpteq2ia 5169	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗)))
97	96	mpteq2i 5170	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)))) = (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗))))
98		0cnd 11126	. . . . . . . . . . . . . . . . . 18 ⊢ (((⊤ ∧ 𝑚 ∈ ℕ₀) ∧ 𝑚 = 0) → 0 ∈ ℂ)
99		nn0cn 12436	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 ∈ ℕ₀ → 𝑚 ∈ ℂ)
100	99	adantl 481	. . . . . . . . . . . . . . . . . . 19 ⊢ ((⊤ ∧ 𝑚 ∈ ℕ₀) → 𝑚 ∈ ℂ)
101		neqne 2938	. . . . . . . . . . . . . . . . . . 19 ⊢ (¬ 𝑚 = 0 → 𝑚 ≠ 0)
102		reccl 11805	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑚 ∈ ℂ ∧ 𝑚 ≠ 0) → (1 / 𝑚) ∈ ℂ)
103	100, 101, 102	syl2an 597	. . . . . . . . . . . . . . . . . 18 ⊢ (((⊤ ∧ 𝑚 ∈ ℕ₀) ∧ ¬ 𝑚 = 0) → (1 / 𝑚) ∈ ℂ)
104	98, 103	ifclda 4492	. . . . . . . . . . . . . . . . 17 ⊢ ((⊤ ∧ 𝑚 ∈ ℕ₀) → if(𝑚 = 0, 0, (1 / 𝑚)) ∈ ℂ)
105	104	fmpttd 7056	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))):ℕ₀⟶ℂ)
106		recn 11117	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑟 ∈ ℝ → 𝑟 ∈ ℂ)
107		oveq1 7363	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑥 = 𝑟 → (𝑥↑𝑗) = (𝑟↑𝑗))
108	107	oveq2d 7372	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑥 = 𝑟 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))
109	108	mpteq2dv 5168	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 = 𝑟 → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))))
110		eqid 2735	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)))) = (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))
111		nn0ex 12432	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ℕ₀ ∈ V
112	111	mptex 7167	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))) ∈ V
113	109, 110, 112	fvmpt 6936	. . . . . . . . . . . . . . . . . . . . . 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 2741	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑟 ∈ ℝ → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))) = ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟))
116	115	seqeq3d 13960	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑟 ∈ ℝ → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) = seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)))
117	116	eleq1d 2820	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑟 ∈ ℝ → (seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ ↔ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ ))
118	117	rabbiia 3391	. . . . . . . . . . . . . . . . 17 ⊢ {𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ } = {𝑟 ∈ ℝ ∣ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ }
119	118	supeq1i 9349	. . . . . . . . . . . . . . . 16 ⊢ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) = sup({𝑟 ∈ ℝ ∣ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ }, ℝ^, < )
120	97, 105, 119	radcnvcl 26370	. . . . . . . . . . . . . . 15 ⊢ (⊤ → sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ) ∈ (0[,]+∞))
121	85, 120	sselid 3915	. . . . . . . . . . . . . 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 11133	. . . . . . . . . . . . . . 15 ⊢ 1 ∈ ℝ
124		avglt1 12404	. . . . . . . . . . . . . . 15 ⊢ (((abs‘𝑦) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝑦) < 1 ↔ (abs‘𝑦) < (((abs‘𝑦) + 1) / 2)))
125	54, 123, 124	sylancl 587	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) < 1 ↔ (abs‘𝑦) < (((abs‘𝑦) + 1) / 2)))
126	64, 125	mpbid 232	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < (((abs‘𝑦) + 1) / 2))
127		0red 11136	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ∈ ℝ)
128	127, 54, 83, 79, 126	lelttrd 11293	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 < (((abs‘𝑦) + 1) / 2))
129	127, 83, 128	ltled 11283	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ≤ (((abs‘𝑦) + 1) / 2))
130	83, 129	absidd 15374	. . . . . . . . . . . . . 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 11162	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℂ)
133		oveq1 7363	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (𝑥↑𝑗) = ((((abs‘𝑦) + 1) / 2)↑𝑗))
134	133	oveq2d 7372	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))
135	134	mpteq2dv 5168	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))))
136	111	mptex 7167	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))) ∈ V
137	135, 110, 136	fvmpt 6936	. . . . . . . . . . . . . . . . . 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 13960	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2))) = seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))))
140		avglt2 12405	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((abs‘𝑦) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝑦) < 1 ↔ (((abs‘𝑦) + 1) / 2) < 1))
141	54, 123, 140	sylancl 587	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) < 1 ↔ (((abs‘𝑦) + 1) / 2) < 1))
142	64, 141	mpbid 232	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) < 1)
143	130, 142	eqbrtrd 5096	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) < 1)
144		logtayllem 26611	. . . . . . . . . . . . . . . . 17 ⊢ (((((abs‘𝑦) + 1) / 2) ∈ ℂ ∧ (abs‘(((abs‘𝑦) + 1) / 2)) < 1) → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))) ∈ dom ⇝ )
145	132, 143, 144	syl2anc 585	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))) ∈ dom ⇝ )
146	139, 145	eqeltrd 2835	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2))) ∈ dom ⇝ )
147	97, 131, 119, 132, 146	radcnvle 26373	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) ≤ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
148	130, 147	eqbrtrrd 5098	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ≤ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
149	80, 84, 122, 126, 148	xrltletrd 13101	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
150		0re 11135	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℝ
151		elico2 13352	. . . . . . . . . . . . 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 588	. . . . . . . . . . . 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 1344	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))
154		absf 15289	. . . . . . . . . . . 12 ⊢ abs:ℂ⟶ℝ
155		ffn 6657	. . . . . . . . . . . 12 ⊢ (abs:ℂ⟶ℝ → abs Fn ℂ)
156		elpreima 6999	. . . . . . . . . . . 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 584	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))))
159		cnvimass 6036	. . . . . . . . . . . . . . . . 17 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) ⊆ dom abs
160	154	fdmi 6668	. . . . . . . . . . . . . . . . 17 ⊢ dom abs = ℂ
161	159, 160	sseqtri 3965	. . . . . . . . . . . . . . . 16 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) ⊆ ℂ
162	161	sseli 3913	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → 𝑦 ∈ ℂ)
163		oveq1 7363	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 = 𝑦 → (𝑥↑𝑗) = (𝑦↑𝑗))
164	163	oveq2d 7372	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑦 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))
165	164	mpteq2dv 5168	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑦 → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
166	111	mptex 7167	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))) ∈ V
167	165, 110, 166	fvmpt 6936	. . . . . . . . . . . . . . . . . . 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 6831	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛))
170		eqeq1 2739	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 𝑛 → (𝑗 = 0 ↔ 𝑛 = 0))
171		oveq2 7364	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 𝑛 → (1 / 𝑗) = (1 / 𝑛))
172	170, 171	ifbieq2d 4483	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝑛 → if(𝑗 = 0, 0, (1 / 𝑗)) = if(𝑛 = 0, 0, (1 / 𝑛)))
173		oveq2 7364	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝑛 → (𝑦↑𝑗) = (𝑦↑𝑛))
174	172, 173	oveq12d 7374	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 = 𝑛 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
175		eqid 2735	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))
176		ovex 7389	. . . . . . . . . . . . . . . . . . 19 ⊢ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ V
177	174, 175, 176	fvmpt 6936	. . . . . . . . . . . . . . . . . 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 2771	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛))
180	179	sumeq2dv 15653	. . . . . . . . . . . . . . 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 5169	. . . . . . . . . . . . 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 2735	. . . . . . . . . . . . 13 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) = (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))
184		eqid 2735	. . . . . . . . . . . . 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 26379	. . . . . . . . . . . 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 24848	. . . . . . . . . . . 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 7054	. . . . . . . . . 10 ⊢ ((⊤ ∧ 𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ ℂ)
189	158, 188	sylan2 594	. . . . . . . . 9 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ ℂ)
190	189	fmpttd 7056	. . . . . . . 8 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))):(0(ball‘(abs ∘ − ))1)⟶ℂ)
191		cnelprrecn 11120	. . . . . . . . . . . . 13 ⊢ ℂ ∈ {ℝ, ℂ}
192	191	a1i 11	. . . . . . . . . . . 12 ⊢ (⊤ → ℂ ∈ {ℝ, ℂ})
193	75	adantl 481	. . . . . . . . . . . 12 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → (log‘(1 − 𝑦)) ∈ ℂ)
194		ovexd 7391	. . . . . . . . . . . 12 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → ((1 / (1 − 𝑦)) · -1) ∈ V)
195	29	cnmetdval 24723	. . . . . . . . . . . . . . . . . 18 ⊢ ((1 ∈ ℂ ∧ (1 − 𝑦) ∈ ℂ) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘(1 − (1 − 𝑦))))
196	48, 53, 195	sylancr 588	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘(1 − (1 − 𝑦))))
197		nncan 11412	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − (1 − 𝑦)) = 𝑦)
198	48, 51, 197	sylancr 588	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − (1 − 𝑦)) = 𝑦)
199	198	fveq2d 6833	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(1 − (1 − 𝑦))) = (abs‘𝑦))
200	196, 199	eqtrd 2770	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘𝑦))
201	200, 64	eqbrtrd 5096	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) < 1)
202		elbl 24341	. . . . . . . . . . . . . . . 16 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℂ ∧ 1 ∈ ℝ^*) → ((1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1) ↔ ((1 − 𝑦) ∈ ℂ ∧ (1(abs ∘ − )(1 − 𝑦)) < 1)))
203	38, 48, 39, 202	mp3an 1464	. . . . . . . . . . . . . . 15 ⊢ ((1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1) ↔ ((1 − 𝑦) ∈ ℂ ∧ (1(abs ∘ − )(1 − 𝑦)) < 1))
204	53, 201, 203	sylanbrc 584	. . . . . . . . . . . . . 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 12133	. . . . . . . . . . . . . 14 ⊢ -1 ∈ ℂ
207	206	a1i 11	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → -1 ∈ ℂ)
208		eqid 2735	. . . . . . . . . . . . . . . . . 18 ⊢ (1(ball‘(abs ∘ − ))1) = (1(ball‘(abs ∘ − ))1)
209	208	dvlog2lem 26604	. . . . . . . . . . . . . . . . 17 ⊢ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ (-∞(,]0))
210	209	sseli 3913	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ∈ (ℂ ∖ (-∞(,]0)))
211	210	eldifad 3897	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ∈ ℂ)
212		eqid 2735	. . . . . . . . . . . . . . . . 17 ⊢ (ℂ ∖ (-∞(,]0)) = (ℂ ∖ (-∞(,]0))
213	212	logdmn0 26592	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (ℂ ∖ (-∞(,]0)) → 𝑥 ≠ 0)
214	210, 213	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ≠ 0)
215	211, 214	logcld 26522	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → (log‘𝑥) ∈ ℂ)
216	215	adantl 481	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑥 ∈ (1(ball‘(abs ∘ − ))1)) → (log‘𝑥) ∈ ℂ)
217		ovexd 7391	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑥 ∈ (1(ball‘(abs ∘ − ))1)) → (1 / 𝑥) ∈ V)
218		simpr 484	. . . . . . . . . . . . . . 15 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 𝑦 ∈ ℂ)
219	48, 218, 52	sylancr 588	. . . . . . . . . . . . . 14 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
220	206	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → -1 ∈ ℂ)
221		1cnd 11128	. . . . . . . . . . . . . . . 16 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 1 ∈ ℂ)
222		0cnd 11126	. . . . . . . . . . . . . . . 16 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 0 ∈ ℂ)
223		1cnd 11128	. . . . . . . . . . . . . . . . 17 ⊢ (⊤ → 1 ∈ ℂ)
224	192, 223	dvmptc 25913	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ 1)) = (𝑦 ∈ ℂ ↦ 0))
225	192	dvmptid 25912	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ 𝑦)) = (𝑦 ∈ ℂ ↦ 1))
226	192, 221, 222, 224, 218, 221, 225	dvmptsub 25922	. . . . . . . . . . . . . . 15 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ (1 − 𝑦))) = (𝑦 ∈ ℂ ↦ (0 − 1)))
227		df-neg 11369	. . . . . . . . . . . . . . . 16 ⊢ -1 = (0 − 1)
228	227	mpteq2i 5170	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℂ ↦ -1) = (𝑦 ∈ ℂ ↦ (0 − 1))
229	226, 228	eqtr4di 2788	. . . . . . . . . . . . . 14 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ (1 − 𝑦))) = (𝑦 ∈ ℂ ↦ -1))
230	50	a1i 11	. . . . . . . . . . . . . 14 ⊢ (⊤ → (0(ball‘(abs ∘ − ))1) ⊆ ℂ)
231		eqid 2735	. . . . . . . . . . . . . . . 16 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
232	231	cnfldtopon 24735	. . . . . . . . . . . . . . 15 ⊢ (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ)
233	232	toponrestid 22874	. . . . . . . . . . . . . 14 ⊢ (TopOpen‘ℂ_fld) = ((TopOpen‘ℂ_fld) ↾_t ℂ)
234	231	cnfldtopn 24734	. . . . . . . . . . . . . . . . 17 ⊢ (TopOpen‘ℂ_fld) = (MetOpen‘(abs ∘ − ))
235	234	blopn 24453	. . . . . . . . . . . . . . . 16 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ^*) → (0(ball‘(abs ∘ − ))1) ∈ (TopOpen‘ℂ_fld))
236	38, 28, 39, 235	mp3an 1464	. . . . . . . . . . . . . . 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 25918	. . . . . . . . . . . . 13 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -1))
239		logf1o 26516	. . . . . . . . . . . . . . . . . . . 20 ⊢ log:(ℂ ∖ {0})–1-1-onto→ran log
240		f1of 6769	. . . . . . . . . . . . . . . . . . . 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 26594	. . . . . . . . . . . . . . . . . . . 20 ⊢ (ℂ ∖ (-∞(,]0)) ⊆ (ℂ ∖ {0})
243	209, 242	sstri 3926	. . . . . . . . . . . . . . . . . . 19 ⊢ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ {0})
244		fssres 6695	. . . . . . . . . . . . . . . . . . 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 693	. . . . . . . . . . . . . . . . . 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 6897	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥)))
248		fvres 6848	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥) = (log‘𝑥))
249	248	mpteq2ia 5169	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))
250	247, 249	eqtrdi 2786	. . . . . . . . . . . . . . 15 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥)))
251	250	oveq2d 7372	. . . . . . . . . . . . . 14 ⊢ (⊤ → (ℂ D (log ↾ (1(ball‘(abs ∘ − ))1))) = (ℂ D (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))))
252	208	dvlog2 26605	. . . . . . . . . . . . . 14 ⊢ (ℂ D (log ↾ (1(ball‘(abs ∘ − ))1))) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (1 / 𝑥))
253	251, 252	eqtr3di 2785	. . . . . . . . . . . . 13 ⊢ (⊤ → (ℂ D (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (1 / 𝑥)))
254		fveq2 6829	. . . . . . . . . . . . 13 ⊢ (𝑥 = (1 − 𝑦) → (log‘𝑥) = (log‘(1 − 𝑦)))
255		oveq2 7364	. . . . . . . . . . . . 13 ⊢ (𝑥 = (1 − 𝑦) → (1 / 𝑥) = (1 / (1 − 𝑦)))
256	192, 192, 205, 207, 216, 217, 238, 253, 254, 255	dvmptco 25927	. . . . . . . . . . . 12 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ ((1 / (1 − 𝑦)) · -1)))
257	192, 193, 194, 256	dvmptneg 25921	. . . . . . . . . . 11 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -((1 / (1 − 𝑦)) · -1)))
258	53, 74	reccld 11913	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 / (1 − 𝑦)) ∈ ℂ)
259		mulcom 11113	. . . . . . . . . . . . . . . 16 ⊢ (((1 / (1 − 𝑦)) ∈ ℂ ∧ -1 ∈ ℂ) → ((1 / (1 − 𝑦)) · -1) = (-1 · (1 / (1 − 𝑦))))
260	258, 206, 259	sylancl 587	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 / (1 − 𝑦)) · -1) = (-1 · (1 / (1 − 𝑦))))
261	258	mulm1d 11591	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (-1 · (1 / (1 − 𝑦))) = -(1 / (1 − 𝑦)))
262	260, 261	eqtrd 2770	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 / (1 − 𝑦)) · -1) = -(1 / (1 − 𝑦)))
263	262	negeqd 11376	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -((1 / (1 − 𝑦)) · -1) = --(1 / (1 − 𝑦)))
264	258	negnegd 11485	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → --(1 / (1 − 𝑦)) = (1 / (1 − 𝑦)))
265	263, 264	eqtrd 2770	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -((1 / (1 − 𝑦)) · -1) = (1 / (1 − 𝑦)))
266	265	mpteq2ia 5169	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -((1 / (1 − 𝑦)) · -1)) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦)))
267	257, 266	eqtrdi 2786	. . . . . . . . . 10 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
268	267	dmeqd 5849	. . . . . . . . 9 ⊢ (⊤ → dom (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
269		dmmptg 6195	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ (0(ball‘(abs ∘ − ))1)(1 / (1 − 𝑦)) ∈ V → dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))) = (0(ball‘(abs ∘ − ))1))
270		ovexd 7391	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 / (1 − 𝑦)) ∈ V)
271	269, 270	mprg 3055	. . . . . . . . 9 ⊢ dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))) = (0(ball‘(abs ∘ − ))1)
272	268, 271	eqtrdi 2786	. . . . . . . 8 ⊢ (⊤ → dom (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (0(ball‘(abs ∘ − ))1))
273		sumex 15639	. . . . . . . . . . . 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 6829	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 𝑘 → (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
276	275	cbvsumv 15647	. . . . . . . . . . . . . 14 ⊢ Σ𝑛 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = Σ𝑘 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘)
277	181, 276	eqtrdi 2786	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑘 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
278	277	mpteq2ia 5169	. . . . . . . . . . . 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 2735	. . . . . . . . . . . 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 26383	. . . . . . . . . . 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 3921	. . . . . . . . . . . 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 25918	. . . . . . . . . 10 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1)))))
284		nnnn0 12433	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ₀)
285	284	adantl 481	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ₀)
286		eqeq1 2739	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (𝑚 = 0 ↔ 𝑛 = 0))
287		oveq2 7364	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (1 / 𝑚) = (1 / 𝑛))
288	286, 287	ifbieq2d 4483	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 = 𝑛 → if(𝑚 = 0, 0, (1 / 𝑚)) = if(𝑛 = 0, 0, (1 / 𝑛)))
289		ovex 7389	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (1 / 𝑛) ∈ V
290	90, 289	ifex 4507	. . . . . . . . . . . . . . . . . . . 20 ⊢ if(𝑛 = 0, 0, (1 / 𝑛)) ∈ V
291	288, 89, 290	fvmpt 6936	. . . . . . . . . . . . . . . . . . 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 12200	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 𝑛 ≠ 0)
294	293	adantl 481	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
295	294	neneqd 2935	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ¬ 𝑛 = 0)
296	295	iffalsed 4467	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → if(𝑛 = 0, 0, (1 / 𝑛)) = (1 / 𝑛))
297	292, 296	eqtrd 2770	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛) = (1 / 𝑛))
298	297	oveq2d 7372	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) = (𝑛 · (1 / 𝑛)))
299		nncn 12171	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
300	299	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
301	300, 294	recidd 11915	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · (1 / 𝑛)) = 1)
302	298, 301	eqtrd 2770	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) = 1)
303	302	oveq1d 7371	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (1 · (𝑦↑(𝑛 − 1))))
304		nnm1nn0 12467	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → (𝑛 − 1) ∈ ℕ₀)
305		expcl 14030	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℂ ∧ (𝑛 − 1) ∈ ℕ₀) → (𝑦↑(𝑛 − 1)) ∈ ℂ)
306	51, 304, 305	syl2an 597	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑦↑(𝑛 − 1)) ∈ ℂ)
307	306	mullidd 11152	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (1 · (𝑦↑(𝑛 − 1))) = (𝑦↑(𝑛 − 1)))
308	303, 307	eqtrd 2770	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (𝑦↑(𝑛 − 1)))
309	308	sumeq2dv 15653	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)))
310		nnuz 12816	. . . . . . . . . . . . . . 15 ⊢ ℕ = (ℤ_≥‘1)
311		1e0p1 12675	. . . . . . . . . . . . . . . 16 ⊢ 1 = (0 + 1)
312	311	fveq2i 6832	. . . . . . . . . . . . . . 15 ⊢ (ℤ_≥‘1) = (ℤ_≥‘(0 + 1))
313	310, 312	eqtri 2758	. . . . . . . . . . . . . 14 ⊢ ℕ = (ℤ_≥‘(0 + 1))
314		oveq1 7363	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = (1 + 𝑚) → (𝑛 − 1) = ((1 + 𝑚) − 1))
315	314	oveq2d 7372	. . . . . . . . . . . . . 14 ⊢ (𝑛 = (1 + 𝑚) → (𝑦↑(𝑛 − 1)) = (𝑦↑((1 + 𝑚) − 1)))
316		1zzd 12547	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ∈ ℤ)
317		0zd 12525	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ∈ ℤ)
318	1, 313, 315, 316, 317, 306	isumshft 15793	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑((1 + 𝑚) − 1)))
319		pncan2 11389	. . . . . . . . . . . . . . . 16 ⊢ ((1 ∈ ℂ ∧ 𝑚 ∈ ℂ) → ((1 + 𝑚) − 1) = 𝑚)
320	48, 99, 319	sylancr 588	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ ℕ₀ → ((1 + 𝑚) − 1) = 𝑚)
321	320	oveq2d 7372	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ ℕ₀ → (𝑦↑((1 + 𝑚) − 1)) = (𝑦↑𝑚))
322	321	sumeq2i 15649	. . . . . . . . . . . . 13 ⊢ Σ𝑚 ∈ ℕ₀ (𝑦↑((1 + 𝑚) − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚)
323	318, 322	eqtrdi 2786	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚))
324		geoisum 15831	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ ℂ ∧ (abs‘𝑦) < 1) → Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚) = (1 / (1 − 𝑦)))
325	51, 64, 324	syl2anc 585	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚) = (1 / (1 − 𝑦)))
326	309, 323, 325	3eqtrd 2774	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (1 / (1 − 𝑦)))
327	326	mpteq2ia 5169	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦)))
328	283, 327	eqtrdi 2786	. . . . . . . . 9 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
329	267, 328	eqtr4d 2773	. . . . . . . 8 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))))
330		1rp 12935	. . . . . . . . . 10 ⊢ 1 ∈ ℝ⁺
331		blcntr 24366	. . . . . . . . . 10 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ⁺) → 0 ∈ (0(ball‘(abs ∘ − ))1))
332	38, 28, 330, 331	mp3an 1464	. . . . . . . . 9 ⊢ 0 ∈ (0(ball‘(abs ∘ − ))1)
333	332	a1i 11	. . . . . . . 8 ⊢ (⊤ → 0 ∈ (0(ball‘(abs ∘ − ))1))
334		oveq2 7364	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 0 → (1 − 𝑦) = (1 − 0))
335		1m0e1 12286	. . . . . . . . . . . . . . . 16 ⊢ (1 − 0) = 1
336	334, 335	eqtrdi 2786	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = 0 → (1 − 𝑦) = 1)
337	336	fveq2d 6833	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 0 → (log‘(1 − 𝑦)) = (log‘1))
338		log1 26537	. . . . . . . . . . . . . 14 ⊢ (log‘1) = 0
339	337, 338	eqtrdi 2786	. . . . . . . . . . . . 13 ⊢ (𝑦 = 0 → (log‘(1 − 𝑦)) = 0)
340	339	negeqd 11376	. . . . . . . . . . . 12 ⊢ (𝑦 = 0 → -(log‘(1 − 𝑦)) = -0)
341		neg0 11429	. . . . . . . . . . . 12 ⊢ -0 = 0
342	340, 341	eqtrdi 2786	. . . . . . . . . . 11 ⊢ (𝑦 = 0 → -(log‘(1 − 𝑦)) = 0)
343		eqid 2735	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))
344	342, 343, 90	fvmpt 6936	. . . . . . . . . 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 7363	. . . . . . . . . . . . . . 15 ⊢ (0 = if(𝑛 = 0, 0, (1 / 𝑛)) → (0 · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
347	346	eqeq1d 2737	. . . . . . . . . . . . . 14 ⊢ (0 = if(𝑛 = 0, 0, (1 / 𝑛)) → ((0 · (𝑦↑𝑛)) = 0 ↔ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0))
348		oveq1 7363	. . . . . . . . . . . . . . 15 ⊢ ((1 / 𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)) → ((1 / 𝑛) · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
349	348	eqeq1d 2737	. . . . . . . . . . . . . 14 ⊢ ((1 / 𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)) → (((1 / 𝑛) · (𝑦↑𝑛)) = 0 ↔ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0))
350		simpll 767	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑦 = 0)
351	350, 28	eqeltrdi 2843	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑦 ∈ ℂ)
352		simplr 769	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑛 ∈ ℕ₀)
353	351, 352	expcld 14097	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → (𝑦↑𝑛) ∈ ℂ)
354	353	mul02d 11333	. . . . . . . . . . . . . 14 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → (0 · (𝑦↑𝑛)) = 0)
355		simpll 767	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑦 = 0)
356	355	oveq1d 7371	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (𝑦↑𝑛) = (0↑𝑛))
357		simpr 484	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → 𝑛 ∈ ℕ₀)
358	357, 14	sylib 218	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (𝑛 ∈ ℕ ∨ 𝑛 = 0))
359	358	ord 865	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 ∈ ℕ → 𝑛 = 0))
360	359	con1d 145	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 = 0 → 𝑛 ∈ ℕ))
361	360	imp 406	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑛 ∈ ℕ)
362	361	0expd 14090	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (0↑𝑛) = 0)
363	356, 362	eqtrd 2770	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (𝑦↑𝑛) = 0)
364	363	oveq2d 7372	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · (𝑦↑𝑛)) = ((1 / 𝑛) · 0))
365	361	nnrecred 12217	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℝ)
366	365	recnd 11162	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℂ)
367	366	mul01d 11334	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · 0) = 0)
368	364, 367	eqtrd 2770	. . . . . . . . . . . . . 14 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · (𝑦↑𝑛)) = 0)
369	347, 349, 354, 368	ifbothda 4495	. . . . . . . . . . . . 13 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0)
370	369	sumeq2dv 15653	. . . . . . . . . . . 12 ⊢ (𝑦 = 0 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ 0)
371	1	eqimssi 3977	. . . . . . . . . . . . . 14 ⊢ ℕ₀ ⊆ (ℤ_≥‘0)
372	371	orci 866	. . . . . . . . . . . . 13 ⊢ (ℕ₀ ⊆ (ℤ_≥‘0) ∨ ℕ₀ ∈ Fin)
373		sumz 15673	. . . . . . . . . . . . 13 ⊢ ((ℕ₀ ⊆ (ℤ_≥‘0) ∨ ℕ₀ ∈ Fin) → Σ𝑛 ∈ ℕ₀ 0 = 0)
374	372, 373	ax-mp 5	. . . . . . . . . . . 12 ⊢ Σ𝑛 ∈ ℕ₀ 0 = 0
375	370, 374	eqtrdi 2786	. . . . . . . . . . 11 ⊢ (𝑦 = 0 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0)
376		eqid 2735	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
377	375, 376, 90	fvmpt 6936	. . . . . . . . . 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 2773	. . . . . . . 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 25956	. . . . . . 7 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))))
381	380	fveq1d 6831	. . . . . 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 7364	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (1 − 𝑦) = (1 − 𝐴))
384	383	fveq2d 6833	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (log‘(1 − 𝑦)) = (log‘(1 − 𝐴)))
385	384	negeqd 11376	. . . . . 6 ⊢ (𝑦 = 𝐴 → -(log‘(1 − 𝑦)) = -(log‘(1 − 𝐴)))
386		negex 11380	. . . . . 6 ⊢ -(log‘(1 − 𝐴)) ∈ V
387	385, 343, 386	fvmpt 6936	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘𝐴) = -(log‘(1 − 𝐴)))
388		oveq1 7363	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (𝑦↑𝑛) = (𝐴↑𝑛))
389	388	oveq2d 7372	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
390	389	sumeq2sdv 15654	. . . . . 6 ⊢ (𝑦 = 𝐴 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
391		sumex 15639	. . . . . 6 ⊢ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ V
392	390, 376, 391	fvmpt 6936	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘𝐴) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
393	382, 387, 392	3eqtr3d 2778	. . . 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 5102	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ -(log‘(1 − 𝐴)))
396		seqex 13954	. . . 4 ⊢ seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ V
397	396	a1i 11	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ V)
398		seqex 13954	. . . 4 ⊢ seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ∈ V
399	398	a1i 11	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ∈ V)
400		1zzd 12547	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 1 ∈ ℤ)
401		elnnuz 12817	. . . . . 6 ⊢ (𝑛 ∈ ℕ ↔ 𝑛 ∈ (ℤ_≥‘1))
402		fvres 6848	. . . . . 6 ⊢ (𝑛 ∈ (ℤ_≥‘1) → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛))
403	401, 402	sylbi 217	. . . . 5 ⊢ (𝑛 ∈ ℕ → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛))
404	403	eqcomd 2741	. . . 4 ⊢ (𝑛 ∈ ℕ → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛) = ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛))
405		addlid 11318	. . . . . . . 8 ⊢ (𝑛 ∈ ℂ → (0 + 𝑛) = 𝑛)
406	405	adantl 481	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℂ) → (0 + 𝑛) = 𝑛)
407		0cnd 11126	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℂ)
408		1eluzge0 12819	. . . . . . . 8 ⊢ 1 ∈ (ℤ_≥‘0)
409	408	a1i 11	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 1 ∈ (ℤ_≥‘0))
410		0cnd 11126	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) ∧ 𝑘 = 0) → 0 ∈ ℂ)
411		nn0cn 12436	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ₀ → 𝑘 ∈ ℂ)
412	411	adantl 481	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → 𝑘 ∈ ℂ)
413		neqne 2938	. . . . . . . . . . . 12 ⊢ (¬ 𝑘 = 0 → 𝑘 ≠ 0)
414		reccl 11805	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℂ ∧ 𝑘 ≠ 0) → (1 / 𝑘) ∈ ℂ)
415	412, 413, 414	syl2an 597	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) ∧ ¬ 𝑘 = 0) → (1 / 𝑘) ∈ ℂ)
416	410, 415	ifclda 4492	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → if(𝑘 = 0, 0, (1 / 𝑘)) ∈ ℂ)
417		expcl 14030	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ₀) → (𝐴↑𝑘) ∈ ℂ)
418	417	adantlr 716	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → (𝐴↑𝑘) ∈ ℂ)
419	416, 418	mulcld 11154	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) ∈ ℂ)
420	419	fmpttd 7056	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))):ℕ₀⟶ℂ)
421		1nn0 12442	. . . . . . . 8 ⊢ 1 ∈ ℕ₀
422		ffvelcdm 7022	. . . . . . . 8 ⊢ (((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))):ℕ₀⟶ℂ ∧ 1 ∈ ℕ₀) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘1) ∈ ℂ)
423	420, 421, 422	sylancl 587	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘1) ∈ ℂ)
424		elfz1eq 13478	. . . . . . . . . 10 ⊢ (𝑛 ∈ (0...0) → 𝑛 = 0)
425		1m1e0 12242	. . . . . . . . . . 11 ⊢ (1 − 1) = 0
426	425	oveq2i 7367	. . . . . . . . . 10 ⊢ (0...(1 − 1)) = (0...0)
427	424, 426	eleq2s 2853	. . . . . . . . 9 ⊢ (𝑛 ∈ (0...(1 − 1)) → 𝑛 = 0)
428	427	fveq2d 6833	. . . . . . . 8 ⊢ (𝑛 ∈ (0...(1 − 1)) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0))
429		0nn0 12441	. . . . . . . . . 10 ⊢ 0 ∈ ℕ₀
430		iftrue 4462	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → if(𝑘 = 0, 0, (1 / 𝑘)) = 0)
431		oveq2 7364	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → (𝐴↑𝑘) = (𝐴↑0))
432	430, 431	oveq12d 7374	. . . . . . . . . . 11 ⊢ (𝑘 = 0 → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) = (0 · (𝐴↑0)))
433		ovex 7389	. . . . . . . . . . 11 ⊢ (0 · (𝐴↑0)) ∈ V
434	432, 8, 433	fvmpt 6936	. . . . . . . . . 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 14030	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 0 ∈ ℕ₀) → (𝐴↑0) ∈ ℂ)
437	27, 429, 436	sylancl 587	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴↑0) ∈ ℂ)
438	437	mul02d 11333	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (0 · (𝐴↑0)) = 0)
439	435, 438	eqtrid 2782	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0) = 0)
440	428, 439	sylan9eqr 2792	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ (0...(1 − 1))) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = 0)
441	406, 407, 409, 423, 440	seqid 13998	. . . . . 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 2935	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ¬ 𝑛 = 0)
444	443	iffalsed 4467	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → if(𝑛 = 0, 0, (1 / 𝑛)) = (1 / 𝑛))
445	444	oveq1d 7371	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) = ((1 / 𝑛) · (𝐴↑𝑛)))
446	284, 23	sylan2 594	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (𝐴↑𝑛) ∈ ℂ)
447	299	adantl 481	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
448	446, 447, 442	divrec2d 11924	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝐴↑𝑛) / 𝑛) = ((1 / 𝑛) · (𝐴↑𝑛)))
449	445, 448	eqtr4d 2773	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) = ((𝐴↑𝑛) / 𝑛))
450	284, 11	sylan2 594	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
451		id 22	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑛 → 𝑘 = 𝑛)
452	6, 451	oveq12d 7374	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑛 → ((𝐴↑𝑘) / 𝑘) = ((𝐴↑𝑛) / 𝑛))
453		eqid 2735	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)) = (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))
454		ovex 7389	. . . . . . . . . . 11 ⊢ ((𝐴↑𝑛) / 𝑛) ∈ V
455	452, 453, 454	fvmpt 6936	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛) = ((𝐴↑𝑛) / 𝑛))
456	455	adantl 481	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛) = ((𝐴↑𝑛) / 𝑛))
457	449, 450, 456	3eqtr4d 2780	. . . . . . . 8 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛))
458	401, 457	sylan2br 596	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ (ℤ_≥‘1)) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛))
459	400, 458	seqfeq 13978	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) = seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))))
460	441, 459	eqtrd 2770	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1)) = seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))))
461	460	fveq1d 6831	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)))‘𝑛))
462	404, 461	sylan9eqr 2792	. . 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 232	1 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ⇝ -(log‘(1 − 𝐴)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 ∨ wo 848 ∧ w3a 1087 = wceq 1542 ⊤wtru 1543 ∈ wcel 2114 ≠ wne 2930 {crab 3387 Vcvv 3427 ∖ cdif 3882 ⊆ wss 3885 ifcif 4456 {csn 4557 {cpr 4559 class class class wbr 5074 ↦ cmpt 5155 ^◡ccnv 5619 dom cdm 5620 ran crn 5621 ↾ cres 5622 “ cima 5623 ∘ ccom 5624 Fn wfn 6482 ⟶wf 6483 –1-1-onto→wf1o 6486 ‘cfv 6487 (class class class)co 7356 Fincfn 8882 supcsup 9342 ℂcc 11025 ℝcr 11026 0cc0 11027 1c1 11028 + caddc 11030 · cmul 11032 +∞cpnf 11165 -∞cmnf 11166 ℝ^*cxr 11167 < clt 11168 ≤ cle 11169 − cmin 11366 -cneg 11367 / cdiv 11796 ℕcn 12163 2c2 12225 ℕ₀cn0 12426 ℤ_≥cuz 12777 ℝ⁺crp 12931 (,]cioc 13288 [,)cico 13289 [,]cicc 13290 ...cfz 13450 seqcseq 13952 ↑cexp 14012 abscabs 15185 ⇝ cli 15435 Σcsu 15637 TopOpenctopn 17373 ∞Metcxmet 21326 ballcbl 21328 ℂ_fldccnfld 21341 –cn→ccncf 24831 D cdv 25818 logclog 26506

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2184 ax-ext 2707 ax-rep 5201 ax-sep 5220 ax-nul 5230 ax-pow 5296 ax-pr 5364 ax-un 7678 ax-inf2 9551 ax-cnex 11083 ax-resscn 11084 ax-1cn 11085 ax-icn 11086 ax-addcl 11087 ax-addrcl 11088 ax-mulcl 11089 ax-mulrcl 11090 ax-mulcom 11091 ax-addass 11092 ax-mulass 11093 ax-distr 11094 ax-i2m1 11095 ax-1ne0 11096 ax-1rid 11097 ax-rnegex 11098 ax-rrecex 11099 ax-cnre 11100 ax-pre-lttri 11101 ax-pre-lttrn 11102 ax-pre-ltadd 11103 ax-pre-mulgt0 11104 ax-pre-sup 11105 ax-addf 11106

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2538 df-eu 2568 df-clab 2714 df-cleq 2727 df-clel 2810 df-nfc 2884 df-ne 2931 df-nel 3035 df-ral 3050 df-rex 3060 df-rmo 3340 df-reu 3341 df-rab 3388 df-v 3429 df-sbc 3726 df-csb 3834 df-dif 3888 df-un 3890 df-in 3892 df-ss 3902 df-pss 3905 df-nul 4264 df-if 4457 df-pw 4533 df-sn 4558 df-pr 4560 df-tp 4562 df-op 4564 df-uni 4841 df-int 4880 df-iun 4925 df-iin 4926 df-br 5075 df-opab 5137 df-mpt 5156 df-tr 5182 df-id 5515 df-eprel 5520 df-po 5528 df-so 5529 df-fr 5573 df-se 5574 df-we 5575 df-xp 5626 df-rel 5627 df-cnv 5628 df-co 5629 df-dm 5630 df-rn 5631 df-res 5632 df-ima 5633 df-pred 6254 df-ord 6315 df-on 6316 df-lim 6317 df-suc 6318 df-iota 6443 df-fun 6489 df-fn 6490 df-f 6491 df-f1 6492 df-fo 6493 df-f1o 6494 df-fv 6495 df-isom 6496 df-riota 7313 df-ov 7359 df-oprab 7360 df-mpo 7361 df-of 7620 df-om 7807 df-1st 7931 df-2nd 7932 df-supp 8100 df-frecs 8220 df-wrecs 8251 df-recs 8300 df-rdg 8338 df-1o 8394 df-2o 8395 df-er 8632 df-map 8764 df-pm 8765 df-ixp 8835 df-en 8883 df-dom 8884 df-sdom 8885 df-fin 8886 df-fsupp 9264 df-fi 9313 df-sup 9344 df-inf 9345 df-oi 9414 df-card 9852 df-pnf 11170 df-mnf 11171 df-xr 11172 df-ltxr 11173 df-le 11174 df-sub 11368 df-neg 11369 df-div 11797 df-nn 12164 df-2 12233 df-3 12234 df-4 12235 df-5 12236 df-6 12237 df-7 12238 df-8 12239 df-9 12240 df-n0 12427 df-z 12514 df-dec 12634 df-uz 12778 df-q 12888 df-rp 12932 df-xneg 13052 df-xadd 13053 df-xmul 13054 df-ioo 13291 df-ioc 13292 df-ico 13293 df-icc 13294 df-fz 13451 df-fzo 13598 df-fl 13740 df-mod 13818 df-seq 13953 df-exp 14013 df-fac 14225 df-bc 14254 df-hash 14282 df-shft 15018 df-cj 15050 df-re 15051 df-im 15052 df-sqrt 15186 df-abs 15187 df-limsup 15422 df-clim 15439 df-rlim 15440 df-sum 15638 df-ef 16021 df-sin 16023 df-cos 16024 df-tan 16025 df-pi 16026 df-struct 17106 df-sets 17123 df-slot 17141 df-ndx 17153 df-base 17169 df-ress 17190 df-plusg 17222 df-mulr 17223 df-starv 17224 df-sca 17225 df-vsca 17226 df-ip 17227 df-tset 17228 df-ple 17229 df-ds 17231 df-unif 17232 df-hom 17233 df-cco 17234 df-rest 17374 df-topn 17375 df-0g 17393 df-gsum 17394 df-topgen 17395 df-pt 17396 df-prds 17399 df-xrs 17455 df-qtop 17460 df-imas 17461 df-xps 17463 df-mre 17537 df-mrc 17538 df-acs 17540 df-mgm 18597 df-sgrp 18676 df-mnd 18692 df-submnd 18741 df-mulg 19033 df-cntz 19281 df-cmn 19746 df-psmet 21333 df-xmet 21334 df-met 21335 df-bl 21336 df-mopn 21337 df-fbas 21338 df-fg 21339 df-cnfld 21342 df-top 22847 df-topon 22864 df-topsp 22886 df-bases 22899 df-cld 22972 df-ntr 22973 df-cls 22974 df-nei 23051 df-lp 23089 df-perf 23090 df-cn 23180 df-cnp 23181 df-haus 23268 df-cmp 23340 df-tx 23515 df-hmeo 23708 df-fil 23799 df-fm 23891 df-flim 23892 df-flf 23893 df-xms 24273 df-ms 24274 df-tms 24275 df-cncf 24833 df-limc 25821 df-dv 25822 df-ulm 26330 df-log 26508

This theorem is referenced by: logtaylsum 26613 logtayl2 26614 atantayl 26889 stirlinglem5 46494

W3C validator