dchrisumlem3 - Metamath Proof Explorer

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

Theorem dchrisumlem3 27666

Description: Lemma for dchrisum 27667. Lemma 9.4.1 of [Shapiro], p. 377. (Contributed by Mario Carneiro, 2-May-2016.)

**Hypotheses**
Ref	Expression
rpvmasum.z	⊢ 𝑍 = (ℤ/nℤ‘𝑁)
rpvmasum.l	⊢ 𝐿 = (ℤRHom‘𝑍)
rpvmasum.a	⊢ (𝜑 → 𝑁 ∈ ℕ)
rpvmasum.g	⊢ 𝐺 = (DChr‘𝑁)
rpvmasum.d	⊢ 𝐷 = (Base‘𝐺)
rpvmasum.1	⊢ 1 = (0_g‘𝐺)
dchrisum.b	⊢ (𝜑 → 𝑋 ∈ 𝐷)
dchrisum.n1	⊢ (𝜑 → 𝑋 ≠ 1 )
dchrisum.2	⊢ (𝑛 = 𝑥 → 𝐴 = 𝐵)
dchrisum.3	⊢ (𝜑 → 𝑀 ∈ ℕ)
dchrisum.4	⊢ ((𝜑 ∧ 𝑛 ∈ ℝ⁺) → 𝐴 ∈ ℝ)
dchrisum.5	⊢ ((𝜑 ∧ (𝑛 ∈ ℝ⁺ ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑀 ≤ 𝑛 ∧ 𝑛 ≤ 𝑥)) → 𝐵 ≤ 𝐴)
dchrisum.6	⊢ (𝜑 → (𝑛 ∈ ℝ⁺ ↦ 𝐴) ⇝_𝑟 0)
dchrisum.7	⊢ 𝐹 = (𝑛 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑛)) · 𝐴))
dchrisum.9	⊢ (𝜑 → 𝑅 ∈ ℝ)
dchrisum.10	⊢ (𝜑 → ∀𝑢 ∈ (0..^𝑁)(abs‘Σ𝑛 ∈ (0..^𝑢)(𝑋‘(𝐿‘𝑛))) ≤ 𝑅)

**Assertion**
Ref	Expression
dchrisumlem3	⊢ (𝜑 → ∃𝑡∃𝑐 ∈ (0[,)+∞)(seq1( + , 𝐹) ⇝ 𝑡 ∧ ∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵)))

Distinct variable groups: 𝑢,𝑛,𝑥,𝑐,𝑡 1 ,𝑐 𝑡,𝑛, 1 ,𝑥 𝑢,𝑐,𝐹,𝑛,𝑡,𝑥 𝐴,𝑐,𝑡,𝑥 𝑁,𝑐,𝑛,𝑡,𝑢,𝑥 𝜑,𝑐,𝑛,𝑡,𝑢,𝑥 𝑅,𝑐,𝑛,𝑢,𝑥 𝐵,𝑐,𝑛 𝑛,𝑍,𝑥 𝐷,𝑐,𝑛,𝑡,𝑥 𝐿,𝑐,𝑛,𝑡,𝑢,𝑥 𝑀,𝑐,𝑛,𝑢,𝑥 𝑋,𝑐,𝑛,𝑡,𝑢,𝑥 Allowed substitution hints: 𝐴(𝑢, 𝑛) 𝐵(𝑥, 𝑢, 𝑡) 𝐷(𝑢) 𝑅(𝑡) 1 (𝑢) 𝐺(𝑥, 𝑢, 𝑡, 𝑛, 𝑐) 𝑀(𝑡) 𝑍(𝑢, 𝑡, 𝑐)

