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 25245

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 12283	. . . 4 ⊢ ℕ₀ = (ℤ_≥‘0)
2		0zd 11996	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℤ)
3		eqeq1 2827	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → (𝑘 = 0 ↔ 𝑛 = 0))
4		oveq2 7166	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → (1 / 𝑘) = (1 / 𝑛))
5	3, 4	ifbieq2d 4494	. . . . . . 7 ⊢ (𝑘 = 𝑛 → if(𝑘 = 0, 0, (1 / 𝑘)) = if(𝑛 = 0, 0, (1 / 𝑛)))
6		oveq2 7166	. . . . . . 7 ⊢ (𝑘 = 𝑛 → (𝐴↑𝑘) = (𝐴↑𝑛))
7	5, 6	oveq12d 7176	. . . . . 6 ⊢ (𝑘 = 𝑛 → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
8		eqid 2823	. . . . . 6 ⊢ (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))) = (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))
9		ovex 7191	. . . . . 6 ⊢ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ V
10	7, 8, 9	fvmpt 6770	. . . . 5 ⊢ (𝑛 ∈ ℕ₀ → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
11	10	adantl 484	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
12		0cnd 10636	. . . . . 6 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 0 ∈ ℂ)
13		simpr 487	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → 𝑛 ∈ ℕ₀)
14		elnn0 11902	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ₀ ↔ (𝑛 ∈ ℕ ∨ 𝑛 = 0))
15	13, 14	sylib 220	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (𝑛 ∈ ℕ ∨ 𝑛 = 0))
16	15	ord 860	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 ∈ ℕ → 𝑛 = 0))
17	16	con1d 147	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 = 0 → 𝑛 ∈ ℕ))
18	17	imp 409	. . . . . . . 8 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑛 ∈ ℕ)
19	18	nnrecred 11691	. . . . . . 7 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℝ)
20	19	recnd 10671	. . . . . 6 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℂ)
21	12, 20	ifclda 4503	. . . . 5 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → if(𝑛 = 0, 0, (1 / 𝑛)) ∈ ℂ)
22		expcl 13450	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (𝐴↑𝑛) ∈ ℂ)
23	22	adantlr 713	. . . . 5 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (𝐴↑𝑛) ∈ ℂ)
24	21, 23	mulcld 10663	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ ℂ)
25		logtayllem 25244	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ dom ⇝ )
26	1, 2, 11, 24, 25	isumclim2 15115	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
27		simpl 485	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ ℂ)
28		0cn 10635	. . . . . . . 8 ⊢ 0 ∈ ℂ
29		eqid 2823	. . . . . . . . 9 ⊢ (abs ∘ − ) = (abs ∘ − )
30	29	cnmetdval 23381	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 0 ∈ ℂ) → (𝐴(abs ∘ − )0) = (abs‘(𝐴 − 0)))
31	27, 28, 30	sylancl 588	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) = (abs‘(𝐴 − 0)))
32		subid1 10908	. . . . . . . . 9 ⊢ (𝐴 ∈ ℂ → (𝐴 − 0) = 𝐴)
33	32	adantr 483	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴 − 0) = 𝐴)
34	33	fveq2d 6676	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘(𝐴 − 0)) = (abs‘𝐴))
35	31, 34	eqtrd 2858	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) = (abs‘𝐴))
36		simpr 487	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) < 1)
37	35, 36	eqbrtrd 5090	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴(abs ∘ − )0) < 1)
38		cnxmet 23383	. . . . . . 7 ⊢ (abs ∘ − ) ∈ (∞Met‘ℂ)
39		1xr 10702	. . . . . . 7 ⊢ 1 ∈ ℝ^*
40		elbl3 23004	. . . . . . 7 ⊢ ((((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℝ^*) ∧ (0 ∈ ℂ ∧ 𝐴 ∈ ℂ)) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
41	38, 39, 40	mpanl12 700	. . . . . 6 ⊢ ((0 ∈ ℂ ∧ 𝐴 ∈ ℂ) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
42	28, 27, 41	sylancr 589	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝐴(abs ∘ − )0) < 1))
43	37, 42	mpbird 259	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ (0(ball‘(abs ∘ − ))1))
44		tru 1541	. . . . . 6 ⊢ ⊤
45		eqid 2823	. . . . . . . 8 ⊢ (0(ball‘(abs ∘ − ))1) = (0(ball‘(abs ∘ − ))1)
46		0cnd 10636	. . . . . . . 8 ⊢ (⊤ → 0 ∈ ℂ)
47	39	a1i 11	. . . . . . . 8 ⊢ (⊤ → 1 ∈ ℝ^*)
48		ax-1cn 10597	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℂ
49		blssm 23030	. . . . . . . . . . . . . . 15 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ^*) → (0(ball‘(abs ∘ − ))1) ⊆ ℂ)
50	38, 28, 39, 49	mp3an 1457	. . . . . . . . . . . . . 14 ⊢ (0(ball‘(abs ∘ − ))1) ⊆ ℂ
51	50	sseli 3965	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 𝑦 ∈ ℂ)
52		subcl 10887	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
53	48, 51, 52	sylancr 589	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ∈ ℂ)
54	51	abscld 14798	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ ℝ)
55	29	cnmetdval 23381	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℂ ∧ 0 ∈ ℂ) → (𝑦(abs ∘ − )0) = (abs‘(𝑦 − 0)))
56	51, 28, 55	sylancl 588	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) = (abs‘(𝑦 − 0)))
57	51	subid1d 10988	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦 − 0) = 𝑦)
58	57	fveq2d 6676	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(𝑦 − 0)) = (abs‘𝑦))
59	56, 58	eqtrd 2858	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) = (abs‘𝑦))
60		elbl3 23004	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℝ^*) ∧ (0 ∈ ℂ ∧ 𝑦 ∈ ℂ)) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
61	38, 39, 60	mpanl12 700	. . . . . . . . . . . . . . . . . 18 ⊢ ((0 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
62	28, 51, 61	sylancr 589	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↔ (𝑦(abs ∘ − )0) < 1))
63	62	ibi 269	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (𝑦(abs ∘ − )0) < 1)
64	59, 63	eqbrtrrd 5092	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < 1)
65	54, 64	gtned 10777	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ≠ (abs‘𝑦))
66		abs1 14659	. . . . . . . . . . . . . . . 16 ⊢ (abs‘1) = 1
67		fveq2 6672	. . . . . . . . . . . . . . . 16 ⊢ (1 = 𝑦 → (abs‘1) = (abs‘𝑦))
68	66, 67	syl5eqr 2872	. . . . . . . . . . . . . . 15 ⊢ (1 = 𝑦 → 1 = (abs‘𝑦))
69	68	necon3i 3050	. . . . . . . . . . . . . 14 ⊢ (1 ≠ (abs‘𝑦) → 1 ≠ 𝑦)
70	65, 69	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ≠ 𝑦)
71		subeq0 10914	. . . . . . . . . . . . . . 15 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((1 − 𝑦) = 0 ↔ 1 = 𝑦))
72	71	necon3bid 3062	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((1 − 𝑦) ≠ 0 ↔ 1 ≠ 𝑦))
73	48, 51, 72	sylancr 589	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 − 𝑦) ≠ 0 ↔ 1 ≠ 𝑦))
74	70, 73	mpbird 259	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ≠ 0)
75	53, 74	logcld 25156	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (log‘(1 − 𝑦)) ∈ ℂ)
76	75	negcld 10986	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -(log‘(1 − 𝑦)) ∈ ℂ)
77	76	adantl 484	. . . . . . . . 9 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → -(log‘(1 − 𝑦)) ∈ ℂ)
78	77	fmpttd 6881	. . . . . . . 8 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))):(0(ball‘(abs ∘ − ))1)⟶ℂ)
79	51	absge0d 14806	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ≤ (abs‘𝑦))
80	54	rexrd 10693	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ ℝ^*)
81		peano2re 10815	. . . . . . . . . . . . . . . 16 ⊢ ((abs‘𝑦) ∈ ℝ → ((abs‘𝑦) + 1) ∈ ℝ)
82	54, 81	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) + 1) ∈ ℝ)
83	82	rehalfcld 11887	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℝ)
84	83	rexrd 10693	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℝ^*)
85		iccssxr 12822	. . . . . . . . . . . . . . 15 ⊢ (0[,]+∞) ⊆ ℝ^*
86		eqeq1 2827	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑚 = 𝑗 → (𝑚 = 0 ↔ 𝑗 = 0))
87		oveq2 7166	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑚 = 𝑗 → (1 / 𝑚) = (1 / 𝑗))
88	86, 87	ifbieq2d 4494	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑗 → if(𝑚 = 0, 0, (1 / 𝑚)) = if(𝑗 = 0, 0, (1 / 𝑗)))
89		eqid 2823	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))) = (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))
90		c0ex 10637	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 0 ∈ V
91		ovex 7191	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (1 / 𝑗) ∈ V
92	90, 91	ifex 4517	. . . . . . . . . . . . . . . . . . . . 21 ⊢ if(𝑗 = 0, 0, (1 / 𝑗)) ∈ V
93	88, 89, 92	fvmpt 6770	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 ∈ ℕ₀ → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) = if(𝑗 = 0, 0, (1 / 𝑗)))
94	93	eqcomd 2829	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ → if(𝑗 = 0, 0, (1 / 𝑗)) = ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗))
95	94	oveq1d 7173	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑗 ∈ ℕ₀ → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗)))
96	95	mpteq2ia 5159	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗)))
97	96	mpteq2i 5160	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)))) = (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑗) · (𝑥↑𝑗))))
98		0cnd 10636	. . . . . . . . . . . . . . . . . 18 ⊢ (((⊤ ∧ 𝑚 ∈ ℕ₀) ∧ 𝑚 = 0) → 0 ∈ ℂ)
99		nn0cn 11910	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 ∈ ℕ₀ → 𝑚 ∈ ℂ)
100	99	adantl 484	. . . . . . . . . . . . . . . . . . 19 ⊢ ((⊤ ∧ 𝑚 ∈ ℕ₀) → 𝑚 ∈ ℂ)
101		neqne 3026	. . . . . . . . . . . . . . . . . . 19 ⊢ (¬ 𝑚 = 0 → 𝑚 ≠ 0)
102		reccl 11307	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑚 ∈ ℂ ∧ 𝑚 ≠ 0) → (1 / 𝑚) ∈ ℂ)
103	100, 101, 102	syl2an 597	. . . . . . . . . . . . . . . . . 18 ⊢ (((⊤ ∧ 𝑚 ∈ ℕ₀) ∧ ¬ 𝑚 = 0) → (1 / 𝑚) ∈ ℂ)
104	98, 103	ifclda 4503	. . . . . . . . . . . . . . . . 17 ⊢ ((⊤ ∧ 𝑚 ∈ ℕ₀) → if(𝑚 = 0, 0, (1 / 𝑚)) ∈ ℂ)
105	104	fmpttd 6881	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚))):ℕ₀⟶ℂ)
106		recn 10629	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑟 ∈ ℝ → 𝑟 ∈ ℂ)
107		oveq1 7165	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑥 = 𝑟 → (𝑥↑𝑗) = (𝑟↑𝑗))
108	107	oveq2d 7174	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑥 = 𝑟 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))
109	108	mpteq2dv 5164	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 = 𝑟 → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))))
110		eqid 2823	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)))) = (𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))
111		nn0ex 11906	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ℕ₀ ∈ V
112	111	mptex 6988	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))) ∈ V
113	109, 110, 112	fvmpt 6770	. . . . . . . . . . . . . . . . . . . . . 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 2829	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑟 ∈ ℝ → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗))) = ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟))
116	115	seqeq3d 13380	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑟 ∈ ℝ → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) = seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)))
117	116	eleq1d 2899	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑟 ∈ ℝ → (seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ ↔ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ ))
118	117	rabbiia 3474	. . . . . . . . . . . . . . . . 17 ⊢ {𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ } = {𝑟 ∈ ℝ ∣ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ }
119	118	supeq1i 8913	. . . . . . . . . . . . . . . 16 ⊢ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ) = sup({𝑟 ∈ ℝ ∣ seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑟)) ∈ dom ⇝ }, ℝ^, < )
120	97, 105, 119	radcnvcl 25007	. . . . . . . . . . . . . . 15 ⊢ (⊤ → sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ) ∈ (0[,]+∞))
121	85, 120	sseldi 3967	. . . . . . . . . . . . . 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 10643	. . . . . . . . . . . . . . 15 ⊢ 1 ∈ ℝ
124		avglt1 11878	. . . . . . . . . . . . . . 15 ⊢ (((abs‘𝑦) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝑦) < 1 ↔ (abs‘𝑦) < (((abs‘𝑦) + 1) / 2)))
125	54, 123, 124	sylancl 588	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) < 1 ↔ (abs‘𝑦) < (((abs‘𝑦) + 1) / 2)))
126	64, 125	mpbid 234	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < (((abs‘𝑦) + 1) / 2))
127		0red 10646	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ∈ ℝ)
128	127, 54, 83, 79, 126	lelttrd 10800	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 < (((abs‘𝑦) + 1) / 2))
129	127, 83, 128	ltled 10790	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ≤ (((abs‘𝑦) + 1) / 2))
130	83, 129	absidd 14784	. . . . . . . . . . . . . 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 10671	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ∈ ℂ)
133		oveq1 7165	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (𝑥↑𝑗) = ((((abs‘𝑦) + 1) / 2)↑𝑗))
134	133	oveq2d 7174	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))
135	134	mpteq2dv 5164	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = (((abs‘𝑦) + 1) / 2) → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))))
136	111	mptex 6988	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗))) ∈ V
137	135, 110, 136	fvmpt 6770	. . . . . . . . . . . . . . . . . 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 13380	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2))) = seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))))
140		avglt2 11879	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((abs‘𝑦) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝑦) < 1 ↔ (((abs‘𝑦) + 1) / 2) < 1))
141	54, 123, 140	sylancl 588	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((abs‘𝑦) < 1 ↔ (((abs‘𝑦) + 1) / 2) < 1))
142	64, 141	mpbid 234	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) < 1)
143	130, 142	eqbrtrd 5090	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) < 1)
144		logtayllem 25244	. . . . . . . . . . . . . . . . 17 ⊢ (((((abs‘𝑦) + 1) / 2) ∈ ℂ ∧ (abs‘(((abs‘𝑦) + 1) / 2)) < 1) → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))) ∈ dom ⇝ )
145	132, 143, 144	syl2anc 586	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · ((((abs‘𝑦) + 1) / 2)↑𝑗)))) ∈ dom ⇝ )
146	139, 145	eqeltrd 2915	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → seq0( + , ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘(((abs‘𝑦) + 1) / 2))) ∈ dom ⇝ )
147	97, 131, 119, 132, 146	radcnvle 25010	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(((abs‘𝑦) + 1) / 2)) ≤ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
148	130, 147	eqbrtrrd 5092	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (((abs‘𝑦) + 1) / 2) ≤ sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
149	80, 84, 122, 126, 148	xrltletrd 12557	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) < sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))
150		0re 10645	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℝ
151		elico2 12803	. . . . . . . . . . . . 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 589	. . . . . . . . . . . 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 1338	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘𝑦) ∈ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < )))
154		absf 14699	. . . . . . . . . . . 12 ⊢ abs:ℂ⟶ℝ
155		ffn 6516	. . . . . . . . . . . 12 ⊢ (abs:ℂ⟶ℝ → abs Fn ℂ)
156		elpreima 6830	. . . . . . . . . . . 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 585	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))))
159		cnvimass 5951	. . . . . . . . . . . . . . . . 17 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) ⊆ dom abs
160	154	fdmi 6526	. . . . . . . . . . . . . . . . 17 ⊢ dom abs = ℂ
161	159, 160	sseqtri 4005	. . . . . . . . . . . . . . . 16 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) ⊆ ℂ
162	161	sseli 3965	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → 𝑦 ∈ ℂ)
163		oveq1 7165	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 = 𝑦 → (𝑥↑𝑗) = (𝑦↑𝑗))
164	163	oveq2d 7174	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑦 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗)) = (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))
165	164	mpteq2dv 5164	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑦 → (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
166	111	mptex 6988	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))) ∈ V
167	165, 110, 166	fvmpt 6770	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ ℂ → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
168	167	adantr 483	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → ((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))))
169	168	fveq1d 6674	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛))
170		eqeq1 2827	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 𝑛 → (𝑗 = 0 ↔ 𝑛 = 0))
171		oveq2 7166	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 𝑛 → (1 / 𝑗) = (1 / 𝑛))
172	170, 171	ifbieq2d 4494	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝑛 → if(𝑗 = 0, 0, (1 / 𝑗)) = if(𝑛 = 0, 0, (1 / 𝑛)))
173		oveq2 7166	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝑛 → (𝑦↑𝑗) = (𝑦↑𝑛))
174	172, 173	oveq12d 7176	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 = 𝑛 → (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
175		eqid 2823	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗))) = (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))
176		ovex 7191	. . . . . . . . . . . . . . . . . . 19 ⊢ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) ∈ V
177	174, 175, 176	fvmpt 6770	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ₀ → ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
178	177	adantl 484	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → ((𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑦↑𝑗)))‘𝑛) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
179	169, 178	eqtr2d 2859	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℂ ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛))
180	179	sumeq2dv 15062	. . . . . . . . . . . . . . 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 5159	. . . . . . . . . . . . 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 2823	. . . . . . . . . . . . 13 ⊢ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) = (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))
184		eqid 2823	. . . . . . . . . . . . 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 25016	. . . . . . . . . . . 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 23503	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))) ∈ ((^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))–cn→ℂ) → (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))):(^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))⟶ℂ)
187	185, 186	syl 17	. . . . . . . . . . 11 ⊢ (⊤ → (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < ))) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))):(^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^, < )))⟶ℂ)
188	187	fvmptelrn 6879	. . . . . . . . . 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 6881	. . . . . . . 8 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))):(0(ball‘(abs ∘ − ))1)⟶ℂ)
191		cnelprrecn 10632	. . . . . . . . . . . . 13 ⊢ ℂ ∈ {ℝ, ℂ}
192	191	a1i 11	. . . . . . . . . . . 12 ⊢ (⊤ → ℂ ∈ {ℝ, ℂ})
193	75	adantl 484	. . . . . . . . . . . 12 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → (log‘(1 − 𝑦)) ∈ ℂ)
194		ovexd 7193	. . . . . . . . . . . 12 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → ((1 / (1 − 𝑦)) · -1) ∈ V)
195	29	cnmetdval 23381	. . . . . . . . . . . . . . . . . 18 ⊢ ((1 ∈ ℂ ∧ (1 − 𝑦) ∈ ℂ) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘(1 − (1 − 𝑦))))
196	48, 53, 195	sylancr 589	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘(1 − (1 − 𝑦))))
197		nncan 10917	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − (1 − 𝑦)) = 𝑦)
198	48, 51, 197	sylancr 589	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − (1 − 𝑦)) = 𝑦)
199	198	fveq2d 6676	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (abs‘(1 − (1 − 𝑦))) = (abs‘𝑦))
200	196, 199	eqtrd 2858	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) = (abs‘𝑦))
201	200, 64	eqbrtrd 5090	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1(abs ∘ − )(1 − 𝑦)) < 1)
202		elbl 23000	. . . . . . . . . . . . . . . 16 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℂ ∧ 1 ∈ ℝ^*) → ((1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1) ↔ ((1 − 𝑦) ∈ ℂ ∧ (1(abs ∘ − )(1 − 𝑦)) < 1)))
203	38, 48, 39, 202	mp3an 1457	. . . . . . . . . . . . . . 15 ⊢ ((1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1) ↔ ((1 − 𝑦) ∈ ℂ ∧ (1(abs ∘ − )(1 − 𝑦)) < 1))
204	53, 201, 203	sylanbrc 585	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1))
205	204	adantl 484	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → (1 − 𝑦) ∈ (1(ball‘(abs ∘ − ))1))
206		neg1cn 11754	. . . . . . . . . . . . . 14 ⊢ -1 ∈ ℂ
207	206	a1i 11	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑦 ∈ (0(ball‘(abs ∘ − ))1)) → -1 ∈ ℂ)
208		eqid 2823	. . . . . . . . . . . . . . . . . 18 ⊢ (1(ball‘(abs ∘ − ))1) = (1(ball‘(abs ∘ − ))1)
209	208	dvlog2lem 25237	. . . . . . . . . . . . . . . . 17 ⊢ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ (-∞(,]0))
210	209	sseli 3965	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ∈ (ℂ ∖ (-∞(,]0)))
211	210	eldifad 3950	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ∈ ℂ)
212		eqid 2823	. . . . . . . . . . . . . . . . 17 ⊢ (ℂ ∖ (-∞(,]0)) = (ℂ ∖ (-∞(,]0))
213	212	logdmn0 25225	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (ℂ ∖ (-∞(,]0)) → 𝑥 ≠ 0)
214	210, 213	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → 𝑥 ≠ 0)
215	211, 214	logcld 25156	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → (log‘𝑥) ∈ ℂ)
216	215	adantl 484	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑥 ∈ (1(ball‘(abs ∘ − ))1)) → (log‘𝑥) ∈ ℂ)
217		ovexd 7193	. . . . . . . . . . . . 13 ⊢ ((⊤ ∧ 𝑥 ∈ (1(ball‘(abs ∘ − ))1)) → (1 / 𝑥) ∈ V)
218		simpr 487	. . . . . . . . . . . . . . 15 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 𝑦 ∈ ℂ)
219	48, 218, 52	sylancr 589	. . . . . . . . . . . . . 14 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
220	206	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → -1 ∈ ℂ)
221		1cnd 10638	. . . . . . . . . . . . . . . 16 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 1 ∈ ℂ)
222		0cnd 10636	. . . . . . . . . . . . . . . 16 ⊢ ((⊤ ∧ 𝑦 ∈ ℂ) → 0 ∈ ℂ)
223		1cnd 10638	. . . . . . . . . . . . . . . . 17 ⊢ (⊤ → 1 ∈ ℂ)
224	192, 223	dvmptc 24557	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ 1)) = (𝑦 ∈ ℂ ↦ 0))
225	192	dvmptid 24556	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ 𝑦)) = (𝑦 ∈ ℂ ↦ 1))
226	192, 221, 222, 224, 218, 221, 225	dvmptsub 24566	. . . . . . . . . . . . . . 15 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ (1 − 𝑦))) = (𝑦 ∈ ℂ ↦ (0 − 1)))
227		df-neg 10875	. . . . . . . . . . . . . . . 16 ⊢ -1 = (0 − 1)
228	227	mpteq2i 5160	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℂ ↦ -1) = (𝑦 ∈ ℂ ↦ (0 − 1))
229	226, 228	syl6eqr 2876	. . . . . . . . . . . . . 14 ⊢ (⊤ → (ℂ D (𝑦 ∈ ℂ ↦ (1 − 𝑦))) = (𝑦 ∈ ℂ ↦ -1))
230	50	a1i 11	. . . . . . . . . . . . . 14 ⊢ (⊤ → (0(ball‘(abs ∘ − ))1) ⊆ ℂ)
231		eqid 2823	. . . . . . . . . . . . . . . 16 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
232	231	cnfldtopon 23393	. . . . . . . . . . . . . . 15 ⊢ (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ)
233	232	toponrestid 21531	. . . . . . . . . . . . . 14 ⊢ (TopOpen‘ℂ_fld) = ((TopOpen‘ℂ_fld) ↾_t ℂ)
234	231	cnfldtopn 23392	. . . . . . . . . . . . . . . . 17 ⊢ (TopOpen‘ℂ_fld) = (MetOpen‘(abs ∘ − ))
235	234	blopn 23112	. . . . . . . . . . . . . . . 16 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ^*) → (0(ball‘(abs ∘ − ))1) ∈ (TopOpen‘ℂ_fld))
236	38, 28, 39, 235	mp3an 1457	. . . . . . . . . . . . . . 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 24562	. . . . . . . . . . . . 13 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -1))
239	208	dvlog2 25238	. . . . . . . . . . . . . 14 ⊢ (ℂ D (log ↾ (1(ball‘(abs ∘ − ))1))) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (1 / 𝑥))
240		logf1o 25150	. . . . . . . . . . . . . . . . . . . 20 ⊢ log:(ℂ ∖ {0})–1-1-onto→ran log
241		f1of 6617	. . . . . . . . . . . . . . . . . . . 20 ⊢ (log:(ℂ ∖ {0})–1-1-onto→ran log → log:(ℂ ∖ {0})⟶ran log)
242	240, 241	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ log:(ℂ ∖ {0})⟶ran log
243	212	logdmss 25227	. . . . . . . . . . . . . . . . . . . 20 ⊢ (ℂ ∖ (-∞(,]0)) ⊆ (ℂ ∖ {0})
244	209, 243	sstri 3978	. . . . . . . . . . . . . . . . . . 19 ⊢ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ {0})
245		fssres 6546	. . . . . . . . . . . . . . . . . . 19 ⊢ ((log:(ℂ ∖ {0})⟶ran log ∧ (1(ball‘(abs ∘ − ))1) ⊆ (ℂ ∖ {0})) → (log ↾ (1(ball‘(abs ∘ − ))1)):(1(ball‘(abs ∘ − ))1)⟶ran log)
246	242, 244, 245	mp2an 690	. . . . . . . . . . . . . . . . . 18 ⊢ (log ↾ (1(ball‘(abs ∘ − ))1)):(1(ball‘(abs ∘ − ))1)⟶ran log
247	246	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)):(1(ball‘(abs ∘ − ))1)⟶ran log)
248	247	feqmptd 6735	. . . . . . . . . . . . . . . 16 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥)))
249		fvres 6691	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) → ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥) = (log‘𝑥))
250	249	mpteq2ia 5159	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ ((log ↾ (1(ball‘(abs ∘ − ))1))‘𝑥)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))
251	248, 250	syl6eq 2874	. . . . . . . . . . . . . . 15 ⊢ (⊤ → (log ↾ (1(ball‘(abs ∘ − ))1)) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥)))
252	251	oveq2d 7174	. . . . . . . . . . . . . 14 ⊢ (⊤ → (ℂ D (log ↾ (1(ball‘(abs ∘ − ))1))) = (ℂ D (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))))
253	239, 252	syl5reqr 2873	. . . . . . . . . . . . 13 ⊢ (⊤ → (ℂ D (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (log‘𝑥))) = (𝑥 ∈ (1(ball‘(abs ∘ − ))1) ↦ (1 / 𝑥)))
254		fveq2 6672	. . . . . . . . . . . . 13 ⊢ (𝑥 = (1 − 𝑦) → (log‘𝑥) = (log‘(1 − 𝑦)))
255		oveq2 7166	. . . . . . . . . . . . 13 ⊢ (𝑥 = (1 − 𝑦) → (1 / 𝑥) = (1 / (1 − 𝑦)))
256	192, 192, 205, 207, 216, 217, 238, 253, 254, 255	dvmptco 24571	. . . . . . . . . . . 12 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ ((1 / (1 − 𝑦)) · -1)))
257	192, 193, 194, 256	dvmptneg 24565	. . . . . . . . . . 11 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -((1 / (1 − 𝑦)) · -1)))
258	53, 74	reccld 11411	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 / (1 − 𝑦)) ∈ ℂ)
259		mulcom 10625	. . . . . . . . . . . . . . . 16 ⊢ (((1 / (1 − 𝑦)) ∈ ℂ ∧ -1 ∈ ℂ) → ((1 / (1 − 𝑦)) · -1) = (-1 · (1 / (1 − 𝑦))))
260	258, 206, 259	sylancl 588	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 / (1 − 𝑦)) · -1) = (-1 · (1 / (1 − 𝑦))))
261	258	mulm1d 11094	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (-1 · (1 / (1 − 𝑦))) = -(1 / (1 − 𝑦)))
262	260, 261	eqtrd 2858	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → ((1 / (1 − 𝑦)) · -1) = -(1 / (1 − 𝑦)))
263	262	negeqd 10882	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -((1 / (1 − 𝑦)) · -1) = --(1 / (1 − 𝑦)))
264	258	negnegd 10990	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → --(1 / (1 − 𝑦)) = (1 / (1 − 𝑦)))
265	263, 264	eqtrd 2858	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → -((1 / (1 − 𝑦)) · -1) = (1 / (1 − 𝑦)))
266	265	mpteq2ia 5159	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -((1 / (1 − 𝑦)) · -1)) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦)))
267	257, 266	syl6eq 2874	. . . . . . . . . 10 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
268	267	dmeqd 5776	. . . . . . . . 9 ⊢ (⊤ → dom (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
269		dmmptg 6098	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ (0(ball‘(abs ∘ − ))1)(1 / (1 − 𝑦)) ∈ V → dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))) = (0(ball‘(abs ∘ − ))1))
270		ovexd 7193	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → (1 / (1 − 𝑦)) ∈ V)
271	269, 270	mprg 3154	. . . . . . . . 9 ⊢ dom (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))) = (0(ball‘(abs ∘ − ))1)
272	268, 271	syl6eq 2874	. . . . . . . 8 ⊢ (⊤ → dom (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (0(ball‘(abs ∘ − ))1))
273		sumex 15046	. . . . . . . . . . . 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 6672	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 𝑘 → (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
276	275	cbvsumv 15055	. . . . . . . . . . . . . 14 ⊢ Σ𝑛 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑛) = Σ𝑘 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘)
277	181, 276	syl6eq 2874	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (^◡abs “ (0[,)sup({𝑟 ∈ ℝ ∣ seq0( + , (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑟↑𝑗)))) ∈ dom ⇝ }, ℝ^*, < ))) → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑘 ∈ ℕ₀ (((𝑥 ∈ ℂ ↦ (𝑗 ∈ ℕ₀ ↦ (if(𝑗 = 0, 0, (1 / 𝑗)) · (𝑥↑𝑗))))‘𝑦)‘𝑘))
278	277	mpteq2ia 5159	. . . . . . . . . . . 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 2823	. . . . . . . . . . . 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 25020	. . . . . . . . . . 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 3973	. . . . . . . . . . . 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 24562	. . . . . . . . . 10 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1)))))
284		nnnn0 11907	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ₀)
285	284	adantl 484	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ₀)
286		eqeq1 2827	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (𝑚 = 0 ↔ 𝑛 = 0))
287		oveq2 7166	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (1 / 𝑚) = (1 / 𝑛))
288	286, 287	ifbieq2d 4494	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 = 𝑛 → if(𝑚 = 0, 0, (1 / 𝑚)) = if(𝑛 = 0, 0, (1 / 𝑛)))
289		ovex 7191	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (1 / 𝑛) ∈ V
290	90, 289	ifex 4517	. . . . . . . . . . . . . . . . . . . 20 ⊢ if(𝑛 = 0, 0, (1 / 𝑛)) ∈ V
291	288, 89, 290	fvmpt 6770	. . . . . . . . . . . . . . . . . . 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 11674	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 𝑛 ≠ 0)
294	293	adantl 484	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
295	294	neneqd 3023	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ¬ 𝑛 = 0)
296	295	iffalsed 4480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → if(𝑛 = 0, 0, (1 / 𝑛)) = (1 / 𝑛))
297	292, 296	eqtrd 2858	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛) = (1 / 𝑛))
298	297	oveq2d 7174	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) = (𝑛 · (1 / 𝑛)))
299		nncn 11648	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
300	299	adantl 484	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
301	300, 294	recidd 11413	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · (1 / 𝑛)) = 1)
302	298, 301	eqtrd 2858	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) = 1)
303	302	oveq1d 7173	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (1 · (𝑦↑(𝑛 − 1))))
304		nnm1nn0 11941	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → (𝑛 − 1) ∈ ℕ₀)
305		expcl 13450	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℂ ∧ (𝑛 − 1) ∈ ℕ₀) → (𝑦↑(𝑛 − 1)) ∈ ℂ)
306	51, 304, 305	syl2an 597	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (𝑦↑(𝑛 − 1)) ∈ ℂ)
307	306	mulid2d 10661	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → (1 · (𝑦↑(𝑛 − 1))) = (𝑦↑(𝑛 − 1)))
308	303, 307	eqtrd 2858	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ∧ 𝑛 ∈ ℕ) → ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (𝑦↑(𝑛 − 1)))
309	308	sumeq2dv 15062	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)))
310		nnuz 12284	. . . . . . . . . . . . . . 15 ⊢ ℕ = (ℤ_≥‘1)
311		1e0p1 12143	. . . . . . . . . . . . . . . 16 ⊢ 1 = (0 + 1)
312	311	fveq2i 6675	. . . . . . . . . . . . . . 15 ⊢ (ℤ_≥‘1) = (ℤ_≥‘(0 + 1))
313	310, 312	eqtri 2846	. . . . . . . . . . . . . 14 ⊢ ℕ = (ℤ_≥‘(0 + 1))
314		oveq1 7165	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = (1 + 𝑚) → (𝑛 − 1) = ((1 + 𝑚) − 1))
315	314	oveq2d 7174	. . . . . . . . . . . . . 14 ⊢ (𝑛 = (1 + 𝑚) → (𝑦↑(𝑛 − 1)) = (𝑦↑((1 + 𝑚) − 1)))
316		1zzd 12016	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 1 ∈ ℤ)
317		0zd 11996	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → 0 ∈ ℤ)
318	1, 313, 315, 316, 317, 306	isumshft 15196	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑((1 + 𝑚) − 1)))
319		pncan2 10895	. . . . . . . . . . . . . . . 16 ⊢ ((1 ∈ ℂ ∧ 𝑚 ∈ ℂ) → ((1 + 𝑚) − 1) = 𝑚)
320	48, 99, 319	sylancr 589	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ ℕ₀ → ((1 + 𝑚) − 1) = 𝑚)
321	320	oveq2d 7174	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ ℕ₀ → (𝑦↑((1 + 𝑚) − 1)) = (𝑦↑𝑚))
322	321	sumeq2i 15058	. . . . . . . . . . . . 13 ⊢ Σ𝑚 ∈ ℕ₀ (𝑦↑((1 + 𝑚) − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚)
323	318, 322	syl6eq 2874	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ (𝑦↑(𝑛 − 1)) = Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚))
324		geoisum 15235	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ ℂ ∧ (abs‘𝑦) < 1) → Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚) = (1 / (1 − 𝑦)))
325	51, 64, 324	syl2anc 586	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑚 ∈ ℕ₀ (𝑦↑𝑚) = (1 / (1 − 𝑦)))
326	309, 323, 325	3eqtrd 2862	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) → Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1))) = (1 / (1 − 𝑦)))
327	326	mpteq2ia 5159	. . . . . . . . . 10 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ ((𝑛 · ((𝑚 ∈ ℕ₀ ↦ if(𝑚 = 0, 0, (1 / 𝑚)))‘𝑛)) · (𝑦↑(𝑛 − 1)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦)))
328	283, 327	syl6eq 2874	. . . . . . . . 9 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ (1 / (1 − 𝑦))))
329	267, 328	eqtr4d 2861	. . . . . . . 8 ⊢ (⊤ → (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))) = (ℂ D (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))))
330		1rp 12396	. . . . . . . . . 10 ⊢ 1 ∈ ℝ⁺
331		blcntr 23025	. . . . . . . . . 10 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℝ⁺) → 0 ∈ (0(ball‘(abs ∘ − ))1))
332	38, 28, 330, 331	mp3an 1457	. . . . . . . . 9 ⊢ 0 ∈ (0(ball‘(abs ∘ − ))1)
333	332	a1i 11	. . . . . . . 8 ⊢ (⊤ → 0 ∈ (0(ball‘(abs ∘ − ))1))
334		oveq2 7166	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 0 → (1 − 𝑦) = (1 − 0))
335		1m0e1 11761	. . . . . . . . . . . . . . . 16 ⊢ (1 − 0) = 1
336	334, 335	syl6eq 2874	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = 0 → (1 − 𝑦) = 1)
337	336	fveq2d 6676	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 0 → (log‘(1 − 𝑦)) = (log‘1))
338		log1 25171	. . . . . . . . . . . . . 14 ⊢ (log‘1) = 0
339	337, 338	syl6eq 2874	. . . . . . . . . . . . 13 ⊢ (𝑦 = 0 → (log‘(1 − 𝑦)) = 0)
340	339	negeqd 10882	. . . . . . . . . . . 12 ⊢ (𝑦 = 0 → -(log‘(1 − 𝑦)) = -0)
341		neg0 10934	. . . . . . . . . . . 12 ⊢ -0 = 0
342	340, 341	syl6eq 2874	. . . . . . . . . . 11 ⊢ (𝑦 = 0 → -(log‘(1 − 𝑦)) = 0)
343		eqid 2823	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))
344	342, 343, 90	fvmpt 6770	. . . . . . . . . 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 7165	. . . . . . . . . . . . . . 15 ⊢ (0 = if(𝑛 = 0, 0, (1 / 𝑛)) → (0 · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
347	346	eqeq1d 2825	. . . . . . . . . . . . . 14 ⊢ (0 = if(𝑛 = 0, 0, (1 / 𝑛)) → ((0 · (𝑦↑𝑛)) = 0 ↔ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0))
348		oveq1 7165	. . . . . . . . . . . . . . 15 ⊢ ((1 / 𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)) → ((1 / 𝑛) · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
349	348	eqeq1d 2825	. . . . . . . . . . . . . 14 ⊢ ((1 / 𝑛) = if(𝑛 = 0, 0, (1 / 𝑛)) → (((1 / 𝑛) · (𝑦↑𝑛)) = 0 ↔ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0))
350		simpll 765	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑦 = 0)
351	350, 28	eqeltrdi 2923	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑦 ∈ ℂ)
352		simplr 767	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → 𝑛 ∈ ℕ₀)
353	351, 352	expcld 13513	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → (𝑦↑𝑛) ∈ ℂ)
354	353	mul02d 10840	. . . . . . . . . . . . . 14 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ 𝑛 = 0) → (0 · (𝑦↑𝑛)) = 0)
355		simpll 765	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑦 = 0)
356	355	oveq1d 7173	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (𝑦↑𝑛) = (0↑𝑛))
357		simpr 487	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → 𝑛 ∈ ℕ₀)
358	357, 14	sylib 220	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (𝑛 ∈ ℕ ∨ 𝑛 = 0))
359	358	ord 860	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 ∈ ℕ → 𝑛 = 0))
360	359	con1d 147	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (¬ 𝑛 = 0 → 𝑛 ∈ ℕ))
361	360	imp 409	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → 𝑛 ∈ ℕ)
362	361	0expd 13506	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (0↑𝑛) = 0)
363	356, 362	eqtrd 2858	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (𝑦↑𝑛) = 0)
364	363	oveq2d 7174	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · (𝑦↑𝑛)) = ((1 / 𝑛) · 0))
365	361	nnrecred 11691	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℝ)
366	365	recnd 10671	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → (1 / 𝑛) ∈ ℂ)
367	366	mul01d 10841	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · 0) = 0)
368	364, 367	eqtrd 2858	. . . . . . . . . . . . . 14 ⊢ (((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) ∧ ¬ 𝑛 = 0) → ((1 / 𝑛) · (𝑦↑𝑛)) = 0)
369	347, 349, 354, 368	ifbothda 4506	. . . . . . . . . . . . 13 ⊢ ((𝑦 = 0 ∧ 𝑛 ∈ ℕ₀) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0)
370	369	sumeq2dv 15062	. . . . . . . . . . . 12 ⊢ (𝑦 = 0 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ 0)
371	1	eqimssi 4027	. . . . . . . . . . . . . 14 ⊢ ℕ₀ ⊆ (ℤ_≥‘0)
372	371	orci 861	. . . . . . . . . . . . 13 ⊢ (ℕ₀ ⊆ (ℤ_≥‘0) ∨ ℕ₀ ∈ Fin)
373		sumz 15081	. . . . . . . . . . . . 13 ⊢ ((ℕ₀ ⊆ (ℤ_≥‘0) ∨ ℕ₀ ∈ Fin) → Σ𝑛 ∈ ℕ₀ 0 = 0)
374	372, 373	ax-mp 5	. . . . . . . . . . . 12 ⊢ Σ𝑛 ∈ ℕ₀ 0 = 0
375	370, 374	syl6eq 2874	. . . . . . . . . . 11 ⊢ (𝑦 = 0 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = 0)
376		eqid 2823	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))
377	375, 376, 90	fvmpt 6770	. . . . . . . . . 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 2861	. . . . . . . 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 24600	. . . . . . 7 ⊢ (⊤ → (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦))) = (𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛))))
381	380	fveq1d 6674	. . . . . 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 7166	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (1 − 𝑦) = (1 − 𝐴))
384	383	fveq2d 6676	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (log‘(1 − 𝑦)) = (log‘(1 − 𝐴)))
385	384	negeqd 10882	. . . . . 6 ⊢ (𝑦 = 𝐴 → -(log‘(1 − 𝑦)) = -(log‘(1 − 𝐴)))
386		negex 10886	. . . . . 6 ⊢ -(log‘(1 − 𝐴)) ∈ V
387	385, 343, 386	fvmpt 6770	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ -(log‘(1 − 𝑦)))‘𝐴) = -(log‘(1 − 𝐴)))
388		oveq1 7165	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (𝑦↑𝑛) = (𝐴↑𝑛))
389	388	oveq2d 7174	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
390	389	sumeq2sdv 15063	. . . . . 6 ⊢ (𝑦 = 𝐴 → Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
391		sumex 15046	. . . . . 6 ⊢ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) ∈ V
392	390, 376, 391	fvmpt 6770	. . . . 5 ⊢ (𝐴 ∈ (0(ball‘(abs ∘ − ))1) → ((𝑦 ∈ (0(ball‘(abs ∘ − ))1) ↦ Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝑦↑𝑛)))‘𝐴) = Σ𝑛 ∈ ℕ₀ (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)))
393	382, 387, 392	3eqtr3d 2866	. . . 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 5096	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ -(log‘(1 − 𝐴)))
396		seqex 13374	. . . 4 ⊢ seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ V
397	396	a1i 11	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ∈ V)
398		seqex 13374	. . . 4 ⊢ seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ∈ V
399	398	a1i 11	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ∈ V)
400		1zzd 12016	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 1 ∈ ℤ)
401		elnnuz 12285	. . . . . 6 ⊢ (𝑛 ∈ ℕ ↔ 𝑛 ∈ (ℤ_≥‘1))
402		fvres 6691	. . . . . 6 ⊢ (𝑛 ∈ (ℤ_≥‘1) → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛))
403	401, 402	sylbi 219	. . . . 5 ⊢ (𝑛 ∈ ℕ → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛))
404	403	eqcomd 2829	. . . 4 ⊢ (𝑛 ∈ ℕ → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛) = ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛))
405		addid2 10825	. . . . . . . 8 ⊢ (𝑛 ∈ ℂ → (0 + 𝑛) = 𝑛)
406	405	adantl 484	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℂ) → (0 + 𝑛) = 𝑛)
407		0cnd 10636	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℂ)
408		1eluzge0 12295	. . . . . . . 8 ⊢ 1 ∈ (ℤ_≥‘0)
409	408	a1i 11	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 1 ∈ (ℤ_≥‘0))
410		0cnd 10636	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) ∧ 𝑘 = 0) → 0 ∈ ℂ)
411		nn0cn 11910	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ₀ → 𝑘 ∈ ℂ)
412	411	adantl 484	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → 𝑘 ∈ ℂ)
413		neqne 3026	. . . . . . . . . . . 12 ⊢ (¬ 𝑘 = 0 → 𝑘 ≠ 0)
414		reccl 11307	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℂ ∧ 𝑘 ≠ 0) → (1 / 𝑘) ∈ ℂ)
415	412, 413, 414	syl2an 597	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) ∧ ¬ 𝑘 = 0) → (1 / 𝑘) ∈ ℂ)
416	410, 415	ifclda 4503	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → if(𝑘 = 0, 0, (1 / 𝑘)) ∈ ℂ)
417		expcl 13450	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ₀) → (𝐴↑𝑘) ∈ ℂ)
418	417	adantlr 713	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → (𝐴↑𝑘) ∈ ℂ)
419	416, 418	mulcld 10663	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ₀) → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) ∈ ℂ)
420	419	fmpttd 6881	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))):ℕ₀⟶ℂ)
421		1nn0 11916	. . . . . . . 8 ⊢ 1 ∈ ℕ₀
422		ffvelrn 6851	. . . . . . . 8 ⊢ (((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))):ℕ₀⟶ℂ ∧ 1 ∈ ℕ₀) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘1) ∈ ℂ)
423	420, 421, 422	sylancl 588	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘1) ∈ ℂ)
424		elfz1eq 12921	. . . . . . . . . 10 ⊢ (𝑛 ∈ (0...0) → 𝑛 = 0)
425		1m1e0 11712	. . . . . . . . . . 11 ⊢ (1 − 1) = 0
426	425	oveq2i 7169	. . . . . . . . . 10 ⊢ (0...(1 − 1)) = (0...0)
427	424, 426	eleq2s 2933	. . . . . . . . 9 ⊢ (𝑛 ∈ (0...(1 − 1)) → 𝑛 = 0)
428	427	fveq2d 6676	. . . . . . . 8 ⊢ (𝑛 ∈ (0...(1 − 1)) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0))
429		0nn0 11915	. . . . . . . . . 10 ⊢ 0 ∈ ℕ₀
430		iftrue 4475	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → if(𝑘 = 0, 0, (1 / 𝑘)) = 0)
431		oveq2 7166	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → (𝐴↑𝑘) = (𝐴↑0))
432	430, 431	oveq12d 7176	. . . . . . . . . . 11 ⊢ (𝑘 = 0 → (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)) = (0 · (𝐴↑0)))
433		ovex 7191	. . . . . . . . . . 11 ⊢ (0 · (𝐴↑0)) ∈ V
434	432, 8, 433	fvmpt 6770	. . . . . . . . . 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 13450	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 0 ∈ ℕ₀) → (𝐴↑0) ∈ ℂ)
437	27, 429, 436	sylancl 588	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴↑0) ∈ ℂ)
438	437	mul02d 10840	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (0 · (𝐴↑0)) = 0)
439	435, 438	syl5eq 2870	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘0) = 0)
440	428, 439	sylan9eqr 2880	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ (0...(1 − 1))) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = 0)
441	406, 407, 409, 423, 440	seqid 13418	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1)) = seq1( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))))
442	293	adantl 484	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
443	442	neneqd 3023	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ¬ 𝑛 = 0)
444	443	iffalsed 4480	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → if(𝑛 = 0, 0, (1 / 𝑛)) = (1 / 𝑛))
445	444	oveq1d 7173	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (if(𝑛 = 0, 0, (1 / 𝑛)) · (𝐴↑𝑛)) = ((1 / 𝑛) · (𝐴↑𝑛)))
446	284, 23	sylan2 594	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (𝐴↑𝑛) ∈ ℂ)
447	299	adantl 484	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
448	446, 447, 442	divrec2d 11422	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝐴↑𝑛) / 𝑛) = ((1 / 𝑛) · (𝐴↑𝑛)))
449	445, 448	eqtr4d 2861	. . . . . . . . 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 7176	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑛 → ((𝐴↑𝑘) / 𝑘) = ((𝐴↑𝑛) / 𝑛))
453		eqid 2823	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)) = (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))
454		ovex 7191	. . . . . . . . . . 11 ⊢ ((𝐴↑𝑛) / 𝑛) ∈ V
455	452, 453, 454	fvmpt 6770	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛) = ((𝐴↑𝑛) / 𝑛))
456	455	adantl 484	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛) = ((𝐴↑𝑛) / 𝑛))
457	449, 450, 456	3eqtr4d 2868	. . . . . . . 8 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛))
458	401, 457	sylan2br 596	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ (ℤ_≥‘1)) → ((𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))‘𝑛) = ((𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))‘𝑛))
459	400, 458	seqfeq 13398	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) = seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))))
460	441, 459	eqtrd 2858	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1)) = seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))))
461	460	fveq1d 6674	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ↾ (ℤ_≥‘1))‘𝑛) = (seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)))‘𝑛))
462	404, 461	sylan9eqr 2880	. . 3 ⊢ (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘))))‘𝑛) = (seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘)))‘𝑛))
463	310, 397, 399, 400, 462	climeq 14926	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (seq0( + , (𝑘 ∈ ℕ₀ ↦ (if(𝑘 = 0, 0, (1 / 𝑘)) · (𝐴↑𝑘)))) ⇝ -(log‘(1 − 𝐴)) ↔ seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ⇝ -(log‘(1 − 𝐴))))
464	395, 463	mpbid 234	1 ⊢ ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ ((𝐴↑𝑘) / 𝑘))) ⇝ -(log‘(1 − 𝐴)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 208 ∧ wa 398 ∨ wo 843 ∧ w3a 1083 = wceq 1537 ⊤wtru 1538 ∈ wcel 2114 ≠ wne 3018 {crab 3144 Vcvv 3496 ∖ cdif 3935 ⊆ wss 3938 ifcif 4469 {csn 4569 {cpr 4571 class class class wbr 5068 ↦ cmpt 5148 ^◡ccnv 5556 dom cdm 5557 ran crn 5558 ↾ cres 5559 “ cima 5560 ∘ ccom 5561 Fn wfn 6352 ⟶wf 6353 –1-1-onto→wf1o 6356 ‘cfv 6357 (class class class)co 7158 Fincfn 8511 supcsup 8906 ℂcc 10537 ℝcr 10538 0cc0 10539 1c1 10540 + caddc 10542 · cmul 10544 +∞cpnf 10674 -∞cmnf 10675 ℝ^*cxr 10676 < clt 10677 ≤ cle 10678 − cmin 10872 -cneg 10873 / cdiv 11299 ℕcn 11640 2c2 11695 ℕ₀cn0 11900 ℤ_≥cuz 12246 ℝ⁺crp 12392 (,]cioc 12742 [,)cico 12743 [,]cicc 12744 ...cfz 12895 seqcseq 13372 ↑cexp 13432 abscabs 14595 ⇝ cli 14843 Σcsu 15044 TopOpenctopn 16697 ∞Metcxmet 20532 ballcbl 20534 ℂ_fldccnfld 20547 –cn→ccncf 23486 D cdv 24463 logclog 25140

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2116 ax-9 2124 ax-10 2145 ax-11 2161 ax-12 2177 ax-ext 2795 ax-rep 5192 ax-sep 5205 ax-nul 5212 ax-pow 5268 ax-pr 5332 ax-un 7463 ax-inf2 9106 ax-cnex 10595 ax-resscn 10596 ax-1cn 10597 ax-icn 10598 ax-addcl 10599 ax-addrcl 10600 ax-mulcl 10601 ax-mulrcl 10602 ax-mulcom 10603 ax-addass 10604 ax-mulass 10605 ax-distr 10606 ax-i2m1 10607 ax-1ne0 10608 ax-1rid 10609 ax-rnegex 10610 ax-rrecex 10611 ax-cnre 10612 ax-pre-lttri 10613 ax-pre-lttrn 10614 ax-pre-ltadd 10615 ax-pre-mulgt0 10616 ax-pre-sup 10617 ax-addf 10618 ax-mulf 10619

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1540 df-fal 1550 df-ex 1781 df-nf 1785 df-sb 2070 df-mo 2622 df-eu 2654 df-clab 2802 df-cleq 2816 df-clel 2895 df-nfc 2965 df-ne 3019 df-nel 3126 df-ral 3145 df-rex 3146 df-reu 3147 df-rmo 3148 df-rab 3149 df-v 3498 df-sbc 3775 df-csb 3886 df-dif 3941 df-un 3943 df-in 3945 df-ss 3954 df-pss 3956 df-nul 4294 df-if 4470 df-pw 4543 df-sn 4570 df-pr 4572 df-tp 4574 df-op 4576 df-uni 4841 df-int 4879 df-iun 4923 df-iin 4924 df-br 5069 df-opab 5131 df-mpt 5149 df-tr 5175 df-id 5462 df-eprel 5467 df-po 5476 df-so 5477 df-fr 5516 df-se 5517 df-we 5518 df-xp 5563 df-rel 5564 df-cnv 5565 df-co 5566 df-dm 5567 df-rn 5568 df-res 5569 df-ima 5570 df-pred 6150 df-ord 6196 df-on 6197 df-lim 6198 df-suc 6199 df-iota 6316 df-fun 6359 df-fn 6360 df-f 6361 df-f1 6362 df-fo 6363 df-f1o 6364 df-fv 6365 df-isom 6366 df-riota 7116 df-ov 7161 df-oprab 7162 df-mpo 7163 df-of 7411 df-om 7583 df-1st 7691 df-2nd 7692 df-supp 7833 df-wrecs 7949 df-recs 8010 df-rdg 8048 df-1o 8104 df-2o 8105 df-oadd 8108 df-er 8291 df-map 8410 df-pm 8411 df-ixp 8464 df-en 8512 df-dom 8513 df-sdom 8514 df-fin 8515 df-fsupp 8836 df-fi 8877 df-sup 8908 df-inf 8909 df-oi 8976 df-card 9370 df-pnf 10679 df-mnf 10680 df-xr 10681 df-ltxr 10682 df-le 10683 df-sub 10874 df-neg 10875 df-div 11300 df-nn 11641 df-2 11703 df-3 11704 df-4 11705 df-5 11706 df-6 11707 df-7 11708 df-8 11709 df-9 11710 df-n0 11901 df-z 11985 df-dec 12102 df-uz 12247 df-q 12352 df-rp 12393 df-xneg 12510 df-xadd 12511 df-xmul 12512 df-ioo 12745 df-ioc 12746 df-ico 12747 df-icc 12748 df-fz 12896 df-fzo 13037 df-fl 13165 df-mod 13241 df-seq 13373 df-exp 13433 df-fac 13637 df-bc 13666 df-hash 13694 df-shft 14428 df-cj 14460 df-re 14461 df-im 14462 df-sqrt 14596 df-abs 14597 df-limsup 14830 df-clim 14847 df-rlim 14848 df-sum 15045 df-ef 15423 df-sin 15425 df-cos 15426 df-tan 15427 df-pi 15428 df-struct 16487 df-ndx 16488 df-slot 16489 df-base 16491 df-sets 16492 df-ress 16493 df-plusg 16580 df-mulr 16581 df-starv 16582 df-sca 16583 df-vsca 16584 df-ip 16585 df-tset 16586 df-ple 16587 df-ds 16589 df-unif 16590 df-hom 16591 df-cco 16592 df-rest 16698 df-topn 16699 df-0g 16717 df-gsum 16718 df-topgen 16719 df-pt 16720 df-prds 16723 df-xrs 16777 df-qtop 16782 df-imas 16783 df-xps 16785 df-mre 16859 df-mrc 16860 df-acs 16862 df-mgm 17854 df-sgrp 17903 df-mnd 17914 df-submnd 17959 df-mulg 18227 df-cntz 18449 df-cmn 18910 df-psmet 20539 df-xmet 20540 df-met 20541 df-bl 20542 df-mopn 20543 df-fbas 20544 df-fg 20545 df-cnfld 20548 df-top 21504 df-topon 21521 df-topsp 21543 df-bases 21556 df-cld 21629 df-ntr 21630 df-cls 21631 df-nei 21708 df-lp 21746 df-perf 21747 df-cn 21837 df-cnp 21838 df-haus 21925 df-cmp 21997 df-tx 22172 df-hmeo 22365 df-fil 22456 df-fm 22548 df-flim 22549 df-flf 22550 df-xms 22932 df-ms 22933 df-tms 22934 df-cncf 23488 df-limc 24466 df-dv 24467 df-ulm 24967 df-log 25142

This theorem is referenced by: logtaylsum 25246 logtayl2 25247 atantayl 25517 stirlinglem5 42370

W3C validator