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 27073

Description: Lemma for lgamgulm 27076. (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 12288	. . . . . . 7 ⊢ 2 ∈ ℕ
2	1	a1i 11	. . . . . 6 ⊢ (𝜑 → 2 ∈ ℕ)
3		lgamgulm.r	. . . . . 6 ⊢ (𝜑 → 𝑅 ∈ ℕ)
4	2, 3	nnmulcld 12263	. . . . 5 ⊢ (𝜑 → (2 · 𝑅) ∈ ℕ)
5	4	nnzd 12591	. . . 4 ⊢ (𝜑 → (2 · 𝑅) ∈ ℤ)
6		eluzle 12849	. . . . . . 7 ⊢ (𝑛 ∈ (ℤ_≥‘(2 · 𝑅)) → (2 · 𝑅) ≤ 𝑛)
7	6	adantl 485	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → (2 · 𝑅) ≤ 𝑛)
8	7	iftrued 4487	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → if((2 · 𝑅) ≤ 𝑛, (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))), ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π))) = (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))))
9		eluznn 12916	. . . . . . 7 ⊢ (((2 · 𝑅) ∈ ℕ ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → 𝑛 ∈ ℕ)
10	4, 9	sylan 589	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → 𝑛 ∈ ℕ)
11		breq2 5103	. . . . . . . 8 ⊢ (𝑚 = 𝑛 → ((2 · 𝑅) ≤ 𝑚 ↔ (2 · 𝑅) ≤ 𝑛))
12		oveq1 7399	. . . . . . . . . 10 ⊢ (𝑚 = 𝑛 → (𝑚↑2) = (𝑛↑2))
13	12	oveq2d 7408	. . . . . . . . 9 ⊢ (𝑚 = 𝑛 → ((2 · (𝑅 + 1)) / (𝑚↑2)) = ((2 · (𝑅 + 1)) / (𝑛↑2)))
14	13	oveq2d 7408	. . . . . . . 8 ⊢ (𝑚 = 𝑛 → (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))) = (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))))
15		oveq1 7399	. . . . . . . . . . . 12 ⊢ (𝑚 = 𝑛 → (𝑚 + 1) = (𝑛 + 1))
16		id 22	. . . . . . . . . . . 12 ⊢ (𝑚 = 𝑛 → 𝑚 = 𝑛)
17	15, 16	oveq12d 7410	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑛 → ((𝑚 + 1) / 𝑚) = ((𝑛 + 1) / 𝑛))
18	17	fveq2d 6867	. . . . . . . . . 10 ⊢ (𝑚 = 𝑛 → (log‘((𝑚 + 1) / 𝑚)) = (log‘((𝑛 + 1) / 𝑛)))
19	18	oveq2d 7408	. . . . . . . . 9 ⊢ (𝑚 = 𝑛 → (𝑅 · (log‘((𝑚 + 1) / 𝑚))) = (𝑅 · (log‘((𝑛 + 1) / 𝑛))))
20		oveq2 7400	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑛 → ((𝑅 + 1) · 𝑚) = ((𝑅 + 1) · 𝑛))
21	20	fveq2d 6867	. . . . . . . . . 10 ⊢ (𝑚 = 𝑛 → (log‘((𝑅 + 1) · 𝑚)) = (log‘((𝑅 + 1) · 𝑛)))
22	21	oveq1d 7407	. . . . . . . . 9 ⊢ (𝑚 = 𝑛 → ((log‘((𝑅 + 1) · 𝑚)) + π) = ((log‘((𝑅 + 1) · 𝑛)) + π))
23	19, 22	oveq12d 7410	. . . . . . . 8 ⊢ (𝑚 = 𝑛 → ((𝑅 · (log‘((𝑚 + 1) / 𝑚))) + ((log‘((𝑅 + 1) · 𝑚)) + π)) = ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π)))
24	11, 14, 23	ifbieq12d 4508	. . . . . . 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 7425	. . . . . . . 8 ⊢ (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))) ∈ V
27		ovex 7425	. . . . . . . 8 ⊢ ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π)) ∈ V
28	26, 27	ifex 4530	. . . . . . 7 ⊢ if((2 · 𝑅) ≤ 𝑛, (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))), ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π))) ∈ V
29	24, 25, 28	fvmpt 6971	. . . . . 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 2761	. . . . . . 7 ⊢ (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2)))) = (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))
32	14, 31, 26	fvmpt 6971	. . . . . 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 2806	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ_≥‘(2 · 𝑅))) → (𝑇‘𝑛) = ((𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))‘𝑛))
35	5, 34	seqfeq 14037	. . 3 ⊢ (𝜑 → seq(2 · 𝑅)( + , 𝑇) = seq(2 · 𝑅)( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))))
36		nnuz 12875	. . . . . 6 ⊢ ℕ = (ℤ_≥‘1)
37		1zzd 12599	. . . . . 6 ⊢ (𝜑 → 1 ∈ ℤ)
38	3	nncnd 12223	. . . . . . 7 ⊢ (𝜑 → 𝑅 ∈ ℂ)
39		2cnd 12293	. . . . . . . 8 ⊢ (𝜑 → 2 ∈ ℂ)
40		1cnd 11172	. . . . . . . . 9 ⊢ (𝜑 → 1 ∈ ℂ)
41	38, 40	addcld 11198	. . . . . . . 8 ⊢ (𝜑 → (𝑅 + 1) ∈ ℂ)
42	39, 41	mulcld 11199	. . . . . . 7 ⊢ (𝜑 → (2 · (𝑅 + 1)) ∈ ℂ)
43	38, 42	mulcld 11199	. . . . . 6 ⊢ (𝜑 → (𝑅 · (2 · (𝑅 + 1))) ∈ ℂ)
44		1lt2 12387	. . . . . . . . . 10 ⊢ 1 < 2
45		2re 12289	. . . . . . . . . . 11 ⊢ 2 ∈ ℝ
46		rere 15132	. . . . . . . . . . 11 ⊢ (2 ∈ ℝ → (ℜ‘2) = 2)
47	45, 46	ax-mp 5	. . . . . . . . . 10 ⊢ (ℜ‘2) = 2
48	44, 47	breqtrri 5126	. . . . . . . . 9 ⊢ 1 < (ℜ‘2)
49	48	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 1 < (ℜ‘2))
50		oveq1 7399	. . . . . . . . . 10 ⊢ (𝑚 = 𝑛 → (𝑚↑_𝑐-2) = (𝑛↑_𝑐-2))
51		eqid 2761	. . . . . . . . . 10 ⊢ (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2)) = (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))
52		ovex 7425	. . . . . . . . . 10 ⊢ (𝑛↑_𝑐-2) ∈ V
53	50, 51, 52	fvmpt 6971	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ → ((𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))‘𝑛) = (𝑛↑_𝑐-2))
54	53	adantl 485	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))‘𝑛) = (𝑛↑_𝑐-2))
55	39, 49, 54	zetacvg 27056	. . . . . . 7 ⊢ (𝜑 → seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))) ∈ dom ⇝ )
56		climdm 15564	. . . . . . 7 ⊢ (seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))) ∈ dom ⇝ ↔ seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))) ⇝ ( ⇝ ‘seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2)))))
57	55, 56	sylib 220	. . . . . 6 ⊢ (𝜑 → seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))) ⇝ ( ⇝ ‘seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2)))))
58		simpr 488	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
59	58	nncnd 12223	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
60		2cnd 12293	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 2 ∈ ℂ)
61	60	negcld 11526	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → -2 ∈ ℂ)
62	59, 61	cxpcld 26750	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑_𝑐-2) ∈ ℂ)
63	54, 62	eqeltrd 2861	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))‘𝑛) ∈ ℂ)
64	38	adantr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑅 ∈ ℂ)
65		1cnd 11172	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 1 ∈ ℂ)
66	64, 65	addcld 11198	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 + 1) ∈ ℂ)
67	60, 66	mulcld 11199	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (2 · (𝑅 + 1)) ∈ ℂ)
68	64, 67	mulcld 11199	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 · (2 · (𝑅 + 1))) ∈ ℂ)
69	59	sqcld 14154	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑2) ∈ ℂ)
70	58	nnne0d 12260	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
71		2z 12600	. . . . . . . . . . 11 ⊢ 2 ∈ ℤ
72	71	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 2 ∈ ℤ)
73	59, 70, 72	expne0d 14162	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑2) ≠ 0)
74	68, 69, 73	divrecd 11967	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 · (2 · (𝑅 + 1))) / (𝑛↑2)) = ((𝑅 · (2 · (𝑅 + 1))) · (1 / (𝑛↑2))))
75	64, 67, 69, 73	divassd 11999	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 · (2 · (𝑅 + 1))) / (𝑛↑2)) = (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))))
76	59, 70, 60	cxpnegd 26757	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑_𝑐-2) = (1 / (𝑛↑_𝑐2)))
77	59, 70, 72	cxpexpzd 26753	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑_𝑐2) = (𝑛↑2))
78	77	oveq2d 7408	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (1 / (𝑛↑_𝑐2)) = (1 / (𝑛↑2)))
79	76, 78	eqtr2d 2797	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (1 / (𝑛↑2)) = (𝑛↑_𝑐-2))
80	79	oveq2d 7408	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 · (2 · (𝑅 + 1))) · (1 / (𝑛↑2))) = ((𝑅 · (2 · (𝑅 + 1))) · (𝑛↑_𝑐-2)))
81	74, 75, 80	3eqtr3d 2804	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))) = ((𝑅 · (2 · (𝑅 + 1))) · (𝑛↑_𝑐-2)))
82	32	adantl 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))‘𝑛) = (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))))
83	54	oveq2d 7408	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 · (2 · (𝑅 + 1))) · ((𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))‘𝑛)) = ((𝑅 · (2 · (𝑅 + 1))) · (𝑛↑_𝑐-2)))
84	81, 82, 83	3eqtr4d 2806	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))‘𝑛) = ((𝑅 · (2 · (𝑅 + 1))) · ((𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))‘𝑛)))
85	36, 37, 43, 57, 63, 84	isermulc2 15668	. . . . 5 ⊢ (𝜑 → seq1( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))) ⇝ ((𝑅 · (2 · (𝑅 + 1))) · ( ⇝ ‘seq1( + , (𝑚 ∈ ℕ ↦ (𝑚↑_𝑐-2))))))
86		climrel 15502	. . . . . 6 ⊢ Rel ⇝
87	86	releldmi 5922	. . . . 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 11964	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((2 · (𝑅 + 1)) / (𝑛↑2)) ∈ ℂ)
90	64, 89	mulcld 11199	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))) ∈ ℂ)
91	82, 90	eqeltrd 2861	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))‘𝑛) ∈ ℂ)
92	36, 4, 91	iserex 15667	. . . 4 ⊢ (𝜑 → (seq1( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))) ∈ dom ⇝ ↔ seq(2 · 𝑅)( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))) ∈ dom ⇝ ))
93	88, 92	mpbid 234	. . 3 ⊢ (𝜑 → seq(2 · 𝑅)( + , (𝑚 ∈ ℕ ↦ (𝑅 · ((2 · (𝑅 + 1)) / (𝑚↑2))))) ∈ dom ⇝ )
94	35, 93	eqeltrd 2861	. 2 ⊢ (𝜑 → seq(2 · 𝑅)( + , 𝑇) ∈ dom ⇝ )
95	29	adantl 485	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑇‘𝑛) = if((2 · 𝑅) ≤ 𝑛, (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))), ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π))))
96	3	adantr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑅 ∈ ℕ)
97	96	nnred 12222	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑅 ∈ ℝ)
98	45	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 2 ∈ ℝ)
99		1red 11179	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 1 ∈ ℝ)
100	97, 99	readdcld 11208	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 + 1) ∈ ℝ)
101	98, 100	remulcld 11209	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (2 · (𝑅 + 1)) ∈ ℝ)
102	58	nnsqcld 14254	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛↑2) ∈ ℕ)
103	101, 102	nndivred 12264	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((2 · (𝑅 + 1)) / (𝑛↑2)) ∈ ℝ)
104	97, 103	remulcld 11209	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))) ∈ ℝ)
105	58	peano2nnd 12224	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛 + 1) ∈ ℕ)
106	105	nnrpd 13032	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛 + 1) ∈ ℝ⁺)
107	58	nnrpd 13032	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℝ⁺)
108	106, 107	rpdivcld 13051	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑛 + 1) / 𝑛) ∈ ℝ⁺)
109	108	relogcld 26665	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (log‘((𝑛 + 1) / 𝑛)) ∈ ℝ)
110	97, 109	remulcld 11209	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 · (log‘((𝑛 + 1) / 𝑛))) ∈ ℝ)
111	96	peano2nnd 12224	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 + 1) ∈ ℕ)
112	111	nnrpd 13032	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑅 + 1) ∈ ℝ⁺)
113	112, 107	rpmulcld 13050	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 + 1) · 𝑛) ∈ ℝ⁺)
114	113	relogcld 26665	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (log‘((𝑅 + 1) · 𝑛)) ∈ ℝ)
115		pire 26496	. . . . . . . . 9 ⊢ π ∈ ℝ
116	115	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π ∈ ℝ)
117	114, 116	readdcld 11208	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((log‘((𝑅 + 1) · 𝑛)) + π) ∈ ℝ)
118	110, 117	readdcld 11208	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π)) ∈ ℝ)
119	104, 118	ifcld 4526	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → if((2 · 𝑅) ≤ 𝑛, (𝑅 · ((2 · (𝑅 + 1)) / (𝑛↑2))), ((𝑅 · (log‘((𝑛 + 1) / 𝑛))) + ((log‘((𝑅 + 1) · 𝑛)) + π))) ∈ ℝ)
120	95, 119	eqeltrd 2861	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑇‘𝑛) ∈ ℝ)
121	120	recnd 11207	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑇‘𝑛) ∈ ℂ)
122	36, 4, 121	iserex 15667	. 2 ⊢ (𝜑 → (seq1( + , 𝑇) ∈ dom ⇝ ↔ seq(2 · 𝑅)( + , 𝑇) ∈ dom ⇝ ))
123	94, 122	mpbird 259	1 ⊢ (𝜑 → seq1( + , 𝑇) ∈ dom ⇝ )

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 399 = wceq 1559 ∈ wcel 2141 ∀wral 3075 {crab 3413 ifcif 4479 class class class wbr 5099 ↦ cmpt 5180 dom cdm 5645 ‘cfv 6517 (class class class)co 7392 ℂcc 11068 ℝcr 11069 1c1 11071 + caddc 11073 · cmul 11075 < clt 11213 ≤ cle 11214 − cmin 11411 -cneg 11412 / cdiv 11841 ℕcn 12207 2c2 12269 ℕ₀cn0 12478 ℤcz 12565 ℤ_≥cuz 12836 seqcseq 14011 ↑cexp 14071 ℜcre 15107 abscabs 15244 ⇝ cli 15494 πcpi 16079 logclog 26596 ↑_𝑐ccxp 26597

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1814 ax-4 1828 ax-5 1929 ax-6 1986 ax-7 2027 ax-8 2143 ax-9 2151 ax-10 2174 ax-11 2190 ax-12 2211 ax-ext 2733 ax-rep 5226 ax-sep 5245 ax-nul 5255 ax-pow 5321 ax-pr 5389 ax-un 7714 ax-inf2 9593 ax-cnex 11126 ax-resscn 11127 ax-1cn 11128 ax-icn 11129 ax-addcl 11130 ax-addrcl 11131 ax-mulcl 11132 ax-mulrcl 11133 ax-mulcom 11134 ax-addass 11135 ax-mulass 11136 ax-distr 11137 ax-i2m1 11138 ax-1ne0 11139 ax-1rid 11140 ax-rnegex 11141 ax-rrecex 11142 ax-cnre 11143 ax-pre-lttri 11144 ax-pre-lttrn 11145 ax-pre-ltadd 11146 ax-pre-mulgt0 11147 ax-pre-sup 11148 ax-addf 11149

This theorem depends on definitions: df-bi 209 df-an 400 df-or 859 df-3or 1098 df-3an 1099 df-tru 1562 df-fal 1572 df-ex 1799 df-nf 1803 df-sb 2090 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3061 df-ral 3076 df-rex 3086 df-rmo 3366 df-reu 3367 df-rab 3414 df-v 3455 df-sbc 3745 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-pss 3924 df-nul 4286 df-if 4480 df-pw 4556 df-sn 4582 df-pr 4584 df-tp 4586 df-op 4588 df-uni 4865 df-int 4905 df-iun 4950 df-iin 4951 df-br 5100 df-opab 5162 df-mpt 5181 df-tr 5207 df-id 5540 df-eprel 5545 df-po 5553 df-so 5554 df-fr 5598 df-se 5599 df-we 5600 df-xp 5651 df-rel 5652 df-cnv 5653 df-co 5654 df-dm 5655 df-rn 5656 df-res 5657 df-ima 5658 df-pred 6284 df-ord 6345 df-on 6346 df-lim 6347 df-suc 6348 df-iota 6473 df-fun 6519 df-fn 6520 df-f 6521 df-f1 6522 df-fo 6523 df-f1o 6524 df-fv 6525 df-isom 6526 df-riota 7349 df-ov 7395 df-oprab 7396 df-mpo 7397 df-of 7656 df-om 7843 df-1st 7966 df-2nd 7967 df-supp 8136 df-frecs 8257 df-wrecs 8288 df-recs 8337 df-rdg 8376 df-1o 8432 df-2o 8433 df-oadd 8436 df-er 8673 df-map 8805 df-pm 8806 df-ixp 8876 df-en 8924 df-dom 8925 df-sdom 8926 df-fin 8927 df-fsupp 9305 df-fi 9354 df-sup 9385 df-inf 9386 df-oi 9455 df-dju 9856 df-card 9894 df-pnf 11215 df-mnf 11216 df-xr 11217 df-ltxr 11218 df-le 11219 df-sub 11413 df-neg 11414 df-div 11842 df-nn 12208 df-2 12277 df-3 12278 df-4 12279 df-5 12280 df-6 12281 df-7 12282 df-8 12283 df-9 12284 df-n0 12479 df-z 12566 df-dec 12686 df-uz 12837 df-q 12947 df-rp 12991 df-xneg 13111 df-xadd 13112 df-xmul 13113 df-ioo 13350 df-ioc 13351 df-ico 13352 df-icc 13353 df-fz 13510 df-fzo 13657 df-fl 13799 df-mod 13877 df-seq 14012 df-exp 14072 df-fac 14284 df-bc 14313 df-hash 14341 df-shft 15077 df-cj 15109 df-re 15110 df-im 15111 df-sqrt 15245 df-abs 15246 df-limsup 15481 df-clim 15498 df-rlim 15499 df-sum 15697 df-ef 16080 df-sin 16082 df-cos 16083 df-pi 16085 df-struct 17166 df-sets 17183 df-slot 17201 df-ndx 17213 df-base 17229 df-ress 17250 df-plusg 17282 df-mulr 17283 df-starv 17284 df-sca 17285 df-vsca 17286 df-ip 17287 df-tset 17288 df-ple 17289 df-ds 17291 df-unif 17292 df-hom 17293 df-cco 17294 df-rest 17434 df-topn 17435 df-0g 17453 df-gsum 17454 df-topgen 17455 df-pt 17456 df-prds 17459 df-xrs 17515 df-qtop 17520 df-imas 17521 df-xps 17523 df-mre 17597 df-mrc 17598 df-acs 17600 df-mgm 18657 df-sgrp 18736 df-mnd 18752 df-submnd 18801 df-mulg 19093 df-cntz 19340 df-cmn 19805 df-psmet 21396 df-xmet 21397 df-met 21398 df-bl 21399 df-mopn 21400 df-fbas 21401 df-fg 21402 df-cnfld 21405 df-top 22934 df-topon 22951 df-topsp 22973 df-bases 22986 df-cld 23059 df-ntr 23060 df-cls 23061 df-nei 23138 df-lp 23176 df-perf 23177 df-cn 23267 df-cnp 23268 df-haus 23355 df-tx 23602 df-hmeo 23795 df-fil 23886 df-fm 23978 df-flim 23979 df-flf 23980 df-xms 24360 df-ms 24361 df-tms 24362 df-cncf 24920 df-limc 25908 df-dv 25909 df-log 26598 df-cxp 26599

This theorem is referenced by: lgamgulmlem6 27075

W3C validator