Proof of Theorem dchrisumlem3 Dummy variables 𝑘 𝑚 𝑖 𝑗 𝑒 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		nnuz 12907	. . . 4 ⊢ ℕ = (ℤ_≥‘1)
2		1zzd 12631	. . . . . 6 ⊢ (𝜑 → 1 ∈ ℤ)
3		simpr 489	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ ℕ) → 𝑖 ∈ ℕ)
4		rpvmasum.g	. . . . . . . . . 10 ⊢ 𝐺 = (DChr‘𝑁)
5		rpvmasum.z	. . . . . . . . . 10 ⊢ 𝑍 = (ℤ/nℤ‘𝑁)
6		rpvmasum.d	. . . . . . . . . 10 ⊢ 𝐷 = (Base‘𝐺)
7		rpvmasum.l	. . . . . . . . . 10 ⊢ 𝐿 = (ℤRHom‘𝑍)
8		dchrisum.b	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 ∈ 𝐷)
9	8	adantr 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ ℕ) → 𝑋 ∈ 𝐷)
10	3	nnzd 12623	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ ℕ) → 𝑖 ∈ ℤ)
11	4, 5, 6, 7, 9, 10	dchrzrhcl 27420	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ ℕ) → (𝑋‘(𝐿‘𝑖)) ∈ ℂ)
12		dchrisum.4	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ ℝ⁺) → 𝐴 ∈ ℝ)
13	12	ralrimiva 3156	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑛 ∈ ℝ⁺ 𝐴 ∈ ℝ)
14		nnrp 13034	. . . . . . . . . . 11 ⊢ (𝑖 ∈ ℕ → 𝑖 ∈ ℝ⁺)
15		nfcsb1v 3876	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑛⦋𝑖 / 𝑛⦌𝐴
16	15	nfel1 2940	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛⦋𝑖 / 𝑛⦌𝐴 ∈ ℝ
17		csbeq1a 3866	. . . . . . . . . . . . . 14 ⊢ (𝑛 = 𝑖 → 𝐴 = ⦋𝑖 / 𝑛⦌𝐴)
18	17	eleq1d 2847	. . . . . . . . . . . . 13 ⊢ (𝑛 = 𝑖 → (𝐴 ∈ ℝ ↔ ⦋𝑖 / 𝑛⦌𝐴 ∈ ℝ))
19	16, 18	rspc 3568	. . . . . . . . . . . 12 ⊢ (𝑖 ∈ ℝ⁺ → (∀𝑛 ∈ ℝ⁺ 𝐴 ∈ ℝ → ⦋𝑖 / 𝑛⦌𝐴 ∈ ℝ))
20	19	impcom 412	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℝ⁺ 𝐴 ∈ ℝ ∧ 𝑖 ∈ ℝ⁺) → ⦋𝑖 / 𝑛⦌𝐴 ∈ ℝ)
21	13, 14, 20	syl2an 607	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ ℕ) → ⦋𝑖 / 𝑛⦌𝐴 ∈ ℝ)
22	21	recnd 11243	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ ℕ) → ⦋𝑖 / 𝑛⦌𝐴 ∈ ℂ)
23	11, 22	mulcld 11235	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ ℕ) → ((𝑋‘(𝐿‘𝑖)) · ⦋𝑖 / 𝑛⦌𝐴) ∈ ℂ)
24		nfcv 2924	. . . . . . . . 9 ⊢ Ⅎ𝑛𝑖
25		nfcv 2924	. . . . . . . . . 10 ⊢ Ⅎ𝑛(𝑋‘(𝐿‘𝑖))
26		nfcv 2924	. . . . . . . . . 10 ⊢ Ⅎ𝑛 ·
27	25, 26, 15	nfov 7442	. . . . . . . . 9 ⊢ Ⅎ𝑛((𝑋‘(𝐿‘𝑖)) · ⦋𝑖 / 𝑛⦌𝐴)
28		2fveq3 6886	. . . . . . . . . 10 ⊢ (𝑛 = 𝑖 → (𝑋‘(𝐿‘𝑛)) = (𝑋‘(𝐿‘𝑖)))
29	28, 17	oveq12d 7430	. . . . . . . . 9 ⊢ (𝑛 = 𝑖 → ((𝑋‘(𝐿‘𝑛)) · 𝐴) = ((𝑋‘(𝐿‘𝑖)) · ⦋𝑖 / 𝑛⦌𝐴))
30		dchrisum.7	. . . . . . . . 9 ⊢ 𝐹 = (𝑛 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑛)) · 𝐴))
31	24, 27, 29, 30	fvmptf 7011	. . . . . . . 8 ⊢ ((𝑖 ∈ ℕ ∧ ((𝑋‘(𝐿‘𝑖)) · ⦋𝑖 / 𝑛⦌𝐴) ∈ ℂ) → (𝐹‘𝑖) = ((𝑋‘(𝐿‘𝑖)) · ⦋𝑖 / 𝑛⦌𝐴))
32	3, 23, 31	syl2anc 595	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ ℕ) → (𝐹‘𝑖) = ((𝑋‘(𝐿‘𝑖)) · ⦋𝑖 / 𝑛⦌𝐴))
33	32, 23	eqeltrd 2862	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ ℕ) → (𝐹‘𝑖) ∈ ℂ)
34	1, 2, 33	serf 14073	. . . . 5 ⊢ (𝜑 → seq1( + , 𝐹):ℕ⟶ℂ)
35	34	ffvelcdmda 7079	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (seq1( + , 𝐹)‘𝑘) ∈ ℂ)
36	12	recnd 11243	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℝ⁺) → 𝐴 ∈ ℂ)
37	36	ralrimiva 3156	. . . . . . . 8 ⊢ (𝜑 → ∀𝑛 ∈ ℝ⁺ 𝐴 ∈ ℂ)
38	37	adantr 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∀𝑛 ∈ ℝ⁺ 𝐴 ∈ ℂ)
39		id 23	. . . . . . . 8 ⊢ (𝑒 ∈ ℝ⁺ → 𝑒 ∈ ℝ⁺)
40		2re 12321	. . . . . . . . . 10 ⊢ 2 ∈ ℝ
41		dchrisum.9	. . . . . . . . . 10 ⊢ (𝜑 → 𝑅 ∈ ℝ)
42		remulcl 11191	. . . . . . . . . 10 ⊢ ((2 ∈ ℝ ∧ 𝑅 ∈ ℝ) → (2 · 𝑅) ∈ ℝ)
43	40, 41, 42	sylancr 598	. . . . . . . . 9 ⊢ (𝜑 → (2 · 𝑅) ∈ ℝ)
44		rpvmasum.a	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℕ)
45		lbfzo0 13735	. . . . . . . . . . . 12 ⊢ (0 ∈ (0..^𝑁) ↔ 𝑁 ∈ ℕ)
46	44, 45	sylibr 237	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ∈ (0..^𝑁))
47		dchrisum.10	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑢 ∈ (0..^𝑁)(abs‘Σ𝑛 ∈ (0..^𝑢)(𝑋‘(𝐿‘𝑛))) ≤ 𝑅)
48		oveq2 7420	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 = 0 → (0..^𝑢) = (0..^0))
49		fzo0 13719	. . . . . . . . . . . . . . . . 17 ⊢ (0..^0) = ∅
50	48, 49	eqtrdi 2813	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 = 0 → (0..^𝑢) = ∅)
51	50	sumeq1d 15758	. . . . . . . . . . . . . . 15 ⊢ (𝑢 = 0 → Σ𝑛 ∈ (0..^𝑢)(𝑋‘(𝐿‘𝑛)) = Σ𝑛 ∈ ∅ (𝑋‘(𝐿‘𝑛)))
52		sum0 15779	. . . . . . . . . . . . . . 15 ⊢ Σ𝑛 ∈ ∅ (𝑋‘(𝐿‘𝑛)) = 0
53	51, 52	eqtrdi 2813	. . . . . . . . . . . . . 14 ⊢ (𝑢 = 0 → Σ𝑛 ∈ (0..^𝑢)(𝑋‘(𝐿‘𝑛)) = 0)
54	53	abs00bd 15349	. . . . . . . . . . . . 13 ⊢ (𝑢 = 0 → (abs‘Σ𝑛 ∈ (0..^𝑢)(𝑋‘(𝐿‘𝑛))) = 0)
55	54	breq1d 5118	. . . . . . . . . . . 12 ⊢ (𝑢 = 0 → ((abs‘Σ𝑛 ∈ (0..^𝑢)(𝑋‘(𝐿‘𝑛))) ≤ 𝑅 ↔ 0 ≤ 𝑅))
56	55	rspcv 3576	. . . . . . . . . . 11 ⊢ (0 ∈ (0..^𝑁) → (∀𝑢 ∈ (0..^𝑁)(abs‘Σ𝑛 ∈ (0..^𝑢)(𝑋‘(𝐿‘𝑛))) ≤ 𝑅 → 0 ≤ 𝑅))
57	46, 47, 56	sylc 66	. . . . . . . . . 10 ⊢ (𝜑 → 0 ≤ 𝑅)
58		0le2 12349	. . . . . . . . . . 11 ⊢ 0 ≤ 2
59		mulge0 11738	. . . . . . . . . . 11 ⊢ (((2 ∈ ℝ ∧ 0 ≤ 2) ∧ (𝑅 ∈ ℝ ∧ 0 ≤ 𝑅)) → 0 ≤ (2 · 𝑅))
60	40, 58, 59	mpanl12 714	. . . . . . . . . 10 ⊢ ((𝑅 ∈ ℝ ∧ 0 ≤ 𝑅) → 0 ≤ (2 · 𝑅))
61	41, 57, 60	syl2anc 595	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ (2 · 𝑅))
62	43, 61	ge0p1rpd 13096	. . . . . . . 8 ⊢ (𝜑 → ((2 · 𝑅) + 1) ∈ ℝ⁺)
63		rpdivcl 13049	. . . . . . . 8 ⊢ ((𝑒 ∈ ℝ⁺ ∧ ((2 · 𝑅) + 1) ∈ ℝ⁺) → (𝑒 / ((2 · 𝑅) + 1)) ∈ ℝ⁺)
64	39, 62, 63	syl2anr 608	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → (𝑒 / ((2 · 𝑅) + 1)) ∈ ℝ⁺)
65		dchrisum.6	. . . . . . . 8 ⊢ (𝜑 → (𝑛 ∈ ℝ⁺ ↦ 𝐴) ⇝_𝑟 0)
66	65	adantr 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → (𝑛 ∈ ℝ⁺ ↦ 𝐴) ⇝_𝑟 0)
67	38, 64, 66	rlimi 15571	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∃𝑚 ∈ ℝ ∀𝑛 ∈ ℝ⁺ (𝑚 ≤ 𝑛 → (abs‘(𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1))))
68		simpr 489	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → 𝑚 ∈ ℝ)
69		dchrisum.3	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑀 ∈ ℕ)
70	69	nnred 12254	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑀 ∈ ℝ)
71	70	adantr 485	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → 𝑀 ∈ ℝ)
72	68, 71	ifcld 4533	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ)
73		0red 11217	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → 0 ∈ ℝ)
74	69	nngt0d 12291	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 < 𝑀)
75	74	adantr 485	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → 0 < 𝑀)
76		max1 13217	. . . . . . . . . . . . 13 ⊢ ((𝑀 ∈ ℝ ∧ 𝑚 ∈ ℝ) → 𝑀 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀))
77	70, 76	sylan 591	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → 𝑀 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀))
78	73, 71, 72, 75, 77	ltletrd 11376	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → 0 < if(𝑀 ≤ 𝑚, 𝑚, 𝑀))
79	72, 78	elrpd 13063	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ⁺)
80	79	adantlr 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ⁺)
81		nfv 1943	. . . . . . . . . . 11 ⊢ Ⅎ𝑛 𝑚 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀)
82		nfcv 2924	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛abs
83		nfcsb1v 3876	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑛⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴
84		nfcv 2924	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑛 −
85		nfcv 2924	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑛0
86	83, 84, 85	nfov 7442	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)
87	82, 86	nffv 6891	. . . . . . . . . . . 12 ⊢ Ⅎ𝑛(abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0))
88		nfcv 2924	. . . . . . . . . . . 12 ⊢ Ⅎ𝑛 <
89		nfcv 2924	. . . . . . . . . . . 12 ⊢ Ⅎ𝑛(𝑒 / ((2 · 𝑅) + 1))
90	87, 88, 89	nfbr 5157	. . . . . . . . . . 11 ⊢ Ⅎ𝑛(abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1))
91	81, 90	nfim 1925	. . . . . . . . . 10 ⊢ Ⅎ𝑛(𝑚 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀) → (abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1)))
92		breq2 5112	. . . . . . . . . . 11 ⊢ (𝑛 = if(𝑀 ≤ 𝑚, 𝑚, 𝑀) → (𝑚 ≤ 𝑛 ↔ 𝑚 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))
93		csbeq1a 3866	. . . . . . . . . . . . 13 ⊢ (𝑛 = if(𝑀 ≤ 𝑚, 𝑚, 𝑀) → 𝐴 = ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴)
94	93	fvoveq1d 7434	. . . . . . . . . . . 12 ⊢ (𝑛 = if(𝑀 ≤ 𝑚, 𝑚, 𝑀) → (abs‘(𝐴 − 0)) = (abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)))
95	94	breq1d 5118	. . . . . . . . . . 11 ⊢ (𝑛 = if(𝑀 ≤ 𝑚, 𝑚, 𝑀) → ((abs‘(𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1)) ↔ (abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1))))
96	92, 95	imbi12d 347	. . . . . . . . . 10 ⊢ (𝑛 = if(𝑀 ≤ 𝑚, 𝑚, 𝑀) → ((𝑚 ≤ 𝑛 → (abs‘(𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1))) ↔ (𝑚 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀) → (abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1)))))
97	91, 96	rspc 3568	. . . . . . . . 9 ⊢ (if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ⁺ → (∀𝑛 ∈ ℝ⁺ (𝑚 ≤ 𝑛 → (abs‘(𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1))) → (𝑚 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀) → (abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1)))))
98	80, 97	syl 18	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (∀𝑛 ∈ ℝ⁺ (𝑚 ≤ 𝑛 → (abs‘(𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1))) → (𝑚 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀) → (abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1)))))
99	70	ad2antrr 738	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → 𝑀 ∈ ℝ)
100		max2 13219	. . . . . . . . . 10 ⊢ ((𝑀 ∈ ℝ ∧ 𝑚 ∈ ℝ) → 𝑚 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀))
101	99, 100	sylancom 599	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → 𝑚 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀))
102	13	ad2antrr 738	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ∀𝑛 ∈ ℝ⁺ 𝐴 ∈ ℝ)
103	83	nfel1 2940	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑛⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 ∈ ℝ
104	93	eleq1d 2847	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = if(𝑀 ≤ 𝑚, 𝑚, 𝑀) → (𝐴 ∈ ℝ ↔ ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 ∈ ℝ))
105	103, 104	rspc 3568	. . . . . . . . . . . . . . . . . 18 ⊢ (if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ⁺ → (∀𝑛 ∈ ℝ⁺ 𝐴 ∈ ℝ → ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 ∈ ℝ))
106	80, 102, 105	sylc 66	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 ∈ ℝ)
107	106	recnd 11243	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 ∈ ℂ)
108	107	subid1d 11564	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0) = ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴)
109	108	fveq2d 6885	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) = (abs‘⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴))
110	72	adantlr 727	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ)
111	99, 76	sylancom 599	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → 𝑀 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀))
112		elicopnf 13478	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑀 ∈ ℝ → (if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ (𝑀[,)+∞) ↔ (if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ ∧ 𝑀 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))
113	99, 112	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ (𝑀[,)+∞) ↔ (if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ ∧ 𝑀 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))
114	110, 111, 113	mpbir2and 725	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ (𝑀[,)+∞))
115	44	ad2antrr 738	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → 𝑁 ∈ ℕ)
116		rpvmasum.1	. . . . . . . . . . . . . . . . . 18 ⊢ 1 = (0_g‘𝐺)
117	8	ad2antrr 738	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → 𝑋 ∈ 𝐷)
118		dchrisum.n1	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝑋 ≠ 1 )
119	118	ad2antrr 738	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → 𝑋 ≠ 1 )
120		dchrisum.2	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑥 → 𝐴 = 𝐵)
121	69	ad2antrr 738	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → 𝑀 ∈ ℕ)
122	12	ad4ant14 764	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑛 ∈ ℝ⁺) → 𝐴 ∈ ℝ)
123		simpll 778	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → 𝜑)
124		dchrisum.5	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (𝑛 ∈ ℝ⁺ ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑀 ≤ 𝑛 ∧ 𝑛 ≤ 𝑥)) → 𝐵 ≤ 𝐴)
125	123, 124	syl3an1 1180	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ (𝑛 ∈ ℝ⁺ ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑀 ≤ 𝑛 ∧ 𝑛 ≤ 𝑥)) → 𝐵 ≤ 𝐴)
126	65	ad2antrr 738	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (𝑛 ∈ ℝ⁺ ↦ 𝐴) ⇝_𝑟 0)
127	5, 7, 115, 4, 6, 116, 117, 119, 120, 121, 122, 125, 126, 30	dchrisumlema 27663	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ⁺ → ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 ∈ ℝ) ∧ (if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ (𝑀[,)+∞) → 0 ≤ ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴)))
128	127	simprd 500	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ (𝑀[,)+∞) → 0 ≤ ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴))
129	114, 128	mpd 16	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → 0 ≤ ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴)
130	106, 129	absidd 15481	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (abs‘⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) = ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴)
131	109, 130	eqtrd 2797	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) = ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴)
132	131	breq1d 5118	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1)) ↔ ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 < (𝑒 / ((2 · 𝑅) + 1))))
133		rpre 13031	. . . . . . . . . . . . . 14 ⊢ (𝑒 ∈ ℝ⁺ → 𝑒 ∈ ℝ)
134	133	ad2antlr 739	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → 𝑒 ∈ ℝ)
135	62	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((2 · 𝑅) + 1) ∈ ℝ⁺)
136	106, 134, 135	ltmuldiv2d 13114	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((((2 · 𝑅) + 1) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒 ↔ ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 < (𝑒 / ((2 · 𝑅) + 1))))
137	132, 136	bitr4d 285	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1)) ↔ (((2 · 𝑅) + 1) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒))
138	43	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (2 · 𝑅) ∈ ℝ)
139	135	rpred 13066	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((2 · 𝑅) + 1) ∈ ℝ)
140	138	lep1d 12152	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (2 · 𝑅) ≤ ((2 · 𝑅) + 1))
141	138, 139, 106, 129, 140	lemul1ad 12160	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ≤ (((2 · 𝑅) + 1) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴))
142	138, 106	remulcld 11245	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ∈ ℝ)
143	139, 106	remulcld 11245	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (((2 · 𝑅) + 1) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ∈ ℝ)
144		lelttr 11306	. . . . . . . . . . . . 13 ⊢ ((((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ∈ ℝ ∧ (((2 · 𝑅) + 1) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ∈ ℝ ∧ 𝑒 ∈ ℝ) → ((((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ≤ (((2 · 𝑅) + 1) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ∧ (((2 · 𝑅) + 1) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒) → ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒))
145	142, 143, 134, 144	syl3anc 1397	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ≤ (((2 · 𝑅) + 1) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ∧ (((2 · 𝑅) + 1) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒) → ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒))
146	141, 145	mpand 707	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((((2 · 𝑅) + 1) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒 → ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒))
147	137, 146	sylbid 243	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1)) → ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒))
148		1red 11215	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → 1 ∈ ℝ)
149	69	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → 𝑀 ∈ ℕ)
150	149	nnge1d 12290	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → 1 ≤ 𝑀)
151	148, 71, 72, 150, 77	letrd 11373	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → 1 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀))
152		flge1nn 13861	. . . . . . . . . . . . 13 ⊢ ((if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ ∧ 1 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) → (⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) ∈ ℕ)
153	72, 151, 152	syl2anc 595	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ) → (⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) ∈ ℕ)
154	153	adantlr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) ∈ ℕ)
155	44	ad2antrr 738	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → 𝑁 ∈ ℕ)
156	8	ad2antrr 738	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → 𝑋 ∈ 𝐷)
157	118	ad2antrr 738	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → 𝑋 ≠ 1 )
158	69	ad2antrr 738	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → 𝑀 ∈ ℕ)
159	12	ad4ant14 764	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) ∧ 𝑛 ∈ ℝ⁺) → 𝐴 ∈ ℝ)
160	124	3adant1r 1195	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ (𝑛 ∈ ℝ⁺ ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑀 ≤ 𝑛 ∧ 𝑛 ≤ 𝑥)) → 𝐵 ≤ 𝐴)
161	160	3adant1r 1195	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) ∧ (𝑛 ∈ ℝ⁺ ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑀 ≤ 𝑛 ∧ 𝑛 ≤ 𝑥)) → 𝐵 ≤ 𝐴)
162	65	ad2antrr 738	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → (𝑛 ∈ ℝ⁺ ↦ 𝐴) ⇝_𝑟 0)
163	41	ad2antrr 738	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → 𝑅 ∈ ℝ)
164	47	ad2antrr 738	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → ∀𝑢 ∈ (0..^𝑁)(abs‘Σ𝑛 ∈ (0..^𝑢)(𝑋‘(𝐿‘𝑛))) ≤ 𝑅)
165	79	adantr 485	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ⁺)
166	77	adantr 485	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → 𝑀 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀))
167	72	adantr 485	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ)
168		fllep1 13841	. . . . . . . . . . . . . . . 16 ⊢ (if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ∈ ℝ → if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ≤ ((⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) + 1))
169	167, 168	syl 18	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → if(𝑀 ≤ 𝑚, 𝑚, 𝑀) ≤ ((⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) + 1))
170	153	adantr 485	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → (⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) ∈ ℕ)
171		simpr 489	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))
172	5, 7, 155, 4, 6, 116, 156, 157, 120, 158, 159, 161, 162, 30, 163, 164, 165, 166, 169, 170, 171	dchrisumlem2 27665	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → (abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) ≤ ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴))
173	172	adantllr 731	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → (abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) ≤ ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴))
174	34	ad3antrrr 742	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → seq1( + , 𝐹):ℕ⟶ℂ)
175		eluznn 12948	. . . . . . . . . . . . . . . . . 18 ⊢ (((⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) ∈ ℕ ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → 𝑘 ∈ ℕ)
176	154, 175	sylan 591	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → 𝑘 ∈ ℕ)
177	174, 176	ffvelcdmd 7080	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → (seq1( + , 𝐹)‘𝑘) ∈ ℂ)
178	154	adantr 485	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → (⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) ∈ ℕ)
179	174, 178	ffvelcdmd 7080	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))) ∈ ℂ)
180	177, 179	subcld 11575	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → ((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) ∈ ℂ)
181	180	abscld 15497	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → (abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) ∈ ℝ)
182	142	adantr 485	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ∈ ℝ)
183	134	adantr 485	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → 𝑒 ∈ ℝ)
184		lelttr 11306	. . . . . . . . . . . . . 14 ⊢ (((abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) ∈ ℝ ∧ ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ∈ ℝ ∧ 𝑒 ∈ ℝ) → (((abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) ≤ ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ∧ ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒) → (abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) < 𝑒))
185	181, 182, 183, 184	syl3anc 1397	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → (((abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) ≤ ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) ∧ ((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒) → (abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) < 𝑒))
186	173, 185	mpand 707	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) ∧ 𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))) → (((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒 → (abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) < 𝑒))
187	186	ralrimdva 3164	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒 → ∀𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) < 𝑒))
188		fveq2 6881	. . . . . . . . . . . . 13 ⊢ (𝑗 = (⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) → (ℤ_≥‘𝑗) = (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))
189		fveq2 6881	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = (⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) → (seq1( + , 𝐹)‘𝑗) = (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))
190	189	oveq2d 7428	. . . . . . . . . . . . . . 15 ⊢ (𝑗 = (⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) → ((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗)) = ((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))))
191	190	fveq2d 6885	. . . . . . . . . . . . . 14 ⊢ (𝑗 = (⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) → (abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗))) = (abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))))
192	191	breq1d 5118	. . . . . . . . . . . . 13 ⊢ (𝑗 = (⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) → ((abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗))) < 𝑒 ↔ (abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) < 𝑒))
193	188, 192	raleqbidv 3337	. . . . . . . . . . . 12 ⊢ (𝑗 = (⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) → (∀𝑘 ∈ (ℤ_≥‘𝑗)(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗))) < 𝑒 ↔ ∀𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) < 𝑒))
194	193	rspcev 3580	. . . . . . . . . . 11 ⊢ (((⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)) ∈ ℕ ∧ ∀𝑘 ∈ (ℤ_≥‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀)))(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘(⌊‘if(𝑀 ≤ 𝑚, 𝑚, 𝑀))))) < 𝑒) → ∃𝑗 ∈ ℕ ∀𝑘 ∈ (ℤ_≥‘𝑗)(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗))) < 𝑒)
195	154, 187, 194	syl6an 696	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (((2 · 𝑅) · ⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴) < 𝑒 → ∃𝑗 ∈ ℕ ∀𝑘 ∈ (ℤ_≥‘𝑗)(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗))) < 𝑒))
196	147, 195	syld 48	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1)) → ∃𝑗 ∈ ℕ ∀𝑘 ∈ (ℤ_≥‘𝑗)(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗))) < 𝑒))
197	101, 196	embantd 60	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → ((𝑚 ≤ if(𝑀 ≤ 𝑚, 𝑚, 𝑀) → (abs‘(⦋if(𝑀 ≤ 𝑚, 𝑚, 𝑀) / 𝑛⦌𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1))) → ∃𝑗 ∈ ℕ ∀𝑘 ∈ (ℤ_≥‘𝑗)(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗))) < 𝑒))
198	98, 197	syld 48	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑚 ∈ ℝ) → (∀𝑛 ∈ ℝ⁺ (𝑚 ≤ 𝑛 → (abs‘(𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1))) → ∃𝑗 ∈ ℕ ∀𝑘 ∈ (ℤ_≥‘𝑗)(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗))) < 𝑒))
199	198	rexlimdva 3165	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → (∃𝑚 ∈ ℝ ∀𝑛 ∈ ℝ⁺ (𝑚 ≤ 𝑛 → (abs‘(𝐴 − 0)) < (𝑒 / ((2 · 𝑅) + 1))) → ∃𝑗 ∈ ℕ ∀𝑘 ∈ (ℤ_≥‘𝑗)(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗))) < 𝑒))
200	67, 199	mpd 16	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∃𝑗 ∈ ℕ ∀𝑘 ∈ (ℤ_≥‘𝑗)(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗))) < 𝑒)
201	200	ralrimiva 3156	. . . 4 ⊢ (𝜑 → ∀𝑒 ∈ ℝ⁺ ∃𝑗 ∈ ℕ ∀𝑘 ∈ (ℤ_≥‘𝑗)(abs‘((seq1( + , 𝐹)‘𝑘) − (seq1( + , 𝐹)‘𝑗))) < 𝑒)
202		seqex 14046	. . . . 5 ⊢ seq1( + , 𝐹) ∈ V
203	202	a1i 11	. . . 4 ⊢ (𝜑 → seq1( + , 𝐹) ∈ V)
204	1, 35, 201, 203	caucvg 15737	. . 3 ⊢ (𝜑 → seq1( + , 𝐹) ∈ dom ⇝ )
205	202	eldm 5889	. . 3 ⊢ (seq1( + , 𝐹) ∈ dom ⇝ ↔ ∃𝑡seq1( + , 𝐹) ⇝ 𝑡)
206	204, 205	sylib 221	. 2 ⊢ (𝜑 → ∃𝑡seq1( + , 𝐹) ⇝ 𝑡)
207		simpr 489	. . . . 5 ⊢ ((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) → seq1( + , 𝐹) ⇝ 𝑡)
208		elrege0 13487	. . . . . . . 8 ⊢ ((2 · 𝑅) ∈ (0[,)+∞) ↔ ((2 · 𝑅) ∈ ℝ ∧ 0 ≤ (2 · 𝑅)))
209	43, 61, 208	sylanbrc 594	. . . . . . 7 ⊢ (𝜑 → (2 · 𝑅) ∈ (0[,)+∞))
210	209	adantr 485	. . . . . 6 ⊢ ((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) → (2 · 𝑅) ∈ (0[,)+∞))
211		eqid 2762	. . . . . . . 8 ⊢ (ℤ_≥‘(⌊‘𝑚)) = (ℤ_≥‘(⌊‘𝑚))
212		pnfxr 11269	. . . . . . . . . . . 12 ⊢ +∞ ∈ ℝ^*
213		icossre 13461	. . . . . . . . . . . 12 ⊢ ((𝑀 ∈ ℝ ∧ +∞ ∈ ℝ^*) → (𝑀[,)+∞) ⊆ ℝ)
214	70, 212, 213	sylancl 597	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑀[,)+∞) ⊆ ℝ)
215	214	sselda 3936	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (𝑀[,)+∞)) → 𝑚 ∈ ℝ)
216	215	adantlr 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → 𝑚 ∈ ℝ)
217	216	flcld 13838	. . . . . . . 8 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → (⌊‘𝑚) ∈ ℤ)
218		simplr 780	. . . . . . . . . 10 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → seq1( + , 𝐹) ⇝ 𝑡)
219	34	ad2antrr 738	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → seq1( + , 𝐹):ℕ⟶ℂ)
220		1red 11215	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → 1 ∈ ℝ)
221	70	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → 𝑀 ∈ ℝ)
222	69	ad2antrr 738	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → 𝑀 ∈ ℕ)
223	222	nnge1d 12290	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → 1 ≤ 𝑀)
224		elicopnf 13478	. . . . . . . . . . . . . . . 16 ⊢ (𝑀 ∈ ℝ → (𝑚 ∈ (𝑀[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 𝑀 ≤ 𝑚)))
225	70, 224	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑚 ∈ (𝑀[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 𝑀 ≤ 𝑚)))
226	225	simplbda 504	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑚 ∈ (𝑀[,)+∞)) → 𝑀 ≤ 𝑚)
227	226	adantlr 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → 𝑀 ≤ 𝑚)
228	220, 221, 216, 223, 227	letrd 11373	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → 1 ≤ 𝑚)
229		flge1nn 13861	. . . . . . . . . . . 12 ⊢ ((𝑚 ∈ ℝ ∧ 1 ≤ 𝑚) → (⌊‘𝑚) ∈ ℕ)
230	216, 228, 229	syl2anc 595	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → (⌊‘𝑚) ∈ ℕ)
231	219, 230	ffvelcdmd 7080	. . . . . . . . . 10 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → (seq1( + , 𝐹)‘(⌊‘𝑚)) ∈ ℂ)
232		nnex 12245	. . . . . . . . . . . 12 ⊢ ℕ ∈ V
233	232	mptex 7221	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ ↦ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))) ∈ V
234	233	a1i 11	. . . . . . . . . 10 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → (𝑘 ∈ ℕ ↦ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))) ∈ V)
235	219	adantr 485	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → seq1( + , 𝐹):ℕ⟶ℂ)
236		eluznn 12948	. . . . . . . . . . . 12 ⊢ (((⌊‘𝑚) ∈ ℕ ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑖 ∈ ℕ)
237	230, 236	sylan 591	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑖 ∈ ℕ)
238	235, 237	ffvelcdmd 7080	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → (seq1( + , 𝐹)‘𝑖) ∈ ℂ)
239		fveq2 6881	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑖 → (seq1( + , 𝐹)‘𝑘) = (seq1( + , 𝐹)‘𝑖))
240	239	oveq2d 7428	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑖 → ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)) = ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑖)))
241		eqid 2762	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ ↦ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))) = (𝑘 ∈ ℕ ↦ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)))
242		ovex 7445	. . . . . . . . . . . 12 ⊢ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)) ∈ V
243	240, 241, 242	fvmpt3i 6995	. . . . . . . . . . 11 ⊢ (𝑖 ∈ ℕ → ((𝑘 ∈ ℕ ↦ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)))‘𝑖) = ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑖)))
244	237, 243	syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((𝑘 ∈ ℕ ↦ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)))‘𝑖) = ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑖)))
245	211, 217, 218, 231, 234, 238, 244	climsubc2 15697	. . . . . . . . 9 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → (𝑘 ∈ ℕ ↦ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))) ⇝ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑡))
246	232	mptex 7221	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ ↦ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)))) ∈ V
247	246	a1i 11	. . . . . . . . 9 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → (𝑘 ∈ ℕ ↦ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)))) ∈ V)
248		fvex 6894	. . . . . . . . . . . . . 14 ⊢ (seq1( + , 𝐹)‘(⌊‘𝑚)) ∈ V
249	248	fvconst2 7202	. . . . . . . . . . . . 13 ⊢ (𝑖 ∈ ℕ → ((ℕ × {(seq1( + , 𝐹)‘(⌊‘𝑚))})‘𝑖) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
250	237, 249	syl 18	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((ℕ × {(seq1( + , 𝐹)‘(⌊‘𝑚))})‘𝑖) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
251	250	oveq1d 7427	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → (((ℕ × {(seq1( + , 𝐹)‘(⌊‘𝑚))})‘𝑖) − (seq1( + , 𝐹)‘𝑖)) = ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑖)))
252	244, 251	eqtr4d 2800	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((𝑘 ∈ ℕ ↦ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)))‘𝑖) = (((ℕ × {(seq1( + , 𝐹)‘(⌊‘𝑚))})‘𝑖) − (seq1( + , 𝐹)‘𝑖)))
253	231	adantr 485	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → (seq1( + , 𝐹)‘(⌊‘𝑚)) ∈ ℂ)
254	250, 253	eqeltrd 2862	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((ℕ × {(seq1( + , 𝐹)‘(⌊‘𝑚))})‘𝑖) ∈ ℂ)
255	254, 238	subcld 11575	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → (((ℕ × {(seq1( + , 𝐹)‘(⌊‘𝑚))})‘𝑖) − (seq1( + , 𝐹)‘𝑖)) ∈ ℂ)
256	252, 255	eqeltrd 2862	. . . . . . . . 9 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((𝑘 ∈ ℕ ↦ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)))‘𝑖) ∈ ℂ)
257	240	fveq2d 6885	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑖 → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))) = (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑖))))
258		eqid 2762	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ ↦ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)))) = (𝑘 ∈ ℕ ↦ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))))
259		fvex 6894	. . . . . . . . . . . 12 ⊢ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))) ∈ V
260	257, 258, 259	fvmpt3i 6995	. . . . . . . . . . 11 ⊢ (𝑖 ∈ ℕ → ((𝑘 ∈ ℕ ↦ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))))‘𝑖) = (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑖))))
261	237, 260	syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((𝑘 ∈ ℕ ↦ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))))‘𝑖) = (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑖))))
262	244	fveq2d 6885	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → (abs‘((𝑘 ∈ ℕ ↦ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)))‘𝑖)) = (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑖))))
263	261, 262	eqtr4d 2800	. . . . . . . . 9 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((𝑘 ∈ ℕ ↦ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))))‘𝑖) = (abs‘((𝑘 ∈ ℕ ↦ ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)))‘𝑖)))
264	211, 245, 247, 217, 256, 263	climabs 15662	. . . . . . . 8 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → (𝑘 ∈ ℕ ↦ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘)))) ⇝ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑡)))
265	43	ad2antrr 738	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → (2 · 𝑅) ∈ ℝ)
266		0red 11217	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑚 ∈ (𝑀[,)+∞)) → 0 ∈ ℝ)
267	70	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑚 ∈ (𝑀[,)+∞)) → 𝑀 ∈ ℝ)
268	74	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑚 ∈ (𝑀[,)+∞)) → 0 < 𝑀)
269	266, 267, 215, 268, 226	ltletrd 11376	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑚 ∈ (𝑀[,)+∞)) → 0 < 𝑚)
270	215, 269	elrpd 13063	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑚 ∈ (𝑀[,)+∞)) → 𝑚 ∈ ℝ⁺)
271		nfcsb1v 3876	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛⦋𝑚 / 𝑛⦌𝐴
272	271	nfel1 2940	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑛⦋𝑚 / 𝑛⦌𝐴 ∈ ℝ
273		csbeq1a 3866	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = 𝑚 → 𝐴 = ⦋𝑚 / 𝑛⦌𝐴)
274	273	eleq1d 2847	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 𝑚 → (𝐴 ∈ ℝ ↔ ⦋𝑚 / 𝑛⦌𝐴 ∈ ℝ))
275	272, 274	rspc 3568	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ ℝ⁺ → (∀𝑛 ∈ ℝ⁺ 𝐴 ∈ ℝ → ⦋𝑚 / 𝑛⦌𝐴 ∈ ℝ))
276	13, 275	mpan9 515	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → ⦋𝑚 / 𝑛⦌𝐴 ∈ ℝ)
277	270, 276	syldan 602	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ (𝑀[,)+∞)) → ⦋𝑚 / 𝑛⦌𝐴 ∈ ℝ)
278	277	adantlr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → ⦋𝑚 / 𝑛⦌𝐴 ∈ ℝ)
279	265, 278	remulcld 11245	. . . . . . . . . 10 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴) ∈ ℝ)
280	279	recnd 11243	. . . . . . . . 9 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴) ∈ ℂ)
281		1z 12630	. . . . . . . . 9 ⊢ 1 ∈ ℤ
282	1	eqimss2i 3997	. . . . . . . . . 10 ⊢ (ℤ_≥‘1) ⊆ ℕ
283	282, 232	climconst2 15606	. . . . . . . . 9 ⊢ ((((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴) ∈ ℂ ∧ 1 ∈ ℤ) → (ℕ × {((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴)}) ⇝ ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴))
284	280, 281, 283	sylancl 597	. . . . . . . 8 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → (ℕ × {((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴)}) ⇝ ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴))
285	253, 238	subcld 11575	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑖)) ∈ ℂ)
286	285	abscld 15497	. . . . . . . . 9 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑖))) ∈ ℝ)
287	261, 286	eqeltrd 2862	. . . . . . . 8 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((𝑘 ∈ ℕ ↦ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))))‘𝑖) ∈ ℝ)
288		ovex 7445	. . . . . . . . . . 11 ⊢ ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴) ∈ V
289	288	fvconst2 7202	. . . . . . . . . 10 ⊢ (𝑖 ∈ ℕ → ((ℕ × {((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴)})‘𝑖) = ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴))
290	237, 289	syl 18	. . . . . . . . 9 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((ℕ × {((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴)})‘𝑖) = ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴))
291	279	adantr 485	. . . . . . . . 9 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴) ∈ ℝ)
292	290, 291	eqeltrd 2862	. . . . . . . 8 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((ℕ × {((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴)})‘𝑖) ∈ ℝ)
293		simplll 786	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝜑)
294	293, 44	syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑁 ∈ ℕ)
295	293, 8	syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑋 ∈ 𝐷)
296	293, 118	syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑋 ≠ 1 )
297	222	adantr 485	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑀 ∈ ℕ)
298	293, 12	sylan 591	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) ∧ 𝑛 ∈ ℝ⁺) → 𝐴 ∈ ℝ)
299	293, 124	syl3an1 1180	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) ∧ (𝑛 ∈ ℝ⁺ ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑀 ≤ 𝑛 ∧ 𝑛 ≤ 𝑥)) → 𝐵 ≤ 𝐴)
300	293, 65	syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → (𝑛 ∈ ℝ⁺ ↦ 𝐴) ⇝_𝑟 0)
301	293, 41	syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑅 ∈ ℝ)
302	293, 47	syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ∀𝑢 ∈ (0..^𝑁)(abs‘Σ𝑛 ∈ (0..^𝑢)(𝑋‘(𝐿‘𝑛))) ≤ 𝑅)
303	270	adantlr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → 𝑚 ∈ ℝ⁺)
304	303	adantr 485	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑚 ∈ ℝ⁺)
305	227	adantr 485	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑀 ≤ 𝑚)
306	216	adantr 485	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑚 ∈ ℝ)
307		reflcl 13836	. . . . . . . . . . . 12 ⊢ (𝑚 ∈ ℝ → (⌊‘𝑚) ∈ ℝ)
308		peano2re 11389	. . . . . . . . . . . 12 ⊢ ((⌊‘𝑚) ∈ ℝ → ((⌊‘𝑚) + 1) ∈ ℝ)
309	306, 307, 308	3syl 19	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((⌊‘𝑚) + 1) ∈ ℝ)
310		flltp1 13840	. . . . . . . . . . . 12 ⊢ (𝑚 ∈ ℝ → 𝑚 < ((⌊‘𝑚) + 1))
311	306, 310	syl 18	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑚 < ((⌊‘𝑚) + 1))
312	306, 309, 311	ltled 11364	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑚 ≤ ((⌊‘𝑚) + 1))
313	230	adantr 485	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → (⌊‘𝑚) ∈ ℕ)
314		simpr 489	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚)))
315	5, 7, 294, 4, 6, 116, 295, 296, 120, 297, 298, 299, 300, 30, 301, 302, 304, 305, 312, 313, 314	dchrisumlem2 27665	. . . . . . . . 9 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → (abs‘((seq1( + , 𝐹)‘𝑖) − (seq1( + , 𝐹)‘(⌊‘𝑚)))) ≤ ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴))
316	253, 238	abssubd 15514	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑖))) = (abs‘((seq1( + , 𝐹)‘𝑖) − (seq1( + , 𝐹)‘(⌊‘𝑚)))))
317	261, 316	eqtrd 2797	. . . . . . . . 9 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((𝑘 ∈ ℕ ↦ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))))‘𝑖) = (abs‘((seq1( + , 𝐹)‘𝑖) − (seq1( + , 𝐹)‘(⌊‘𝑚)))))
318	315, 317, 290	3brtr4d 5142	. . . . . . . 8 ⊢ ((((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) ∧ 𝑖 ∈ (ℤ_≥‘(⌊‘𝑚))) → ((𝑘 ∈ ℕ ↦ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − (seq1( + , 𝐹)‘𝑘))))‘𝑖) ≤ ((ℕ × {((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴)})‘𝑖))
319	211, 217, 264, 284, 287, 292, 318	climle 15698	. . . . . . 7 ⊢ (((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) ∧ 𝑚 ∈ (𝑀[,)+∞)) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑡)) ≤ ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴))
320	319	ralrimiva 3156	. . . . . 6 ⊢ ((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) → ∀𝑚 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑡)) ≤ ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴))
321		oveq1 7419	. . . . . . . . . 10 ⊢ (𝑐 = (2 · 𝑅) → (𝑐 · 𝐵) = ((2 · 𝑅) · 𝐵))
322	321	breq2d 5120	. . . . . . . . 9 ⊢ (𝑐 = (2 · 𝑅) → ((abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵) ↔ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ ((2 · 𝑅) · 𝐵)))
323	322	ralbidv 3187	. . . . . . . 8 ⊢ (𝑐 = (2 · 𝑅) → (∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵) ↔ ∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ ((2 · 𝑅) · 𝐵)))
324		2fveq3 6886	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑥 → (seq1( + , 𝐹)‘(⌊‘𝑚)) = (seq1( + , 𝐹)‘(⌊‘𝑥)))
325	324	fvoveq1d 7434	. . . . . . . . . 10 ⊢ (𝑚 = 𝑥 → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑡)) = (abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)))
326		vex 3458	. . . . . . . . . . . . 13 ⊢ 𝑚 ∈ V
327	326	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑚 = 𝑥 → 𝑚 ∈ V)
328		equequ2 2055	. . . . . . . . . . . . . 14 ⊢ (𝑚 = 𝑥 → (𝑛 = 𝑚 ↔ 𝑛 = 𝑥))
329	328	biimpa 481	. . . . . . . . . . . . 13 ⊢ ((𝑚 = 𝑥 ∧ 𝑛 = 𝑚) → 𝑛 = 𝑥)
330	329, 120	syl 18	. . . . . . . . . . . 12 ⊢ ((𝑚 = 𝑥 ∧ 𝑛 = 𝑚) → 𝐴 = 𝐵)
331	327, 330	csbied 3888	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑥 → ⦋𝑚 / 𝑛⦌𝐴 = 𝐵)
332	331	oveq2d 7428	. . . . . . . . . 10 ⊢ (𝑚 = 𝑥 → ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴) = ((2 · 𝑅) · 𝐵))
333	325, 332	breq12d 5121	. . . . . . . . 9 ⊢ (𝑚 = 𝑥 → ((abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑡)) ≤ ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴) ↔ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ ((2 · 𝑅) · 𝐵)))
334	333	cbvralvw 3242	. . . . . . . 8 ⊢ (∀𝑚 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑡)) ≤ ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴) ↔ ∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ ((2 · 𝑅) · 𝐵))
335	323, 334	bitr4di 292	. . . . . . 7 ⊢ (𝑐 = (2 · 𝑅) → (∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵) ↔ ∀𝑚 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑡)) ≤ ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴)))
336	335	rspcev 3580	. . . . . 6 ⊢ (((2 · 𝑅) ∈ (0[,)+∞) ∧ ∀𝑚 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑡)) ≤ ((2 · 𝑅) · ⦋𝑚 / 𝑛⦌𝐴)) → ∃𝑐 ∈ (0[,)+∞)∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵))
337	210, 320, 336	syl2anc 595	. . . . 5 ⊢ ((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) → ∃𝑐 ∈ (0[,)+∞)∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵))
338		r19.42v 3196	. . . . 5 ⊢ (∃𝑐 ∈ (0[,)+∞)(seq1( + , 𝐹) ⇝ 𝑡 ∧ ∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵)) ↔ (seq1( + , 𝐹) ⇝ 𝑡 ∧ ∃𝑐 ∈ (0[,)+∞)∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵)))
339	207, 337, 338	sylanbrc 594	. . . 4 ⊢ ((𝜑 ∧ seq1( + , 𝐹) ⇝ 𝑡) → ∃𝑐 ∈ (0[,)+∞)(seq1( + , 𝐹) ⇝ 𝑡 ∧ ∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵)))
340	339	ex 417	. . 3 ⊢ (𝜑 → (seq1( + , 𝐹) ⇝ 𝑡 → ∃𝑐 ∈ (0[,)+∞)(seq1( + , 𝐹) ⇝ 𝑡 ∧ ∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵))))
341	340	eximdv 1946	. 2 ⊢ (𝜑 → (∃𝑡seq1( + , 𝐹) ⇝ 𝑡 → ∃𝑡∃𝑐 ∈ (0[,)+∞)(seq1( + , 𝐹) ⇝ 𝑡 ∧ ∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵))))
342	206, 341	mpd 16	1 ⊢ (𝜑 → ∃𝑡∃𝑐 ∈ (0[,)+∞)(seq1( + , 𝐹) ⇝ 𝑡 ∧ ∀𝑥 ∈ (𝑀[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑡)) ≤ (𝑐 · 𝐵)))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 400 ∧ w3a 1102 = wceq 1569 ∃wex 1808 ∈ wcel 2142 ≠ wne 2957 ∀wral 3078 ∃wrex 3088 Vcvv 3454 ⦋csb 3852 ⊆ wss 3904 ∅c0 4285 ifcif 4486 {csn 4588 class class class wbr 5108 ↦ cmpt 5191 × cxp 5658 dom cdm 5660 ⟶wf 6532 ‘cfv 6536 (class class class)co 7412 ℂcc 11104 ℝcr 11105 0cc0 11106 1c1 11107 + caddc 11109 · cmul 11111 +∞cpnf 11246 ℝ^*cxr 11248 < clt 11249 ≤ cle 11250 − cmin 11447 / cdiv 11877 ℕcn 12239 2c2 12301 ℤcz 12597 ℤ_≥cuz 12868 ℝ⁺crp 13022 [,)cico 13380 ..^cfzo 13689 ⌊cfl 13830 seqcseq 14044 abscabs 15292 ⇝ cli 15542 ⇝_𝑟 crli 15543 Σcsu 15744 Basecbs 17275 0_gc0g 17498 ℤRHomczrh 21660 ℤ/nℤczn 21663 DChrcdchr 27407

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1824 ax-4 1838 ax-5 1939 ax-6 1996 ax-7 2037 ax-8 2144 ax-9 2152 ax-10 2175 ax-11 2191 ax-12 2212 ax-ext 2734 ax-rep 5237 ax-sep 5256 ax-nul 5268 ax-pow 5335 ax-pr 5403 ax-un 7734 ax-inf2 9608 ax-cnex 11162 ax-resscn 11163 ax-1cn 11164 ax-icn 11165 ax-addcl 11166 ax-addrcl 11167 ax-mulcl 11168 ax-mulrcl 11169 ax-mulcom 11170 ax-addass 11171 ax-mulass 11172 ax-distr 11173 ax-i2m1 11174 ax-1ne0 11175 ax-1rid 11176 ax-rnegex 11177 ax-rrecex 11178 ax-cnre 11179 ax-pre-lttri 11180 ax-pre-lttrn 11181 ax-pre-ltadd 11182 ax-pre-mulgt0 11183 ax-pre-sup 11184 ax-addf 11185 ax-mulf 11186

This proof depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1103 df-3an 1104 df-tru 1572 df-fal 1582 df-ex 1809 df-nf 1813 df-sb 2096 df-mo 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-nel 3064 df-ral 3079 df-rex 3089 df-rmo 3368 df-reu 3369 df-rab 3416 df-v 3456 df-sbc 3744 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-pss 3924 df-nul 4286 df-if 4487 df-pw 4563 df-sn 4589 df-pr 4591 df-tp 4593 df-op 4595 df-uni 4872 df-int 4912 df-iun 4957 df-br 5109 df-opab 5173 df-mpt 5192 df-tr 5218 df-id 5555 df-eprel 5560 df-po 5568 df-so 5569 df-fr 5613 df-se 5614 df-we 5615 df-xp 5666 df-rel 5667 df-cnv 5668 df-co 5669 df-dm 5670 df-rn 5671 df-res 5672 df-ima 5673 df-pred 6302 df-ord 6363 df-on 6364 df-lim 6365 df-suc 6366 df-iota 6492 df-fun 6538 df-fn 6539 df-f 6540 df-f1 6541 df-fo 6542 df-f1o 6543 df-fv 6544 df-isom 6545 df-riota 7369 df-ov 7415 df-oprab 7416 df-mpo 7417 df-of 7676 df-om 7861 df-1st 7984 df-2nd 7985 df-tpos 8220 df-frecs 8276 df-wrecs 8307 df-recs 8356 df-rdg 8395 df-1o 8451 df-oadd 8455 df-er 8692 df-ec 8694 df-qs 8698 df-map 8824 df-pm 8825 df-en 8942 df-dom 8943 df-sdom 8944 df-fin 8945 df-sup 9400 df-inf 9401 df-oi 9470 df-card 9932 df-pnf 11251 df-mnf 11252 df-xr 11253 df-ltxr 11254 df-le 11255 df-sub 11449 df-neg 11450 df-div 11878 df-nn 12240 df-2 12309 df-3 12310 df-4 12311 df-5 12312 df-6 12313 df-7 12314 df-8 12315 df-9 12316 df-n0 12511 df-xnn0 12584 df-z 12598 df-dec 12718 df-uz 12869 df-rp 13023 df-ico 13384 df-fz 13542 df-fzo 13690 df-fl 13832 df-mod 13910 df-seq 14045 df-exp 14105 df-hash 14374 df-cj 15157 df-re 15158 df-im 15159 df-sqrt 15293 df-abs 15294 df-limsup 15529 df-clim 15546 df-rlim 15547 df-sum 15745 df-dvds 16317 df-gcd 16559 df-phi 16831 df-struct 17213 df-sets 17230 df-slot 17248 df-ndx 17260 df-base 17276 df-ress 17297 df-plusg 17329 df-mulr 17330 df-starv 17331 df-sca 17332 df-vsca 17333 df-ip 17334 df-tset 17335 df-ple 17336 df-ds 17338 df-unif 17339 df-0g 17500 df-imas 17568 df-qus 17569 df-mgm 18704 df-sgrp 18783 df-mnd 18799 df-mhm 18847 df-grp 19009 df-minusg 19010 df-sbg 19011 df-mulg 19140 df-subg 19195 df-nsg 19196 df-eqg 19197 df-ghm 19290 df-cmn 19858 df-abl 19859 df-mgp 20223 df-rng 20237 df-ur 20270 df-ring 20323 df-cring 20324 df-oppr 20426 df-dvdsr 20446 df-unit 20447 df-invr 20477 df-rhm 20561 df-subrng 20656 df-subrg 20680 df-lmod 20994 df-lss 21064 df-lsp 21104 df-sra 21305 df-rgmod 21306 df-lidl 21343 df-rsp 21344 df-2idl 21400 df-cnfld 21534 df-zring 21608 df-zrh 21664 df-zn 21667 df-dchr 27408

This theorem is used by: dchrisum 27667

W3C validator