lgamgulmlem4 - Metamath Proof Explorer

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

Theorem lgamgulmlem4 26772

Description: Lemma for lgamgulm 26775. (Contributed by Mario Carneiro, 3-Jul-2017.)

**Hypotheses**
Ref	Expression
lgamgulm.r	⊢ (𝜑 → 𝑅 ∈ ℕ)
lgamgulm.u	⊢ 𝑈 = {𝑥 ∈ ℂ ∣ ((abs‘𝑥) ≤ 𝑅 ∧ ∀𝑘 ∈ ℕ₀ (1 / 𝑅) ≤ (abs‘(𝑥 + 𝑘)))}
lgamgulm.g	⊢ 𝐺 = (𝑚 ∈ ℕ ↦ (𝑧 ∈ 𝑈 ↦ ((𝑧 · (log‘((𝑚 + 1) / 𝑚))) − (log‘((𝑧 / 𝑚) + 1)))))
lgamgulm.t	⊢ 𝑇 = (𝑚 ∈ ℕ ↦ if((2 · 𝑅) ≤ 𝑚, (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))), ((𝑅 · (log‘((𝑚 + 1) / 𝑚))) + ((log‘((𝑅 + 1) · 𝑚)) + π))))

**Assertion**
Ref	Expression
lgamgulmlem4	⊢ (𝜑 → seq1( + , 𝑇) ∈ dom ⇝ )

Distinct variable groups: 𝑘,𝑚,𝑥,𝑧,𝑅 𝑈,𝑚,𝑧 𝜑,𝑚,𝑥,𝑧 Allowed substitution hints: 𝜑(𝑘) 𝑇(𝑥,𝑧,𝑘,𝑚) 𝑈(𝑥,𝑘) 𝐺(𝑥,𝑧,𝑘,𝑚)

