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 26732

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 12887	. . . 4 ⊢ ℕ₀ = (ℤ_≥‘0)
2		0zd 12590	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℤ)
3		eqeq1 2767	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → (𝑘 = 0 ↔ 𝑛 = 0))
4		oveq2 7404	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → (1 / 𝑘) = (1 / 𝑛))
5	3, 4	ifbieq2d 4508	. . . . . . 7 ⊢ (𝑘 = 𝑛 → if(𝑘 = 0, 0, (1 / 𝑘)) = if(𝑛 = 0, 0, (1 / 𝑛)))
6		oveq2 7404	. . . . . . 7 ⊢ (𝑘 = 𝑛 → (𝐴↑𝑘) = (𝐴↑𝑛))
7	5, 6	oveq12d 7414	. . . . . 6 ⊢ (𝑘 = 𝑛 → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
8		eqid 2763	. . . . . 6 ⊢ (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))) = (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))
9		ovex 7429	. . . . . 6 ⊢ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ V
10	7, 8, 9	fvmpt 6975	. . . . 5 ⊢ (𝑛 ∈ ℕ₀ → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
11	10	adantl 485	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
12		0cnd 11183	. . . . . 6 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 0 ∈ ℂ)
13		elnn0 12493	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ₀ ↔ (𝑛 ∈ ℕ ∨ 𝑛 = 0))
14	13	bilani 508	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (𝑛 ∈ ℕ ∨ 𝑛 = 0))
15	14	ord 875	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 ∈ ℕ → 𝑛 = 0))
16	15	con1d 145	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 = 0 → 𝑛 ∈ ℕ))
17	16	imp 410	. . . . . . . 8 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑛 ∈ ℕ)
18	17	nnrecred 12274	. . . . . . 7 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℝ)
19	18	recnd 11221	. . . . . 6 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℂ)
20	12, 19	ifclda 4517	. . . . 5 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → if(𝑛 = 0, 0, (1 / 𝑛)) ∈ ℂ)
21		expcl 14102	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (𝐴↑𝑛) ∈ ℂ)
22	21	adantlr 725	. . . . 5 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (𝐴↑𝑛) ∈ ℂ)
23	20, 22	mulcld 11213	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ ℂ)
24		logtayllem 26731	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ dom ⇝ )
25	1, 2, 11, 23, 24	isumclim2 15795	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
26		simpl 486	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ ℂ)
27		0cn 11182	. . . . . . . 8 ⊢ 0 ∈ ℂ
28		eqid 2763	. . . . . . . . 9 ⊢ (abs ∘ − ) = (abs ∘ − )
29	28	cnmetdval 24837	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 0 ∈ ℂ) → (𝐴(abs ∘ − )0) = (abs‘(𝐴 − 0)))
30	26, 27, 29	sylancl 595	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) = (abs‘(𝐴 − 0)))
31		subid1 11462	. . . . . . . . 9 ⊢ (𝐴 ∈ ℂ → (𝐴 − 0) = 𝐴)
32	31	adantr 484	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴 − 0) = 𝐴)
33	32	fveq2d 6871	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘(𝐴 − 0)) = (abs‘𝐴))
34	30, 33	eqtrd 2798	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) = (abs‘𝐴))
35		simpr 488	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) < 1)
36	34, 35	eqbrtrd 5123	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) < 1)
37		cnxmet 24839	. . . . . . 7 ⊢ (abs ∘ − ) ∈ (∞Met‘ℂ)
38		1xr 11252	. . . . . . 7 ⊢ 1 ∈ ℝ^*
39		elbl3 24459	. . . . . . 7 ⊢ ((((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℝ^*) ∧ (0 ∈ ℂ ∧ 𝐴 ∈ ℂ)) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
40	37, 38, 39	mpanl12 712	. . . . . 6 ⊢ ((0 ∈ ℂ ∧ 𝐴 ∈ ℂ) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
41	27, 26, 40	sylancr 596	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
42	36, 41	mpbird 259	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ (0(ball‘(abs ∘ − ))1))
43		tru 1565	. . . . . 6 ⊢ ⊤
44		eqid 2763	. . . . . . . 8 ⊢ (0(ball‘(abs ∘ − ))1) = (0(ball‘(abs ∘ − ))1)
45		0cnd 11183	. . . . . . . 8 ⊢ (⊤ → 0 ∈ ℂ)
46	38	a1i 11	. . . . . . . 8 ⊢ (⊤ → 1 ∈ ℝ^*)
47		ax-1cn 11142	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℂ
48		blssm 24485	. . . . . . . . . . . . . . 15 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ^*) → (0(ball‘(abs ∘ − ))1) ⊆ ℂ)
49	37, 27, 38, 48	mp3an 1483	. . . . . . . . . . . . . 14 ⊢ (0(ball‘(abs ∘ − ))1) ⊆ ℂ
50	49	sseli 3933	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 𝑦 ∈ ℂ)
51		subcl 11440	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
52	47, 50, 51	sylancr 596	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ∈ ℂ)
53	50	abscld 15476	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ ℝ)
54	28	cnmetdval 24837	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℂ ∧ 0 ∈ ℂ) → (𝑦(abs ∘ − )0) = (abs‘(𝑦 − 0)))
55	50, 27, 54	sylancl 595	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) = (abs‘(𝑦 − 0)))
56	50	subid1d 11542	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦 − 0) = 𝑦)
57	56	fveq2d 6871	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(𝑦 − 0)) = (abs‘𝑦))
58	55, 57	eqtrd 2798	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) = (abs‘𝑦))
59		elbl3 24459	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℝ^*) ∧ (0 ∈ ℂ ∧ 𝑦 ∈ ℂ)) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
60	37, 38, 59	mpanl12 712	. . . . . . . . . . . . . . . . . 18 ⊢ ((0 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
61	27, 50, 60	sylancr 596	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
62	61	ibi 269	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) < 1)
63	58, 62	eqbrtrrd 5125	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < 1)
64	53, 63	gtned 11329	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ≠ (abs‘𝑦))
65		abs1 15334	. . . . . . . . . . . . . . . 16 ⊢ (abs‘1) = 1
66		fveq2 6867	. . . . . . . . . . . . . . . 16 ⊢ (1 = 𝑦 → (abs‘1) = (abs‘𝑦))
67	65, 66	eqtr3id 2812	. . . . . . . . . . . . . . 15 ⊢ (1 = 𝑦 → 1 = (abs‘𝑦))
68	67	necon3i 2990	. . . . . . . . . . . . . 14 ⊢ (1 ≠ (abs‘𝑦) → 1 ≠ 𝑦)
69	64, 68	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ≠ 𝑦)
70		subeq0 11468	. . . . . . . . . . . . . . 15 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((1 − 𝑦) = 0 ↔ 1 = 𝑦))
71	70	necon3bid 3002	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((1 − 𝑦) ≠ 0 ↔ 1 ≠ 𝑦))
72	47, 50, 71	sylancr 596	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 − 𝑦) ≠ 0 ↔ 1 ≠ 𝑦))
73	69, 72	mpbird 259	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ≠ 0)
74	52, 73	logcld 26642	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (log‘(1 − 𝑦)) ∈ ℂ)
75	74	negcld 11540	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -(log‘(1 − 𝑦)) ∈ ℂ)
76	75	adantl 485	. . . . . . . . 9 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → -(log‘(1 − 𝑦)) ∈ ℂ)
77	76	fmpttd 7096	. . . . . . . 8 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))):(0(ball‘(abs ∘ − ))1)⟶ℂ)
78	50	absge0d 15484	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ≤ (abs‘𝑦))
79	53	rexrd 11243	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ ℝ^*)
80		peano2re 11367	. . . . . . . . . . . . . . . 16 ⊢ ((abs‘𝑦) ∈ ℝ → ((abs‘𝑦) + 1) ∈ ℝ)
81	53, 80	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) + 1) ∈ ℝ)
82	81	rehalfcld 12478	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℝ)
83	82	rexrd 11243	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℝ^*)
84		iccssxr 13444	. . . . . . . . . . . . . . 15 ⊢ (0[,]+∞) ⊆ ℝ^*
85		eqeq1 2767	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑚 = 𝑗 → (𝑚 = 0 ↔ 𝑗 = 0))
86		oveq2 7404	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑚 = 𝑗 → (1 / 𝑚) = (1 / 𝑗))
87	85, 86	ifbieq2d 4508	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑗 → if(𝑚 = 0, 0, (1 / 𝑚)) = if(𝑗 = 0, 0, (1 / 𝑗)))
88		eqid 2763	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))) = (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))
89		c0ex 11184	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 0 ∈ V
90		ovex 7429	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (1 / 𝑗) ∈ V
91	89, 90	ifex 4532	. . . . . . . . . . . . . . . . . . . . 21 ⊢ if(𝑗 = 0, 0, (1 / 𝑗)) ∈ V
92	87, 88, 91	fvmpt 6975	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 ∈ ℕ₀ → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) = if(𝑗 = 0, 0, (1 / 𝑗)))
93	92	eqcomd 2769	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ → if(𝑗 = 0, 0, (1 / 𝑗)) = ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗))
94	93	oveq1d 7411	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑗 ∈ ℕ₀ → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗)))
95	94	mpteq2ia 5196	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗)))
96	95	mpteq2i 5197	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)))) = (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗))))
97		0cnd 11183	. . . . . . . . . . . . . . . . . 18 ⊢ (((⊤ ∧ 𝑚 ∈ ℕ₀) ∧ 𝑚 = 0) → 0 ∈ ℂ)
98		nn0cn 12501	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 ∈ ℕ₀ → 𝑚 ∈ ℂ)
99	98	adantl 485	. . . . . . . . . . . . . . . . . . 19 ⊢ ((⊤ ∧ 𝑚 ∈ ℕ₀) → 𝑚 ∈ ℂ)
100		neqne 2966	. . . . . . . . . . . . . . . . . . 19 ⊢ (¬ 𝑚 = 0 → 𝑚 ≠ 0)
101		reccl 11863	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑚 ∈ ℂ ∧ 𝑚 ≠ 0) → (1 / 𝑚) ∈ ℂ)
102	99, 100, 101	syl2an 605	. . . . . . . . . . . . . . . . . 18 ⊢ (((⊤ ∧ 𝑚 ∈ ℕ₀) ∧ ¬ 𝑚 = 0) → (1 / 𝑚) ∈ ℂ)
103	97, 102	ifclda 4517	. . . . . . . . . . . . . . . . 17 ⊢ ((⊤ ∧ 𝑚 ∈ ℕ₀) → if(𝑚 = 0, 0, (1 / 𝑚)) ∈ ℂ)
104	103	fmpttd 7096	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))):ℕ₀⟶ℂ)
105		recn 11174	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑟 ∈ ℝ → 𝑟 ∈ ℂ)
106		oveq1 7403	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑥 = 𝑟 → (𝑥↑𝑗) = (𝑟↑𝑗))
107	106	oveq2d 7412	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑥 = 𝑟 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))
108	107	mpteq2dv 5195	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 = 𝑟 → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))))
109		eqid 2763	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)))) = (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))
110		nn0ex 12497	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ℕ₀ ∈ V
111	110	mptex 7207	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))) ∈ V
112	108, 109, 111	fvmpt 6975	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑟 ∈ ℂ → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))))
113	105, 112	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑟 ∈ ℝ → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))))
114	113	eqcomd 2769	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑟 ∈ ℝ → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))) = ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟))
115	114	seqeq3d 14032	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑟 ∈ ℝ → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) = seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)))
116	115	eleq1d 2848	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑟 ∈ ℝ → (seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ ↔ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ ))
117	116	rabbiia 3419	. . . . . . . . . . . . . . . . 17 ⊢ {𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ } = {𝑟 ∈ ℝ ∣ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ }
118	117	supeq1i 9391	. . . . . . . . . . . . . . . 16 ⊢ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) = sup({𝑟 ∈ ℝ ∣ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ }, ℝ^, < )
119	96, 104, 118	radcnvcl 26487	. . . . . . . . . . . . . . 15 ⊢ (⊤ → sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ) ∈ (0[,]+∞))
120	84, 119	sselid 3935	. . . . . . . . . . . . . 14 ⊢ (⊤ → sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) ∈ ℝ^)
121	43, 120	mp1i 13	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) ∈ ℝ^)
122		1re 11192	. . . . . . . . . . . . . . 15 ⊢ 1 ∈ ℝ
123		avglt1 12469	. . . . . . . . . . . . . . 15 ⊢ (((abs‘𝑦) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝑦) < 1 ↔ (abs‘𝑦) < (((abs‘𝑦) + 1) / 2)))
124	53, 122, 123	sylancl 595	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) < 1 ↔ (abs‘𝑦) < (((abs‘𝑦) + 1) / 2)))
125	63, 124	mpbid 234	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < (((abs‘𝑦) + 1) / 2))
126		0red 11195	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ∈ ℝ)
127	126, 53, 82, 78, 125	lelttrd 11352	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 < (((abs‘𝑦) + 1) / 2))
128	126, 82, 127	ltled 11342	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ≤ (((abs‘𝑦) + 1) / 2))
129	82, 128	absidd 15460	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) = (((abs‘𝑦) + 1) / 2))
130	43, 104	mp1i 13	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))):ℕ₀⟶ℂ)
131	82	recnd 11221	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℂ)
132		oveq1 7403	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (𝑥↑𝑗) = ((((abs‘𝑦) + 1) / 2)↑𝑗))
133	132	oveq2d 7412	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))
134	133	mpteq2dv 5195	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))))
135	110	mptex 7207	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))) ∈ V
136	134, 109, 135	fvmpt 6975	. . . . . . . . . . . . . . . . . 18 ⊢ ((((abs‘𝑦) + 1) / 2) ∈ ℂ → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2)) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))))
137	131, 136	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2)) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))))
138	137	seqeq3d 14032	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2))) = seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))))
139		avglt2 12470	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((abs‘𝑦) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝑦) < 1 ↔ (((abs‘𝑦) + 1) / 2) < 1))
140	53, 122, 139	sylancl 595	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) < 1 ↔ (((abs‘𝑦) + 1) / 2) < 1))
141	63, 140	mpbid 234	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) < 1)
142	129, 141	eqbrtrd 5123	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) < 1)
143		logtayllem 26731	. . . . . . . . . . . . . . . . 17 ⊢ (((((abs‘𝑦) + 1) / 2) ∈ ℂ ∧ (abs‘(((abs‘𝑦) + 1) / 2)) < 1) → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))) ∈ dom ⇝ )
144	131, 142, 143	syl2anc 593	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))) ∈ dom ⇝ )
145	138, 144	eqeltrd 2863	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2))) ∈ dom ⇝ )
146	96, 130, 118, 131, 145	radcnvle 26490	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) ≤ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
147	129, 146	eqbrtrrd 5125	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ≤ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
148	79, 83, 121, 125, 147	xrltletrd 13173	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
149		0re 11194	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℝ
150		elico2 13424	. . . . . . . . . . . . 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 ⇝ }, ℝ^, < ))))
151	149, 121, 150	sylancr 596	. . . . . . . . . . . 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 ⇝ }, ℝ^, < ))))
152	53, 78, 148, 151	mpbir3and 1357	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))
153		absf 15375	. . . . . . . . . . . 12 ⊢ abs:ℂ⟶ℝ
154		ffn 6691	. . . . . . . . . . . 12 ⊢ (abs:ℂ⟶ℝ → abs Fn ℂ)
155		elpreima 7039	. . . . . . . . . . . 12 ⊢ (abs Fn ℂ → (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↔ (𝑦 ∈ ℂ ∧ (abs‘𝑦) ∈ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))))
156	153, 154, 155	mp2b 10	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↔ (𝑦 ∈ ℂ ∧ (abs‘𝑦) ∈ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))))
157	50, 152, 156	sylanbrc 592	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))))
158		cnvimass 6071	. . . . . . . . . . . . . . . . 17 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) ⊆ dom abs
159	153	fdmi 6703	. . . . . . . . . . . . . . . . 17 ⊢ dom abs = ℂ
160	158, 159	sseqtri 3985	. . . . . . . . . . . . . . . 16 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) ⊆ ℂ
161	160	sseli 3933	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → 𝑦 ∈ ℂ)
162		oveq1 7403	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 = 𝑦 → (𝑥↑𝑗) = (𝑦↑𝑗))
163	162	oveq2d 7412	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑦 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))
164	163	mpteq2dv 5195	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑦 → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
165	110	mptex 7207	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))) ∈ V
166	164, 109, 165	fvmpt 6975	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ ℂ → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
167	166	adantr 484	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
168	167	fveq1d 6869	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛))
169		eqeq1 2767	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 𝑛 → (𝑗 = 0 ↔ 𝑛 = 0))
170		oveq2 7404	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 𝑛 → (1 / 𝑗) = (1 / 𝑛))
171	169, 170	ifbieq2d 4508	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝑛 → if(𝑗 = 0, 0, (1 / 𝑗)) = if(𝑛 = 0, 0, (1 / 𝑛)))
172		oveq2 7404	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝑛 → (𝑦↑𝑗) = (𝑦↑𝑛))
173	171, 172	oveq12d 7414	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 = 𝑛 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
174		eqid 2763	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))
175		ovex 7429	. . . . . . . . . . . . . . . . . . 19 ⊢ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ V
176	173, 174, 175	fvmpt 6975	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ₀ → ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
177	176	adantl 485	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
178	168, 177	eqtr2d 2799	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛))
179	178	sumeq2dv 15739	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℂ → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛))
180	161, 179	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛))
181	180	mpteq2ia 5196	. . . . . . . . . . . . 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 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛))
182		eqid 2763	. . . . . . . . . . . . 13 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) = (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))
183		eqid 2763	. . . . . . . . . . . . 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))
184	96, 181, 104, 118, 182, 183	psercn 26496	. . . . . . . . . . . 12 ⊢ (⊤ → (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))) ∈ ((^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))–cn→ℂ))
185		cncff 24962	. . . . . . . . . . . 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 ⇝ }, ℝ^, < )))⟶ℂ)
186	184, 185	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 ⇝ }, ℝ^, < )))⟶ℂ)
187	186	fvmptelcdm 7094	. . . . . . . . . 10 ⊢ ((⊤ ∧ 𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ ℂ)
188	157, 187	sylan2 602	. . . . . . . . 9 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ ℂ)
189	188	fmpttd 7096	. . . . . . . 8 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))):(0(ball‘(abs ∘ − ))1)⟶ℂ)
190		cnelprrecn 11177	. . . . . . . . . . . . 13 ⊢ ℂ ∈ {ℝ, ℂ}
191	190	a1i 11	. . . . . . . . . . . 12 ⊢ (⊤ → ℂ ∈ {ℝ, ℂ})
192	74	adantl 485	. . . . . . . . . . . 12 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → (log‘(1 − 𝑦)) ∈ ℂ)
193		ovexd 7431	. . . . . . . . . . . 12 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → ((1 / (1 − 𝑦)) · -1) ∈ V)
194	28	cnmetdval 24837	. . . . . . . . . . . . . . . . . 18 ⊢ ((1 ∈ ℂ ∧ (1 − 𝑦) ∈ ℂ) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘(1 − (1 − 𝑦))))
195	47, 52, 194	sylancr 596	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘(1 − (1 − 𝑦))))
196		nncan 11471	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − (1 − 𝑦)) = 𝑦)
197	47, 50, 196	sylancr 596	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − (1 − 𝑦)) = 𝑦)
198	197	fveq2d 6871	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(1 − (1 − 𝑦))) = (abs‘𝑦))
199	195, 198	eqtrd 2798	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘𝑦))
200	199, 63	eqbrtrd 5123	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) < 1)
201		elbl 24455	. . . . . . . . . . . . . . . 16 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℂ ∧ 1 ∈ ℝ^*) → ((1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1) ↔ ((1 − 𝑦) ∈ ℂ ∧ (1(abs ∘ − )(1 − 𝑦)) < 1)))
202	37, 47, 38, 201	mp3an 1483	. . . . . . . . . . . . . . 15 ⊢ ((1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1) ↔ ((1 − 𝑦) ∈ ℂ ∧ (1(abs ∘ − )(1 − 𝑦)) < 1))
203	52, 200, 202	sylanbrc 592	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1))
204	203	adantl 485	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → (1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1))
205		neg1cn 12190	. . . . . . . . . . . . . 14 ⊢ -1 ∈ ℂ
206	205	a1i 11	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → -1 ∈ ℂ)
207		eqid 2763	. . . . . . . . . . . . . . . . . 18 ⊢ (1(ball‘(abs ∘ − ))1) = (1(ball‘(abs ∘ − ))1)
208	207	dvlog2lem 26724	. . . . . . . . . . . . . . . . 17 ⊢ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ (-∞(,]0))
209	208	sseli 3933	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ∈ (ℂ ∖ (-∞(,]0)))
210	209	eldifad 3917	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ∈ ℂ)
211		eqid 2763	. . . . . . . . . . . . . . . . 17 ⊢ (ℂ ∖ (-∞(,]0)) = (ℂ ∖ (-∞(,]0))
212	211	logdmn0 26712	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (ℂ ∖ (-∞(,]0)) → 𝑥 ≠ 0)
213	209, 212	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ≠ 0)
214	210, 213	logcld 26642	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → (log‘𝑥) ∈ ℂ)
215	214	adantl 485	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑥 ∈ (1(ball‘(abs ∘ − ))1)) → (log‘𝑥) ∈ ℂ)
216		ovexd 7431	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑥 ∈ (1(ball‘(abs ∘ − ))1)) → (1 / 𝑥) ∈ V)
217		simpr 488	. . . . . . . . . . . . . . 15 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 𝑦 ∈ ℂ)
218	47, 217, 51	sylancr 596	. . . . . . . . . . . . . 14 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
219	205	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → -1 ∈ ℂ)
220		1cnd 11186	. . . . . . . . . . . . . . . 16 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 1 ∈ ℂ)
221		0cnd 11183	. . . . . . . . . . . . . . . 16 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 0 ∈ ℂ)
222		1cnd 11186	. . . . . . . . . . . . . . . . 17 ⊢ (⊤ → 1 ∈ ℂ)
223	191, 222	dvmptc 26027	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ 1)) = (𝑦 ∈ ℂ ↦ 0))
224	191	dvmptid 26026	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ 𝑦)) = (𝑦 ∈ ℂ ↦ 1))
225	191, 220, 221, 223, 217, 220, 224	dvmptsub 26036	. . . . . . . . . . . . . . 15 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ (1 − 𝑦))) = (𝑦 ∈ ℂ ↦ (0 − 1)))
226		df-neg 11428	. . . . . . . . . . . . . . . 16 ⊢ -1 = (0 − 1)
227	226	mpteq2i 5197	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℂ ↦ -1) = (𝑦 ∈ ℂ ↦ (0 − 1))
228	225, 227	eqtr4di 2816	. . . . . . . . . . . . . 14 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ (1 − 𝑦))) = (𝑦 ∈ ℂ ↦ -1))
229	49	a1i 11	. . . . . . . . . . . . . 14 ⊢ (⊤ → (0(ball‘(abs ∘ − ))1) ⊆ ℂ)
230		eqid 2763	. . . . . . . . . . . . . . . 16 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
231	230	cnfldtopon 24849	. . . . . . . . . . . . . . 15 ⊢ (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ)
232	231	toponrestid 22988	. . . . . . . . . . . . . 14 ⊢ (TopOpen‘ℂ_fld) = ((TopOpen‘ℂ_fld) ↾_t ℂ)
233	230	cnfldtopn 24848	. . . . . . . . . . . . . . . . 17 ⊢ (TopOpen‘ℂ_fld) = (MetOpen‘(abs ∘ − ))
234	233	blopn 24567	. . . . . . . . . . . . . . . 16 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ^*) → (0(ball‘(abs ∘ − ))1) ∈ (TopOpen‘ℂ_fld))
235	37, 27, 38, 234	mp3an 1483	. . . . . . . . . . . . . . 15 ⊢ (0(ball‘(abs ∘ − ))1) ∈ (TopOpen‘ℂ_fld)
236	235	a1i 11	. . . . . . . . . . . . . 14 ⊢ (⊤ → (0(ball‘(abs ∘ − ))1) ∈ (TopOpen‘ℂ_fld))
237	191, 218, 219, 228, 229, 232, 230, 236	dvmptres 26032	. . . . . . . . . . . . 13 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -1))
238		logf1o 26636	. . . . . . . . . . . . . . . . . . . 20 ⊢ log:(ℂ ∖ {0})–1-1-onto→ran log
239		f1of 6806	. . . . . . . . . . . . . . . . . . . 20 ⊢ (log:(ℂ ∖ {0})–1-1-onto→ran log → log:(ℂ ∖ {0})⟶ran log)
240	238, 239	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ log:(ℂ ∖ {0})⟶ran log
241	211	logdmss 26714	. . . . . . . . . . . . . . . . . . . 20 ⊢ (ℂ ∖ (-∞(,]0)) ⊆ (ℂ ∖ {0})
242	208, 241	sstri 3946	. . . . . . . . . . . . . . . . . . 19 ⊢ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ {0})
243		fssres 6730	. . . . . . . . . . . . . . . . . . 19 ⊢ ((log:(ℂ ∖ {0})⟶ran log ∧ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ {0})) → (log ↾ (1(ball‘(abs ∘ − ))1)):(1(ball‘(abs ∘ − ))1)⟶ran log)
244	240, 242, 243	mp2an 702	. . . . . . . . . . . . . . . . . 18 ⊢ (log ↾ (1(ball‘(abs ∘ − ))1)):(1(ball‘(abs ∘ − ))1)⟶ran log
245	244	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)):(1(ball‘(abs ∘ − ))1)⟶ran log)
246	245	feqmptd 6935	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥)))
247		fvres 6886	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥) = (log‘𝑥))
248	247	mpteq2ia 5196	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))
249	246, 248	eqtrdi 2814	. . . . . . . . . . . . . . 15 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥)))
250	249	oveq2d 7412	. . . . . . . . . . . . . 14 ⊢ (⊤ → (ℂ D (log ↾ (1(ball‘(abs ∘ − ))1))) = (ℂ D (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))))
251	207	dvlog2 26725	. . . . . . . . . . . . . 14 ⊢ (ℂ D (log ↾ (1(ball‘(abs ∘ − ))1))) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (1 / 𝑥))
252	250, 251	eqtr3di 2813	. . . . . . . . . . . . 13 ⊢ (⊤ → (ℂ D (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (1 / 𝑥)))
253		fveq2 6867	. . . . . . . . . . . . 13 ⊢ (𝑥 = (1 − 𝑦) → (log‘𝑥) = (log‘(1 − 𝑦)))
254		oveq2 7404	. . . . . . . . . . . . 13 ⊢ (𝑥 = (1 − 𝑦) → (1 / 𝑥) = (1 / (1 − 𝑦)))
255	191, 191, 204, 206, 215, 216, 237, 252, 253, 254	dvmptco 26041	. . . . . . . . . . . 12 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ ((1 / (1 − 𝑦)) · -1)))
256	191, 192, 193, 255	dvmptneg 26035	. . . . . . . . . . 11 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -((1 / (1 − 𝑦)) · -1)))
257	52, 73	reccld 11971	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 / (1 − 𝑦)) ∈ ℂ)
258		mulcom 11170	. . . . . . . . . . . . . . . 16 ⊢ (((1 / (1 − 𝑦)) ∈ ℂ ∧ -1 ∈ ℂ) → ((1 / (1 − 𝑦)) · -1) = (-1 · (1 / (1 − 𝑦))))
259	257, 205, 258	sylancl 595	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 / (1 − 𝑦)) · -1) = (-1 · (1 / (1 − 𝑦))))
260	257	mulm1d 11650	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (-1 · (1 / (1 − 𝑦))) = -(1 / (1 − 𝑦)))
261	259, 260	eqtrd 2798	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 / (1 − 𝑦)) · -1) = -(1 / (1 − 𝑦)))
262	261	negeqd 11435	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -((1 / (1 − 𝑦)) · -1) = --(1 / (1 − 𝑦)))
263	257	negnegd 11544	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → --(1 / (1 − 𝑦)) = (1 / (1 − 𝑦)))
264	262, 263	eqtrd 2798	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -((1 / (1 − 𝑦)) · -1) = (1 / (1 − 𝑦)))
265	264	mpteq2ia 5196	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -((1 / (1 − 𝑦)) · -1)) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦)))
266	256, 265	eqtrdi 2814	. . . . . . . . . 10 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
267	266	dmeqd 5882	. . . . . . . . 9 ⊢ (⊤ → dom (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
268		dmmptg 6229	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ (0(ball‘(abs ∘ − ))1)(1 / (1 − 𝑦)) ∈ V → dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))) = (0(ball‘(abs ∘ − ))1))
269		ovexd 7431	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 / (1 − 𝑦)) ∈ V)
270	268, 269	mprg 3083	. . . . . . . . 9 ⊢ dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))) = (0(ball‘(abs ∘ − ))1)
271	267, 270	eqtrdi 2814	. . . . . . . 8 ⊢ (⊤ → dom (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (0(ball‘(abs ∘ − ))1))
272		sumex 15725	. . . . . . . . . . . 12 ⊢ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) ∈ V
273	272	a1i 11	. . . . . . . . . . 11 ⊢ ((⊤ ∧ 𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) ∈ V)
274		fveq2 6867	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 𝑘 → (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
275	274	cbvsumv 15733	. . . . . . . . . . . . . 14 ⊢ Σ𝑛 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = Σ𝑘 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘)
276	180, 275	eqtrdi 2814	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑘 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
277	276	mpteq2ia 5196	. . . . . . . . . . . 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 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
278		eqid 2763	. . . . . . . . . . . 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))
279	96, 277, 104, 118, 182, 183, 278	pserdv2 26500	. . . . . . . . . . 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)))))
280	157	ssriv 3941	. . . . . . . . . . . 12 ⊢ (0(ball‘(abs ∘ − ))1) ⊆ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))
281	280	a1i 11	. . . . . . . . . . 11 ⊢ (⊤ → (0(ball‘(abs ∘ − ))1) ⊆ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))))
282	191, 187, 273, 279, 281, 232, 230, 236	dvmptres 26032	. . . . . . . . . 10 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1)))))
283		nnnn0 12498	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ₀)
284	283	adantl 485	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ₀)
285		eqeq1 2767	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (𝑚 = 0 ↔ 𝑛 = 0))
286		oveq2 7404	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (1 / 𝑚) = (1 / 𝑛))
287	285, 286	ifbieq2d 4508	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 = 𝑛 → if(𝑚 = 0, 0, (1 / 𝑚)) = if(𝑛 = 0, 0, (1 / 𝑛)))
288		ovex 7429	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (1 / 𝑛) ∈ V
289	89, 288	ifex 4532	. . . . . . . . . . . . . . . . . . . 20 ⊢ if(𝑛 = 0, 0, (1 / 𝑛)) ∈ V
290	287, 88, 289	fvmpt 6975	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ₀ → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)))
291	284, 290	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)))
292		nnne0 12257	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 𝑛 ≠ 0)
293	292	adantl 485	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
294	293	neneqd 2963	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ¬ 𝑛 = 0)
295	294	iffalsed 4492	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → if(𝑛 = 0, 0, (1 / 𝑛)) = (1 / 𝑛))
296	291, 295	eqtrd 2798	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛) = (1 / 𝑛))
297	296	oveq2d 7412	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) = (𝑛 · (1 / 𝑛)))
298		nncn 12228	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
299	298	adantl 485	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
300	299, 293	recidd 11973	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · (1 / 𝑛)) = 1)
301	297, 300	eqtrd 2798	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) = 1)
302	301	oveq1d 7411	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (1 · (𝑦↑(𝑛 − 1))))
303		nnm1nn0 12532	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → (𝑛 − 1) ∈ ℕ₀)
304		expcl 14102	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℂ ∧ (𝑛 − 1) ∈ ℕ₀) → (𝑦↑(𝑛 − 1)) ∈ ℂ)
305	50, 303, 304	syl2an 605	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑦↑(𝑛 − 1)) ∈ ℂ)
306	305	mullidd 11211	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (1 · (𝑦↑(𝑛 − 1))) = (𝑦↑(𝑛 − 1)))
307	302, 306	eqtrd 2798	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (𝑦↑(𝑛 − 1)))
308	307	sumeq2dv 15739	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)))
309		nnuz 12888	. . . . . . . . . . . . . . 15 ⊢ ℕ = (ℤ_≥‘1)
310		1e0p1 12745	. . . . . . . . . . . . . . . 16 ⊢ 1 = (0 + 1)
311	310	fveq2i 6870	. . . . . . . . . . . . . . 15 ⊢ (ℤ_≥‘1) = (ℤ_≥‘(0 + 1))
312	309, 311	eqtri 2786	. . . . . . . . . . . . . 14 ⊢ ℕ = (ℤ_≥‘(0 + 1))
313		oveq1 7403	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = (1 + 𝑚) → (𝑛 − 1) = ((1 + 𝑚) − 1))
314	313	oveq2d 7412	. . . . . . . . . . . . . 14 ⊢ (𝑛 = (1 + 𝑚) → (𝑦↑(𝑛 − 1)) = (𝑦↑((1 + 𝑚) − 1)))
315		1zzd 12612	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ∈ ℤ)
316		0zd 12590	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ∈ ℤ)
317	1, 312, 314, 315, 316, 305	isumshft 15879	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑((1 + 𝑚) − 1)))
318		pncan2 11448	. . . . . . . . . . . . . . . 16 ⊢ ((1 ∈ ℂ ∧ 𝑚 ∈ ℂ) → ((1 + 𝑚) − 1) = 𝑚)
319	47, 98, 318	sylancr 596	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ ℕ₀ → ((1 + 𝑚) − 1) = 𝑚)
320	319	oveq2d 7412	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ ℕ₀ → (𝑦↑((1 + 𝑚) − 1)) = (𝑦↑𝑚))
321	320	sumeq2i 15735	. . . . . . . . . . . . 13 ⊢ Σ𝑚 ∈ ℕ₀ (𝑦↑((1 + 𝑚) − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚)
322	317, 321	eqtrdi 2814	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚))
323		geoisum 15917	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ ℂ ∧ (abs‘𝑦) < 1) → Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚) = (1 / (1 − 𝑦)))
324	50, 63, 323	syl2anc 593	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚) = (1 / (1 − 𝑦)))
325	308, 322, 324	3eqtrd 2802	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (1 / (1 − 𝑦)))
326	325	mpteq2ia 5196	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦)))
327	282, 326	eqtrdi 2814	. . . . . . . . 9 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
328	266, 327	eqtr4d 2801	. . . . . . . 8 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))))
329		1rp 13007	. . . . . . . . . 10 ⊢ 1 ∈ ℝ⁺
330		blcntr 24480	. . . . . . . . . 10 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ⁺) → 0 ∈ (0(ball‘(abs ∘ − ))1))
331	37, 27, 329, 330	mp3an 1483	. . . . . . . . 9 ⊢ 0 ∈ (0(ball‘(abs ∘ − ))1)
332	331	a1i 11	. . . . . . . 8 ⊢ (⊤ → 0 ∈ (0(ball‘(abs ∘ − ))1))
333		oveq2 7404	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 0 → (1 − 𝑦) = (1 − 0))
334		1m0e1 12347	. . . . . . . . . . . . . . . 16 ⊢ (1 − 0) = 1
335	333, 334	eqtrdi 2814	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = 0 → (1 − 𝑦) = 1)
336	335	fveq2d 6871	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 0 → (log‘(1 − 𝑦)) = (log‘1))
337		log1 26657	. . . . . . . . . . . . . 14 ⊢ (log‘1) = 0
338	336, 337	eqtrdi 2814	. . . . . . . . . . . . 13 ⊢ (𝑦 = 0 → (log‘(1 − 𝑦)) = 0)
339	338	negeqd 11435	. . . . . . . . . . . 12 ⊢ (𝑦 = 0 → -(log‘(1 − 𝑦)) = -0)
340		neg0 11488	. . . . . . . . . . . 12 ⊢ -0 = 0
341	339, 340	eqtrdi 2814	. . . . . . . . . . 11 ⊢ (𝑦 = 0 → -(log‘(1 − 𝑦)) = 0)
342		eqid 2763	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))
343	341, 342, 89	fvmpt 6975	. . . . . . . . . 10 ⊢ (0 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘0) = 0)
344	331, 343	mp1i 13	. . . . . . . . 9 ⊢ (⊤ → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘0) = 0)
345		oveq1 7403	. . . . . . . . . . . . . . 15 ⊢ (0 = if(𝑛 = 0, 0, (1 / 𝑛)) → (0 · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
346	345	eqeq1d 2765	. . . . . . . . . . . . . 14 ⊢ (0 = if(𝑛 = 0, 0, (1 / 𝑛)) → ((0 · (𝑦↑𝑛)) = 0 ↔ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0))
347		oveq1 7403	. . . . . . . . . . . . . . 15 ⊢ ((1 / 𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)) → ((1 / 𝑛) · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
348	347	eqeq1d 2765	. . . . . . . . . . . . . 14 ⊢ ((1 / 𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)) → (((1 / 𝑛) · (𝑦↑𝑛)) = 0 ↔ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0))
349		simpll 776	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑦 = 0)
350	349, 27	eqeltrdi 2871	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑦 ∈ ℂ)
351		simplr 778	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑛 ∈ ℕ₀)
352	350, 351	expcld 14169	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → (𝑦↑𝑛) ∈ ℂ)
353	352	mul02d 11392	. . . . . . . . . . . . . 14 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → (0 · (𝑦↑𝑛)) = 0)
354		simpll 776	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑦 = 0)
355	354	oveq1d 7411	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (𝑦↑𝑛) = (0↑𝑛))
356	13	bilani 508	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (𝑛 ∈ ℕ ∨ 𝑛 = 0))
357	356	ord 875	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 ∈ ℕ → 𝑛 = 0))
358	357	con1d 145	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 = 0 → 𝑛 ∈ ℕ))
359	358	imp 410	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑛 ∈ ℕ)
360	359	0expd 14162	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (0↑𝑛) = 0)
361	355, 360	eqtrd 2798	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (𝑦↑𝑛) = 0)
362	361	oveq2d 7412	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · (𝑦↑𝑛)) = ((1 / 𝑛) · 0))
363	359	nnrecred 12274	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℝ)
364	363	recnd 11221	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℂ)
365	364	mul01d 11393	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · 0) = 0)
366	362, 365	eqtrd 2798	. . . . . . . . . . . . . 14 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · (𝑦↑𝑛)) = 0)
367	346, 348, 353, 366	ifbothda 4520	. . . . . . . . . . . . 13 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0)
368	367	sumeq2dv 15739	. . . . . . . . . . . 12 ⊢ (𝑦 = 0 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ 0)
369	1	eqimssi 3997	. . . . . . . . . . . . . 14 ⊢ ℕ₀ ⊆ (ℤ_≥‘0)
370	369	orci 876	. . . . . . . . . . . . 13 ⊢ (ℕ₀ ⊆ (ℤ_≥‘0) ∨ ℕ₀ ∈ Fin)
371		sumz 15759	. . . . . . . . . . . . 13 ⊢ ((ℕ₀ ⊆ (ℤ_≥‘0) ∨ ℕ₀ ∈ Fin) → Σ𝑛 ∈ ℕ₀ 0 = 0)
372	370, 371	ax-mp 5	. . . . . . . . . . . 12 ⊢ Σ𝑛 ∈ ℕ₀ 0 = 0
373	368, 372	eqtrdi 2814	. . . . . . . . . . 11 ⊢ (𝑦 = 0 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0)
374		eqid 2763	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
375	373, 374, 89	fvmpt 6975	. . . . . . . . . 10 ⊢ (0 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘0) = 0)
376	331, 375	mp1i 13	. . . . . . . . 9 ⊢ (⊤ → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘0) = 0)
377	344, 376	eqtr4d 2801	. . . . . . . 8 ⊢ (⊤ → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘0) = ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘0))
378	44, 45, 46, 77, 189, 271, 328, 332, 377	dv11cn 26070	. . . . . . 7 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))))
379	378	fveq1d 6869	. . . . . 6 ⊢ (⊤ → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘𝐴) = ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘𝐴))
380	43, 379	mp1i 13	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘𝐴) = ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘𝐴))
381		oveq2 7404	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (1 − 𝑦) = (1 − 𝐴))
382	381	fveq2d 6871	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (log‘(1 − 𝑦)) = (log‘(1 − 𝐴)))
383	382	negeqd 11435	. . . . . 6 ⊢ (𝑦 = 𝐴 → -(log‘(1 − 𝑦)) = -(log‘(1 − 𝐴)))
384		negex 11439	. . . . . 6 ⊢ -(log‘(1 − 𝐴)) ∈ V
385	383, 342, 384	fvmpt 6975	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘𝐴) = -(log‘(1 − 𝐴)))
386		oveq1 7403	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (𝑦↑𝑛) = (𝐴↑𝑛))
387	386	oveq2d 7412	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
388	387	sumeq2sdv 15740	. . . . . 6 ⊢ (𝑦 = 𝐴 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
389		sumex 15725	. . . . . 6 ⊢ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ V
390	388, 374, 389	fvmpt 6975	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘𝐴) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
391	380, 385, 390	3eqtr3d 2806	. . . 4 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → -(log‘(1 − 𝐴)) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
392	42, 391	syl 17	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → -(log‘(1 − 𝐴)) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
393	25, 392	breqtrrd 5129	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ -(log‘(1 − 𝐴)))
394		seqex 14026	. . . 4 ⊢ seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ V
395	394	a1i 11	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ V)
396		seqex 14026	. . . 4 ⊢ seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ∈ V
397	396	a1i 11	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ∈ V)
398		1zzd 12612	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 1 ∈ ℤ)
399		elnnuz 12889	. . . . . 6 ⊢ (𝑛 ∈ ℕ ↔ 𝑛 ∈ (ℤ_≥‘1))
400		fvres 6886	. . . . . 6 ⊢ (𝑛 ∈ (ℤ_≥‘1) → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛))
401	399, 400	sylbi 219	. . . . 5 ⊢ (𝑛 ∈ ℕ → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛))
402	401	eqcomd 2769	. . . 4 ⊢ (𝑛 ∈ ℕ → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛) = ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛))
403		addlid 11377	. . . . . . . 8 ⊢ (𝑛 ∈ ℂ → (0 + 𝑛) = 𝑛)
404	403	adantl 485	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℂ) → (0 + 𝑛) = 𝑛)
405		0cnd 11183	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℂ)
406		1eluzge0 12891	. . . . . . . 8 ⊢ 1 ∈ (ℤ_≥‘0)
407	406	a1i 11	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 1 ∈ (ℤ_≥‘0))
408		0cnd 11183	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) ∧ 𝑘 = 0) → 0 ∈ ℂ)
409		nn0cn 12501	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ₀ → 𝑘 ∈ ℂ)
410	409	adantl 485	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → 𝑘 ∈ ℂ)
411		neqne 2966	. . . . . . . . . . . 12 ⊢ (¬ 𝑘 = 0 → 𝑘 ≠ 0)
412		reccl 11863	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℂ ∧ 𝑘 ≠ 0) → (1 / 𝑘) ∈ ℂ)
413	410, 411, 412	syl2an 605	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) ∧ ¬ 𝑘 = 0) → (1 / 𝑘) ∈ ℂ)
414	408, 413	ifclda 4517	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → if(𝑘 = 0, 0, (1 / 𝑘)) ∈ ℂ)
415		expcl 14102	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ₀) → (𝐴↑𝑘) ∈ ℂ)
416	415	adantlr 725	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → (𝐴↑𝑘) ∈ ℂ)
417	414, 416	mulcld 11213	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) ∈ ℂ)
418	417	fmpttd 7096	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))):ℕ₀⟶ℂ)
419		1nn0 12507	. . . . . . . 8 ⊢ 1 ∈ ℕ₀
420		ffvelcdm 7062	. . . . . . . 8 ⊢ (((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))):ℕ₀⟶ℂ ∧ 1 ∈ ℕ₀) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘1) ∈ ℂ)
421	418, 419, 420	sylancl 595	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘1) ∈ ℂ)
422		elfz1eq 13550	. . . . . . . . . 10 ⊢ (𝑛 ∈ (0...0) → 𝑛 = 0)
423		1m1e0 12300	. . . . . . . . . . 11 ⊢ (1 − 1) = 0
424	423	oveq2i 7407	. . . . . . . . . 10 ⊢ (0...(1 − 1)) = (0...0)
425	422, 424	eleq2s 2881	. . . . . . . . 9 ⊢ (𝑛 ∈ (0...(1 − 1)) → 𝑛 = 0)
426	425	fveq2d 6871	. . . . . . . 8 ⊢ (𝑛 ∈ (0...(1 − 1)) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0))
427		0nn0 12506	. . . . . . . . . 10 ⊢ 0 ∈ ℕ₀
428		iftrue 4487	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → if(𝑘 = 0, 0, (1 / 𝑘)) = 0)
429		oveq2 7404	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → (𝐴↑𝑘) = (𝐴↑0))
430	428, 429	oveq12d 7414	. . . . . . . . . . 11 ⊢ (𝑘 = 0 → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) = (0 · (𝐴↑0)))
431		ovex 7429	. . . . . . . . . . 11 ⊢ (0 · (𝐴↑0)) ∈ V
432	430, 8, 431	fvmpt 6975	. . . . . . . . . 10 ⊢ (0 ∈ ℕ₀ → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0) = (0 · (𝐴↑0)))
433	427, 432	ax-mp 5	. . . . . . . . 9 ⊢ ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0) = (0 · (𝐴↑0))
434		expcl 14102	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 0 ∈ ℕ₀) → (𝐴↑0) ∈ ℂ)
435	26, 427, 434	sylancl 595	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴↑0) ∈ ℂ)
436	435	mul02d 11392	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (0 · (𝐴↑0)) = 0)
437	433, 436	eqtrid 2810	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0) = 0)
438	426, 437	sylan9eqr 2820	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ (0...(1 − 1))) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = 0)
439	404, 405, 407, 421, 438	seqid 14070	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1)) = seq1( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))))
440	292	adantl 485	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
441	440	neneqd 2963	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ¬ 𝑛 = 0)
442	441	iffalsed 4492	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → if(𝑛 = 0, 0, (1 / 𝑛)) = (1 / 𝑛))
443	442	oveq1d 7411	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) = ((1 / 𝑛) · (𝐴↑𝑛)))
444	283, 22	sylan2 602	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (𝐴↑𝑛) ∈ ℂ)
445	298	adantl 485	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
446	444, 445, 440	divrec2d 11982	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝐴↑𝑛) / 𝑛) = ((1 / 𝑛) · (𝐴↑𝑛)))
447	443, 446	eqtr4d 2801	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) = ((𝐴↑𝑛) / 𝑛))
448	283, 11	sylan2 602	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
449		id 22	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑛 → 𝑘 = 𝑛)
450	6, 449	oveq12d 7414	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑛 → ((𝐴↑𝑘) / 𝑘) = ((𝐴↑𝑛) / 𝑛))
451		eqid 2763	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)) = (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))
452		ovex 7429	. . . . . . . . . . 11 ⊢ ((𝐴↑𝑛) / 𝑛) ∈ V
453	450, 451, 452	fvmpt 6975	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛) = ((𝐴↑𝑛) / 𝑛))
454	453	adantl 485	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛) = ((𝐴↑𝑛) / 𝑛))
455	447, 448, 454	3eqtr4d 2808	. . . . . . . 8 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛))
456	399, 455	sylan2br 604	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ (ℤ_≥‘1)) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛))
457	398, 456	seqfeq 14050	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) = seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))))
458	439, 457	eqtrd 2798	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1)) = seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))))
459	458	fveq1d 6869	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)))‘𝑛))
460	402, 459	sylan9eqr 2820	. . 3 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛) = (seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)))‘𝑛))
461	309, 395, 397, 398, 460	climeq 15604	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ -(log‘(1 − 𝐴)) ↔ seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ⇝ -(log‘(1 − 𝐴))))
462	393, 461	mpbid 234	1 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ⇝ -(log‘(1 − 𝐴)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 208 ∧ wa 399 ∨ wo 858 ∧ w3a 1099 = wceq 1561 ⊤wtru 1562 ∈ wcel 2143 ≠ wne 2958 {crab 3415 Vcvv 3455 ∖ cdif 3902 ⊆ wss 3905 ifcif 4481 {csn 4583 {cpr 4585 class class class wbr 5101 ↦ cmpt 5182 ^◡ccnv 5647 dom cdm 5648 ran crn 5649 ↾ cres 5650 “ cima 5651 ∘ ccom 5652 Fn wfn 6516 ⟶wf 6517 –1-1-onto→wf1o 6520 ‘cfv 6521 (class class class)co 7396 Fincfn 8927 supcsup 9384 ℂcc 11082 ℝcr 11083 0cc0 11084 1c1 11085 + caddc 11087 · cmul 11089 +∞cpnf 11224 -∞cmnf 11225 ℝ^*cxr 11226 < clt 11227 ≤ cle 11228 − cmin 11425 -cneg 11426 / cdiv 11855 ℕcn 12220 2c2 12282 ℕ₀cn0 12491 ℤ_≥cuz 12849 ℝ⁺crp 13003 (,]cioc 13360 [,)cico 13361 [,]cicc 13362 ...cfz 13522 seqcseq 14024 ↑cexp 14084 abscabs 15271 ⇝ cli 15521 Σcsu 15723 TopOpenctopn 17460 ∞Metcxmet 21416 ballcbl 21418 ℂ_fldccnfld 21431 –cn→ccncf 24945 D cdv 25932 logclog 26626

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1816 ax-4 1830 ax-5 1931 ax-6 1988 ax-7 2029 ax-8 2145 ax-9 2153 ax-10 2176 ax-11 2192 ax-12 2213 ax-ext 2735 ax-rep 5228 ax-sep 5247 ax-nul 5257 ax-pow 5323 ax-pr 5391 ax-un 7718 ax-inf2 9594 ax-cnex 11140 ax-resscn 11141 ax-1cn 11142 ax-icn 11143 ax-addcl 11144 ax-addrcl 11145 ax-mulcl 11146 ax-mulrcl 11147 ax-mulcom 11148 ax-addass 11149 ax-mulass 11150 ax-distr 11151 ax-i2m1 11152 ax-1ne0 11153 ax-1rid 11154 ax-rnegex 11155 ax-rrecex 11156 ax-cnre 11157 ax-pre-lttri 11158 ax-pre-lttrn 11159 ax-pre-ltadd 11160 ax-pre-mulgt0 11161 ax-pre-sup 11162 ax-addf 11163

This theorem depends on definitions: df-bi 209 df-an 400 df-or 859 df-3or 1100 df-3an 1101 df-tru 1564 df-fal 1574 df-ex 1801 df-nf 1805 df-sb 2092 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2838 df-nfc 2912 df-ne 2959 df-nel 3063 df-ral 3078 df-rex 3088 df-rmo 3368 df-reu 3369 df-rab 3416 df-v 3457 df-sbc 3746 df-csb 3854 df-dif 3908 df-un 3910 df-in 3912 df-ss 3922 df-pss 3925 df-nul 4287 df-if 4482 df-pw 4558 df-sn 4584 df-pr 4586 df-tp 4588 df-op 4590 df-uni 4867 df-int 4907 df-iun 4952 df-iin 4953 df-br 5102 df-opab 5164 df-mpt 5183 df-tr 5209 df-id 5543 df-eprel 5548 df-po 5556 df-so 5557 df-fr 5601 df-se 5602 df-we 5603 df-xp 5654 df-rel 5655 df-cnv 5656 df-co 5657 df-dm 5658 df-rn 5659 df-res 5660 df-ima 5661 df-pred 6288 df-ord 6349 df-on 6350 df-lim 6351 df-suc 6352 df-iota 6477 df-fun 6523 df-fn 6524 df-f 6525 df-f1 6526 df-fo 6527 df-f1o 6528 df-fv 6529 df-isom 6530 df-riota 7353 df-ov 7399 df-oprab 7400 df-mpo 7401 df-of 7660 df-om 7847 df-1st 7970 df-2nd 7971 df-supp 8141 df-frecs 8262 df-wrecs 8293 df-recs 8342 df-rdg 8381 df-1o 8437 df-2o 8438 df-er 8678 df-map 8810 df-pm 8811 df-ixp 8880 df-en 8928 df-dom 8929 df-sdom 8930 df-fin 8931 df-fsupp 9306 df-fi 9355 df-sup 9386 df-inf 9387 df-oi 9456 df-card 9909 df-pnf 11229 df-mnf 11230 df-xr 11231 df-ltxr 11232 df-le 11233 df-sub 11427 df-neg 11428 df-div 11856 df-nn 12221 df-2 12290 df-3 12291 df-4 12292 df-5 12293 df-6 12294 df-7 12295 df-8 12296 df-9 12297 df-n0 12492 df-z 12579 df-dec 12699 df-uz 12850 df-q 12960 df-rp 13004 df-xneg 13124 df-xadd 13125 df-xmul 13126 df-ioo 13363 df-ioc 13364 df-ico 13365 df-icc 13366 df-fz 13523 df-fzo 13670 df-fl 13812 df-mod 13890 df-seq 14025 df-exp 14085 df-fac 14297 df-bc 14326 df-hash 14354 df-shft 15090 df-cj 15136 df-re 15137 df-im 15138 df-sqrt 15272 df-abs 15273 df-limsup 15508 df-clim 15525 df-rlim 15526 df-sum 15724 df-ef 16107 df-sin 16109 df-cos 16110 df-tan 16111 df-pi 16112 df-struct 17193 df-sets 17210 df-slot 17228 df-ndx 17240 df-base 17256 df-ress 17277 df-plusg 17309 df-mulr 17310 df-starv 17311 df-sca 17312 df-vsca 17313 df-ip 17314 df-tset 17315 df-ple 17316 df-ds 17318 df-unif 17319 df-hom 17320 df-cco 17321 df-rest 17461 df-topn 17462 df-0g 17480 df-gsum 17481 df-topgen 17482 df-pt 17483 df-prds 17486 df-xrs 17542 df-qtop 17547 df-imas 17548 df-xps 17550 df-mre 17624 df-mrc 17625 df-acs 17627 df-mgm 18684 df-sgrp 18763 df-mnd 18779 df-submnd 18828 df-mulg 19120 df-cntz 19367 df-cmn 19832 df-psmet 21423 df-xmet 21424 df-met 21425 df-bl 21426 df-mopn 21427 df-fbas 21428 df-fg 21429 df-cnfld 21432 df-top 22961 df-topon 22978 df-topsp 23000 df-bases 23013 df-cld 23086 df-ntr 23087 df-cls 23088 df-nei 23165 df-lp 23203 df-perf 23204 df-cn 23294 df-cnp 23295 df-haus 23382 df-cmp 23454 df-tx 23629 df-hmeo 23822 df-fil 23913 df-fm 24005 df-flim 24006 df-flf 24007 df-xms 24387 df-ms 24388 df-tms 24389 df-cncf 24947 df-limc 25935 df-dv 25936 df-ulm 26447 df-log 26628

This theorem is referenced by: logtaylsum 26733 logtayl2 26734 atantayl 27009 stirlinglem5 46643

W3C validator