Proof of Theorem lgamgulmlem4 Dummy variable 𝑛 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		2nn 12289	. . . . . . 7 ⊢ 2 ∈ ℕ
2	1	a1i 11	. . . . . 6 ⊢ (𝜑 → 2 ∈ ℕ)
3		lgamgulm.r	. . . . . 6 ⊢ (𝜑 → 𝑅 ∈ ℕ)
4	2, 3	nnmulcld 12269	. . . . 5 ⊢ (𝜑 → (2 · 𝑅) ∈ ℕ)
5	4	nnzd 12589	. . . 4 ⊢ (𝜑 → (2 · 𝑅) ∈ ℤ)
6		eluzle 12839	. . . . . . 7 ⊢ (𝑛 ∈ (ℤ_≥‘(2 · 𝑅)) → (2 · 𝑅) ≤ 𝑛)
7	6	adantl 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → (2 · 𝑅) ≤ 𝑛)
8	7	iftrued 4535	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → if((2 · 𝑅) ≤ 𝑛, (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))), ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π))) = (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))))
9		eluznn 12906	. . . . . . 7 ⊢ (((2 · 𝑅) ∈ ℕ ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → 𝑛 ∈ ℕ)
10	4, 9	sylan 578	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → 𝑛 ∈ ℕ)
11		breq2 5151	. . . . . . . 8 ⊢ (𝑚 = 𝑛 → ((2 · 𝑅) ≤ 𝑚 ↔ (2 · 𝑅) ≤ 𝑛))
12		oveq1 7418	. . . . . . . . . 10 ⊢ (𝑚 = 𝑛 → (𝑚↑2) = (𝑛↑2))
13	12	oveq2d 7427	. . . . . . . . 9 ⊢ (𝑚 = 𝑛 → ((2 · (𝑅 + 1)) / (𝑚↑2)) = ((2 · (𝑅 + 1)) / (𝑛↑2)))
14	13	oveq2d 7427	. . . . . . . 8 ⊢ (𝑚 = 𝑛 → (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))) = (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))))
15		oveq1 7418	. . . . . . . . . . . 12 ⊢ (𝑚 = 𝑛 → (𝑚 + 1) = (𝑛 + 1))
16		id 22	. . . . . . . . . . . 12 ⊢ (𝑚 = 𝑛 → 𝑚 = 𝑛)
17	15, 16	oveq12d 7429	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑛 → ((𝑚 + 1) / 𝑚) = ((𝑛 + 1) / 𝑛))
18	17	fveq2d 6894	. . . . . . . . . 10 ⊢ (𝑚 = 𝑛 → (log‘((𝑚 + 1) / 𝑚)) = (log‘((𝑛 + 1) / 𝑛)))
19	18	oveq2d 7427	. . . . . . . . 9 ⊢ (𝑚 = 𝑛 → (𝑅 · (log‘((𝑚 + 1) / 𝑚))) = (𝑅 · (log‘((𝑛 + 1) / 𝑛))))
20		oveq2 7419	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑛 → ((𝑅 + 1) · 𝑚) = ((𝑅 + 1) · 𝑛))
21	20	fveq2d 6894	. . . . . . . . . 10 ⊢ (𝑚 = 𝑛 → (log‘((𝑅 + 1) · 𝑚)) = (log‘((𝑅 + 1) · 𝑛)))
22	21	oveq1d 7426	. . . . . . . . 9 ⊢ (𝑚 = 𝑛 → ((log‘((𝑅 + 1) · 𝑚)) + π) = ((log‘((𝑅 + 1) · 𝑛)) + π))
23	19, 22	oveq12d 7429	. . . . . . . 8 ⊢ (𝑚 = 𝑛 → ((𝑅 · (log‘((𝑚 + 1) / 𝑚))) + ((log‘((𝑅 + 1) · 𝑚)) + π)) = ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π)))
24	11, 14, 23	ifbieq12d 4555	. . . . . . 7 ⊢ (𝑚 = 𝑛 → if((2 · 𝑅) ≤ 𝑚, (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))), ((𝑅 · (log‘((𝑚 + 1) / 𝑚))) + ((log‘((𝑅 + 1) · 𝑚)) + π))) = if((2 · 𝑅) ≤ 𝑛, (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))), ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π))))
25		lgamgulm.t	. . . . . . 7 ⊢ 𝑇 = (𝑚 ∈ ℕ ↦ if((2 · 𝑅) ≤ 𝑚, (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))), ((𝑅 · (log‘((𝑚 + 1) / 𝑚))) + ((log‘((𝑅 + 1) · 𝑚)) + π))))
26		ovex 7444	. . . . . . . 8 ⊢ (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))) ∈ V
27		ovex 7444	. . . . . . . 8 ⊢ ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π)) ∈ V
28	26, 27	ifex 4577	. . . . . . 7 ⊢ if((2 · 𝑅) ≤ 𝑛, (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))), ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π))) ∈ V
29	24, 25, 28	fvmpt 6997	. . . . . 6 ⊢ (𝑛 ∈ ℕ → (𝑇‘𝑛) = if((2 · 𝑅) ≤ 𝑛, (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))), ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π))))
30	10, 29	syl 17	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → (𝑇‘𝑛) = if((2 · 𝑅) ≤ 𝑛, (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))), ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π))))
31		eqid 2730	. . . . . . 7 ⊢ (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2)))) = (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))
32	14, 31, 26	fvmpt 6997	. . . . . 6 ⊢ (𝑛 ∈ ℕ → ((𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))‘𝑛) = (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))))
33	10, 32	syl 17	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → ((𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))‘𝑛) = (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))))
34	8, 30, 33	3eqtr4d 2780	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → (𝑇‘𝑛) = ((𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))‘𝑛))
35	5, 34	seqfeq 13997	. . 3 ⊢ (𝜑 → seq(2 · 𝑅)( + , 𝑇) = seq(2 · 𝑅)( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))))
36		nnuz 12869	. . . . . 6 ⊢ ℕ = (ℤ_≥‘1)
37		1zzd 12597	. . . . . 6 ⊢ (𝜑 → 1 ∈ ℤ)
38	3	nncnd 12232	. . . . . . 7 ⊢ (𝜑 → 𝑅 ∈ ℂ)
39		2cnd 12294	. . . . . . . 8 ⊢ (𝜑 → 2 ∈ ℂ)
40		1cnd 11213	. . . . . . . . 9 ⊢ (𝜑 → 1 ∈ ℂ)
41	38, 40	addcld 11237	. . . . . . . 8 ⊢ (𝜑 → (𝑅 + 1) ∈ ℂ)
42	39, 41	mulcld 11238	. . . . . . 7 ⊢ (𝜑 → (2 · (𝑅 + 1)) ∈ ℂ)
43	38, 42	mulcld 11238	. . . . . 6 ⊢ (𝜑 → (𝑅 · (2 · (𝑅 + 1))) ∈ ℂ)
44		1lt2 12387	. . . . . . . . . 10 ⊢ 1 < 2
45		2re 12290	. . . . . . . . . . 11 ⊢ 2 ∈ ℝ
46		rere 15073	. . . . . . . . . . 11 ⊢ (2 ∈ ℝ → (ℜ‘2) = 2)
47	45, 46	ax-mp 5	. . . . . . . . . 10 ⊢ (ℜ‘2) = 2
48	44, 47	breqtrri 5174	. . . . . . . . 9 ⊢ 1 < (ℜ‘2)
49	48	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 1 < (ℜ‘2))
50		oveq1 7418	. . . . . . . . . 10 ⊢ (𝑚 = 𝑛 → (𝑚↑_𝑐-2) = (𝑛↑_𝑐-2))
51		eqid 2730	. . . . . . . . . 10 ⊢ (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2)) = (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))
52		ovex 7444	. . . . . . . . . 10 ⊢ (𝑛↑_𝑐-2) ∈ V
53	50, 51, 52	fvmpt 6997	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ → ((𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))‘𝑛) = (𝑛↑_𝑐-2))
54	53	adantl 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))‘𝑛) = (𝑛↑_𝑐-2))
55	39, 49, 54	zetacvg 26755	. . . . . . 7 ⊢ (𝜑 → seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))) ∈ dom ⇝ )
56		climdm 15502	. . . . . . 7 ⊢ (seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))) ∈ dom ⇝ ↔ seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))) ⇝ ( ⇝ ‘seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2)))))
57	55, 56	sylib 217	. . . . . 6 ⊢ (𝜑 → seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))) ⇝ ( ⇝ ‘seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2)))))
58		simpr 483	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
59	58	nncnd 12232	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
60		2cnd 12294	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 2 ∈ ℂ)
61	60	negcld 11562	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → -2 ∈ ℂ)
62	59, 61	cxpcld 26452	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑_𝑐-2) ∈ ℂ)
63	54, 62	eqeltrd 2831	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))‘𝑛) ∈ ℂ)
64	38	adantr 479	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑅 ∈ ℂ)
65		1cnd 11213	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 1 ∈ ℂ)
66	64, 65	addcld 11237	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 + 1) ∈ ℂ)
67	60, 66	mulcld 11238	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (2 · (𝑅 + 1)) ∈ ℂ)
68	64, 67	mulcld 11238	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 · (2 · (𝑅 + 1))) ∈ ℂ)
69	59	sqcld 14113	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑2) ∈ ℂ)
70	58	nnne0d 12266	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
71		2z 12598	. . . . . . . . . . 11 ⊢ 2 ∈ ℤ
72	71	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 2 ∈ ℤ)
73	59, 70, 72	expne0d 14121	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑2) ≠ 0)
74	68, 69, 73	divrecd 11997	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 · (2 · (𝑅 + 1))) / (𝑛↑2)) = ((𝑅 · (2 · (𝑅 + 1))) · (1 / (𝑛↑2))))
75	64, 67, 69, 73	divassd 12029	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 · (2 · (𝑅 + 1))) / (𝑛↑2)) = (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))))
76	59, 70, 60	cxpnegd 26459	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑_𝑐-2) = (1 / (𝑛↑_𝑐2)))
77	59, 70, 72	cxpexpzd 26455	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑_𝑐2) = (𝑛↑2))
78	77	oveq2d 7427	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (1 / (𝑛↑_𝑐2)) = (1 / (𝑛↑2)))
79	76, 78	eqtr2d 2771	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (1 / (𝑛↑2)) = (𝑛↑_𝑐-2))
80	79	oveq2d 7427	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 · (2 · (𝑅 + 1))) · (1 / (𝑛↑2))) = ((𝑅 · (2 · (𝑅 + 1))) · (𝑛↑_𝑐-2)))
81	74, 75, 80	3eqtr3d 2778	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))) = ((𝑅 · (2 · (𝑅 + 1))) · (𝑛↑_𝑐-2)))
82	32	adantl 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))‘𝑛) = (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))))
83	54	oveq2d 7427	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 · (2 · (𝑅 + 1))) · ((𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))‘𝑛)) = ((𝑅 · (2 · (𝑅 + 1))) · (𝑛↑_𝑐-2)))
84	81, 82, 83	3eqtr4d 2780	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))‘𝑛) = ((𝑅 · (2 · (𝑅 + 1))) · ((𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))‘𝑛)))
85	36, 37, 43, 57, 63, 84	isermulc2 15608	. . . . 5 ⊢ (𝜑 → seq1( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))) ⇝ ((𝑅 · (2 · (𝑅 + 1))) · ( ⇝ ‘seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))))))
86		climrel 15440	. . . . . 6 ⊢ Rel ⇝
87	86	releldmi 5946	. . . . 5 ⊢ (seq1( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))) ⇝ ((𝑅 · (2 · (𝑅 + 1))) · ( ⇝ ‘seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))))) → seq1( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))) ∈ dom ⇝ )
88	85, 87	syl 17	. . . 4 ⊢ (𝜑 → seq1( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))) ∈ dom ⇝ )
89	67, 69, 73	divcld 11994	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((2 · (𝑅 + 1)) / (𝑛↑2)) ∈ ℂ)
90	64, 89	mulcld 11238	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))) ∈ ℂ)
91	82, 90	eqeltrd 2831	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))‘𝑛) ∈ ℂ)
92	36, 4, 91	iserex 15607	. . . 4 ⊢ (𝜑 → (seq1( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))) ∈ dom ⇝ ↔ seq(2 · 𝑅)( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))) ∈ dom ⇝ ))
93	88, 92	mpbid 231	. . 3 ⊢ (𝜑 → seq(2 · 𝑅)( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))) ∈ dom ⇝ )
94	35, 93	eqeltrd 2831	. 2 ⊢ (𝜑 → seq(2 · 𝑅)( + , 𝑇) ∈ dom ⇝ )
95	29	adantl 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑇‘𝑛) = if((2 · 𝑅) ≤ 𝑛, (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))), ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π))))
96	3	adantr 479	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑅 ∈ ℕ)
97	96	nnred 12231	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑅 ∈ ℝ)
98	45	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 2 ∈ ℝ)
99		1red 11219	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 1 ∈ ℝ)
100	97, 99	readdcld 11247	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 + 1) ∈ ℝ)
101	98, 100	remulcld 11248	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (2 · (𝑅 + 1)) ∈ ℝ)
102	58	nnsqcld 14211	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑2) ∈ ℕ)
103	101, 102	nndivred 12270	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((2 · (𝑅 + 1)) / (𝑛↑2)) ∈ ℝ)
104	97, 103	remulcld 11248	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))) ∈ ℝ)
105	58	peano2nnd 12233	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛 + 1) ∈ ℕ)
106	105	nnrpd 13018	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛 + 1) ∈ ℝ⁺)
107	58	nnrpd 13018	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℝ⁺)
108	106, 107	rpdivcld 13037	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑛 + 1) / 𝑛) ∈ ℝ⁺)
109	108	relogcld 26367	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (log‘((𝑛 + 1) / 𝑛)) ∈ ℝ)
110	97, 109	remulcld 11248	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 · (log‘((𝑛 + 1) / 𝑛))) ∈ ℝ)
111	96	peano2nnd 12233	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 + 1) ∈ ℕ)
112	111	nnrpd 13018	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 + 1) ∈ ℝ⁺)
113	112, 107	rpmulcld 13036	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 + 1) · 𝑛) ∈ ℝ⁺)
114	113	relogcld 26367	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (log‘((𝑅 + 1) · 𝑛)) ∈ ℝ)
115		pire 26204	. . . . . . . . 9 ⊢ π ∈ ℝ
116	115	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π ∈ ℝ)
117	114, 116	readdcld 11247	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((log‘((𝑅 + 1) · 𝑛)) + π) ∈ ℝ)
118	110, 117	readdcld 11247	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π)) ∈ ℝ)
119	104, 118	ifcld 4573	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → if((2 · 𝑅) ≤ 𝑛, (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))), ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π))) ∈ ℝ)
120	95, 119	eqeltrd 2831	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑇‘𝑛) ∈ ℝ)
121	120	recnd 11246	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑇‘𝑛) ∈ ℂ)
122	36, 4, 121	iserex 15607	. 2 ⊢ (𝜑 → (seq1( + , 𝑇) ∈ dom ⇝ ↔ seq(2 · 𝑅)( + , 𝑇) ∈ dom ⇝ ))
123	94, 122	mpbird 256	1 ⊢ (𝜑 → seq1( + , 𝑇) ∈ dom ⇝ )

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 394 = wceq 1539 ∈ wcel 2104 ∀wral 3059 {crab 3430 ifcif 4527 class class class wbr 5147 ↦ cmpt 5230 dom cdm 5675 ‘cfv 6542 (class class class)co 7411 ℂcc 11110 ℝcr 11111 1c1 11113 + caddc 11115 · cmul 11117 < clt 11252 ≤ cle 11253 − cmin 11448 -cneg 11449 / cdiv 11875 ℕcn 12216 2c2 12271 ℕ₀cn0 12476 ℤcz 12562 ℤ_≥cuz 12826 seqcseq 13970 ↑cexp 14031 ℜcre 15048 abscabs 15185 ⇝ cli 15432 πcpi 16014 logclog 26299 ↑_𝑐ccxp 26300

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1911 ax-6 1969 ax-7 2009 ax-8 2106 ax-9 2114 ax-10 2135 ax-11 2152 ax-12 2169 ax-ext 2701 ax-rep 5284 ax-sep 5298 ax-nul 5305 ax-pow 5362 ax-pr 5426 ax-un 7727 ax-inf2 9638 ax-cnex 11168 ax-resscn 11169 ax-1cn 11170 ax-icn 11171 ax-addcl 11172 ax-addrcl 11173 ax-mulcl 11174 ax-mulrcl 11175 ax-mulcom 11176 ax-addass 11177 ax-mulass 11178 ax-distr 11179 ax-i2m1 11180 ax-1ne0 11181 ax-1rid 11182 ax-rnegex 11183 ax-rrecex 11184 ax-cnre 11185 ax-pre-lttri 11186 ax-pre-lttrn 11187 ax-pre-ltadd 11188 ax-pre-mulgt0 11189 ax-pre-sup 11190 ax-addf 11191

This theorem depends on definitions: df-bi 206 df-an 395 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2532 df-eu 2561 df-clab 2708 df-cleq 2722 df-clel 2808 df-nfc 2883 df-ne 2939 df-nel 3045 df-ral 3060 df-rex 3069 df-rmo 3374 df-reu 3375 df-rab 3431 df-v 3474 df-sbc 3777 df-csb 3893 df-dif 3950 df-un 3952 df-in 3954 df-ss 3964 df-pss 3966 df-nul 4322 df-if 4528 df-pw 4603 df-sn 4628 df-pr 4630 df-tp 4632 df-op 4634 df-uni 4908 df-int 4950 df-iun 4998 df-iin 4999 df-br 5148 df-opab 5210 df-mpt 5231 df-tr 5265 df-id 5573 df-eprel 5579 df-po 5587 df-so 5588 df-fr 5630 df-se 5631 df-we 5632 df-xp 5681 df-rel 5682 df-cnv 5683 df-co 5684 df-dm 5685 df-rn 5686 df-res 5687 df-ima 5688 df-pred 6299 df-ord 6366 df-on 6367 df-lim 6368 df-suc 6369 df-iota 6494 df-fun 6544 df-fn 6545 df-f 6546 df-f1 6547 df-fo 6548 df-f1o 6549 df-fv 6550 df-isom 6551 df-riota 7367 df-ov 7414 df-oprab 7415 df-mpo 7416 df-of 7672 df-om 7858 df-1st 7977 df-2nd 7978 df-supp 8149 df-frecs 8268 df-wrecs 8299 df-recs 8373 df-rdg 8412 df-1o 8468 df-2o 8469 df-oadd 8472 df-er 8705 df-map 8824 df-pm 8825 df-ixp 8894 df-en 8942 df-dom 8943 df-sdom 8944 df-fin 8945 df-fsupp 9364 df-fi 9408 df-sup 9439 df-inf 9440 df-oi 9507 df-dju 9898 df-card 9936 df-pnf 11254 df-mnf 11255 df-xr 11256 df-ltxr 11257 df-le 11258 df-sub 11450 df-neg 11451 df-div 11876 df-nn 12217 df-2 12279 df-3 12280 df-4 12281 df-5 12282 df-6 12283 df-7 12284 df-8 12285 df-9 12286 df-n0 12477 df-z 12563 df-dec 12682 df-uz 12827 df-q 12937 df-rp 12979 df-xneg 13096 df-xadd 13097 df-xmul 13098 df-ioo 13332 df-ioc 13333 df-ico 13334 df-icc 13335 df-fz 13489 df-fzo 13632 df-fl 13761 df-mod 13839 df-seq 13971 df-exp 14032 df-fac 14238 df-bc 14267 df-hash 14295 df-shft 15018 df-cj 15050 df-re 15051 df-im 15052 df-sqrt 15186 df-abs 15187 df-limsup 15419 df-clim 15436 df-rlim 15437 df-sum 15637 df-ef 16015 df-sin 16017 df-cos 16018 df-pi 16020 df-struct 17084 df-sets 17101 df-slot 17119 df-ndx 17131 df-base 17149 df-ress 17178 df-plusg 17214 df-mulr 17215 df-starv 17216 df-sca 17217 df-vsca 17218 df-ip 17219 df-tset 17220 df-ple 17221 df-ds 17223 df-unif 17224 df-hom 17225 df-cco 17226 df-rest 17372 df-topn 17373 df-0g 17391 df-gsum 17392 df-topgen 17393 df-pt 17394 df-prds 17397 df-xrs 17452 df-qtop 17457 df-imas 17458 df-xps 17460 df-mre 17534 df-mrc 17535 df-acs 17537 df-mgm 18565 df-sgrp 18644 df-mnd 18660 df-submnd 18706 df-mulg 18987 df-cntz 19222 df-cmn 19691 df-psmet 21136 df-xmet 21137 df-met 21138 df-bl 21139 df-mopn 21140 df-fbas 21141 df-fg 21142 df-cnfld 21145 df-top 22616 df-topon 22633 df-topsp 22655 df-bases 22669 df-cld 22743 df-ntr 22744 df-cls 22745 df-nei 22822 df-lp 22860 df-perf 22861 df-cn 22951 df-cnp 22952 df-haus 23039 df-tx 23286 df-hmeo 23479 df-fil 23570 df-fm 23662 df-flim 23663 df-flf 23664 df-xms 24046 df-ms 24047 df-tms 24048 df-cncf 24618 df-limc 25615 df-dv 25616 df-log 26301 df-cxp 26302

This theorem is referenced by: lgamgulmlem6 26774

W3C validator