dchrisum0lem1b - Metamath Proof Explorer

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

Theorem dchrisum0lem1b 27791

Description: Lemma for dchrisum0lem1 27792. (Contributed by Mario Carneiro, 7-Jun-2016.)

**Hypotheses**
Ref	Expression
rpvmasum.z	⊢ 𝑍 = (ℤ/nℤ‘𝑁)
rpvmasum.l	⊢ 𝐿 = (ℤRHom‘𝑍)
rpvmasum.a	⊢ (𝜑 → 𝑁 ∈ ℕ)
rpvmasum2.g	⊢ 𝐺 = (DChr‘𝑁)
rpvmasum2.d	⊢ 𝐷 = (Base‘𝐺)
rpvmasum2.1	⊢ 1 = (0_g‘𝐺)
rpvmasum2.w	⊢ 𝑊 = {𝑦 ∈ (𝐷 ∖ { 1 }) ∣ Σ𝑚 ∈ ℕ ((𝑦‘(𝐿‘𝑚)) / 𝑚) = 0}
dchrisum0.b	⊢ (𝜑 → 𝑋 ∈ 𝑊)
dchrisum0lem1.f	⊢ 𝐹 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) / (√‘𝑎)))
dchrisum0.c	⊢ (𝜑 → 𝐶 ∈ (0[,)+∞))
dchrisum0.s	⊢ (𝜑 → seq1( + , 𝐹) ⇝ 𝑆)
dchrisum0.1	⊢ (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / (√‘𝑦)))

**Assertion**
Ref	Expression
dchrisum0lem1b	⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ≤ ((2 · 𝐶) / (√‘𝑥)))

Distinct variable groups: 𝑥,𝑚,𝑦, 1 𝑚,𝑑,𝑥,𝑦,𝐶 𝐹,𝑑,𝑥,𝑦 𝑎,𝑑,𝑚,𝑥,𝑦 𝑚,𝑁,𝑥,𝑦 𝜑,𝑑,𝑚,𝑥 𝑆,𝑑,𝑚,𝑥,𝑦 𝑥,𝑊 𝑚,𝑍,𝑥,𝑦 𝐷,𝑚,𝑥,𝑦 𝐿,𝑎,𝑑,𝑚,𝑥,𝑦 𝑋,𝑎,𝑑,𝑚,𝑥,𝑦 𝑚,𝐹 Allowed substitution hints: 𝜑(𝑦, 𝑎) 𝐶(𝑎) 𝐷(𝑎, 𝑑) 𝑆(𝑎) 1 (𝑎, 𝑑) 𝐹(𝑎) 𝐺(𝑥, 𝑦, 𝑚, 𝑎, 𝑑) 𝑁(𝑎, 𝑑) 𝑊(𝑦, 𝑚, 𝑎, 𝑑) 𝑍(𝑎, 𝑑)

**Proof of Theorem dchrisum0lem1b**
Step	Hyp	Ref	Expression
1		fzfid 14070	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ∈ Fin)
2		ssun2 4125	. . . . . . 7 ⊢ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ⊆ ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))))
3		simpr 490	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝑥 ∈ ℝ⁺)
4	3	rprege0d 13126	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
5		flge0nn0 13914	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ₀)
6	4, 5	syl 18	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (⌊‘𝑥) ∈ ℕ₀)
7		nn0p1nn 12600	. . . . . . . . . . 11 ⊢ ((⌊‘𝑥) ∈ ℕ₀ → ((⌊‘𝑥) + 1) ∈ ℕ)
8	6, 7	syl 18	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((⌊‘𝑥) + 1) ∈ ℕ)
9	8	adantr 486	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((⌊‘𝑥) + 1) ∈ ℕ)
10		nnuz 12959	. . . . . . . . 9 ⊢ ℕ = (ℤ_≥‘1)
11	9, 10	eleqtrdi 2870	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((⌊‘𝑥) + 1) ∈ (ℤ_≥‘1))
12		dchrisum0lem1a 27762	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝑥 ≤ ((𝑥↑2) / 𝑑) ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ_≥‘(⌊‘𝑥))))
13	12	simprd 501	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ_≥‘(⌊‘𝑥)))
14		fzsplit2 13637	. . . . . . . 8 ⊢ ((((⌊‘𝑥) + 1) ∈ (ℤ_≥‘1) ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ_≥‘(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑑))) = ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))))
15	11, 13, 14	syl2anc 596	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑑))) = ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))))
16	2, 15	sseqtrrid 3974	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ⊆ (1...(⌊‘((𝑥↑2) / 𝑑))))
17	16	sselda 3931	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑))))
18		rpvmasum2.g	. . . . . . 7 ⊢ 𝐺 = (DChr‘𝑁)
19		rpvmasum.z	. . . . . . 7 ⊢ 𝑍 = (ℤ/nℤ‘𝑁)
20		rpvmasum2.d	. . . . . . 7 ⊢ 𝐷 = (Base‘𝐺)
21		rpvmasum.l	. . . . . . 7 ⊢ 𝐿 = (ℤRHom‘𝑍)
22		rpvmasum2.w	. . . . . . . . . . 11 ⊢ 𝑊 = {𝑦 ∈ (𝐷 ∖ { 1 }) ∣ Σ𝑚 ∈ ℕ ((𝑦‘(𝐿‘𝑚)) / 𝑚) = 0}
23	22	ssrab3 4030	. . . . . . . . . 10 ⊢ 𝑊 ⊆ (𝐷 ∖ { 1 })
24		dchrisum0.b	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ 𝑊)
25	23, 24	sselid 3929	. . . . . . . . 9 ⊢ (𝜑 → 𝑋 ∈ (𝐷 ∖ { 1 }))
26	25	eldifad 3911	. . . . . . . 8 ⊢ (𝜑 → 𝑋 ∈ 𝐷)
27	26	ad3antrrr 743	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑋 ∈ 𝐷)
28		elfzelz 13611	. . . . . . . 8 ⊢ (𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑))) → 𝑚 ∈ ℤ)
29	28	adantl 487	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℤ)
30	18, 19, 20, 21, 27, 29	dchrzrhcl 27521	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (𝑋‘(𝐿‘𝑚)) ∈ ℂ)
31		elfznn 13641	. . . . . . . . . 10 ⊢ (𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑))) → 𝑚 ∈ ℕ)
32	31	adantl 487	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℕ)
33	32	nnrpd 13117	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℝ⁺)
34	33	rpsqrtcld 15532	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ∈ ℝ⁺)
35	34	rpcnd 13121	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ∈ ℂ)
36	34	rpne0d 13124	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ≠ 0)
37	30, 35, 36	divcld 12048	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
38	17, 37	syldan 603	. . . 4 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
39	1, 38	fsumcl 15852	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
40	39	abscld 15559	. 2 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ∈ ℝ)
41		1zzd 12682	. . . . . . . 8 ⊢ (𝜑 → 1 ∈ ℤ)
42	26	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → 𝑋 ∈ 𝐷)
43		nnz 12669	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ ℕ → 𝑚 ∈ ℤ)
44	43	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℤ)
45	18, 19, 20, 21, 42, 44	dchrzrhcl 27521	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑋‘(𝐿‘𝑚)) ∈ ℂ)
46		nnrp 13087	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ ℕ → 𝑚 ∈ ℝ⁺)
47	46	adantl 487	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℝ⁺)
48	47	rpsqrtcld 15532	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (√‘𝑚) ∈ ℝ⁺)
49	48	rpcnd 13121	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (√‘𝑚) ∈ ℂ)
50	48	rpne0d 13124	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (√‘𝑚) ≠ 0)
51	45, 49, 50	divcld 12048	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
52		dchrisum0lem1.f	. . . . . . . . . . 11 ⊢ 𝐹 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) / (√‘𝑎)))
53		2fveq3 6879	. . . . . . . . . . . . 13 ⊢ (𝑎 = 𝑚 → (𝑋‘(𝐿‘𝑎)) = (𝑋‘(𝐿‘𝑚)))
54		fveq2 6874	. . . . . . . . . . . . 13 ⊢ (𝑎 = 𝑚 → (√‘𝑎) = (√‘𝑚))
55	53, 54	oveq12d 7427	. . . . . . . . . . . 12 ⊢ (𝑎 = 𝑚 → ((𝑋‘(𝐿‘𝑎)) / (√‘𝑎)) = ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
56	55	cbvmptv 5209	. . . . . . . . . . 11 ⊢ (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) / (√‘𝑎))) = (𝑚 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
57	52, 56	eqtri 2783	. . . . . . . . . 10 ⊢ 𝐹 = (𝑚 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
58	51, 57	fmptd 7103	. . . . . . . . 9 ⊢ (𝜑 → 𝐹:ℕ⟶ℂ)
59	58	ffvelcdmda 7073	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝐹‘𝑚) ∈ ℂ)
60	10, 41, 59	serf 14127	. . . . . . 7 ⊢ (𝜑 → seq1( + , 𝐹):ℕ⟶ℂ)
61	60	ad2antrr 739	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → seq1( + , 𝐹):ℕ⟶ℂ)
62	3	rpregt0d 13125	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
63	62	adantr 486	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
64	63	simpld 500	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ)
65		1red 11266	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℝ)
66		elfznn 13641	. . . . . . . . . . 11 ⊢ (𝑑 ∈ (1...(⌊‘𝑥)) → 𝑑 ∈ ℕ)
67	66	adantl 487	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑑 ∈ ℕ)
68	67	nnred 12305	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑑 ∈ ℝ)
69	67	nnge1d 12341	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 1 ≤ 𝑑)
70	3	rpred 13119	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝑥 ∈ ℝ)
71		fznnfl 13956	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℝ → (𝑑 ∈ (1...(⌊‘𝑥)) ↔ (𝑑 ∈ ℕ ∧ 𝑑 ≤ 𝑥)))
72	70, 71	syl 18	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑑 ∈ (1...(⌊‘𝑥)) ↔ (𝑑 ∈ ℕ ∧ 𝑑 ≤ 𝑥)))
73	72	simplbda 505	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑑 ≤ 𝑥)
74	65, 68, 64, 69, 73	letrd 11424	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 1 ≤ 𝑥)
75		flge1nn 13915	. . . . . . . 8 ⊢ ((𝑥 ∈ ℝ ∧ 1 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ)
76	64, 74, 75	syl2anc 596	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (⌊‘𝑥) ∈ ℕ)
77		eluznn 13000	. . . . . . 7 ⊢ (((⌊‘𝑥) ∈ ℕ ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ_≥‘(⌊‘𝑥))) → (⌊‘((𝑥↑2) / 𝑑)) ∈ ℕ)
78	76, 13, 77	syl2anc 596	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (⌊‘((𝑥↑2) / 𝑑)) ∈ ℕ)
79	61, 78	ffvelcdmd 7074	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) ∈ ℂ)
80		dchrisum0.s	. . . . . . 7 ⊢ (𝜑 → seq1( + , 𝐹) ⇝ 𝑆)
81		climcl 15619	. . . . . . 7 ⊢ (seq1( + , 𝐹) ⇝ 𝑆 → 𝑆 ∈ ℂ)
82	80, 81	syl 18	. . . . . 6 ⊢ (𝜑 → 𝑆 ∈ ℂ)
83	82	ad2antrr 739	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑆 ∈ ℂ)
84	79, 83	subcld 11626	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − 𝑆) ∈ ℂ)
85	84	abscld 15559	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − 𝑆)) ∈ ℝ)
86	61, 76	ffvelcdmd 7074	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (seq1( + , 𝐹)‘(⌊‘𝑥)) ∈ ℂ)
87	83, 86	subcld 11626	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝑆 − (seq1( + , 𝐹)‘(⌊‘𝑥))) ∈ ℂ)
88	87	abscld 15559	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑆 − (seq1( + , 𝐹)‘(⌊‘𝑥)))) ∈ ℝ)
89	85, 88	readdcld 11295	. 2 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − 𝑆)) + (abs‘(𝑆 − (seq1( + , 𝐹)‘(⌊‘𝑥))))) ∈ ℝ)
90		2re 12372	. . . . . 6 ⊢ 2 ∈ ℝ
91		dchrisum0.c	. . . . . . . 8 ⊢ (𝜑 → 𝐶 ∈ (0[,)+∞))
92		elrege0 13540	. . . . . . . 8 ⊢ (𝐶 ∈ (0[,)+∞) ↔ (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
93	91, 92	sylib 221	. . . . . . 7 ⊢ (𝜑 → (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
94	93	simpld 500	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ ℝ)
95		remulcl 11242	. . . . . 6 ⊢ ((2 ∈ ℝ ∧ 𝐶 ∈ ℝ) → (2 · 𝐶) ∈ ℝ)
96	90, 94, 95	sylancr 599	. . . . 5 ⊢ (𝜑 → (2 · 𝐶) ∈ ℝ)
97	96	adantr 486	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (2 · 𝐶) ∈ ℝ)
98	3	rpsqrtcld 15532	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (√‘𝑥) ∈ ℝ⁺)
99	97, 98	rerpdivcld 13150	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℝ)
100	99	adantr 486	. 2 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℝ)
101		ssun1 4124	. . . . . . . . . . 11 ⊢ (1...(⌊‘𝑥)) ⊆ ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))))
102	101, 15	sseqtrrid 3974	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘𝑥)) ⊆ (1...(⌊‘((𝑥↑2) / 𝑑))))
103	102	sselda 3931	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑))))
104		ovex 7442	. . . . . . . . . . 11 ⊢ ((𝑋‘(𝐿‘𝑎)) / (√‘𝑎)) ∈ V
105	55, 52, 104	fvmpt3i 6988	. . . . . . . . . 10 ⊢ (𝑚 ∈ ℕ → (𝐹‘𝑚) = ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
106	32, 105	syl 18	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (𝐹‘𝑚) = ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
107	103, 106	syldan 603	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐹‘𝑚) = ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
108	76, 10	eleqtrdi 2870	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (⌊‘𝑥) ∈ (ℤ_≥‘1))
109	103, 37	syldan 603	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
110	107, 108, 109	fsumser 15849	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) = (seq1( + , 𝐹)‘(⌊‘𝑥)))
111	110, 86	eqeltrd 2860	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
112	111, 39	pncan2d 11628	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) + Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) − Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) = Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
113		reflcl 13890	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℝ → (⌊‘𝑥) ∈ ℝ)
114	64, 113	syl 18	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (⌊‘𝑥) ∈ ℝ)
115	114	ltp1d 12202	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (⌊‘𝑥) < ((⌊‘𝑥) + 1))
116		fzdisj 13639	. . . . . . . . 9 ⊢ ((⌊‘𝑥) < ((⌊‘𝑥) + 1) → ((1...(⌊‘𝑥)) ∩ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) = ∅)
117	115, 116	syl 18	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((1...(⌊‘𝑥)) ∩ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) = ∅)
118		fzfid 14070	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑑))) ∈ Fin)
119	117, 15, 118, 37	fsumsplit 15860	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) = (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) + Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))))
120	78, 10	eleqtrdi 2870	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ_≥‘1))
121	106, 120, 37	fsumser 15849	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) = (seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))))
122	119, 121	eqtr3d 2797	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) + Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) = (seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))))
123	122, 110	oveq12d 7427	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) + Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) − Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) = ((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − (seq1( + , 𝐹)‘(⌊‘𝑥))))
124	112, 123	eqtr3d 2797	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) = ((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − (seq1( + , 𝐹)‘(⌊‘𝑥))))
125	124	fveq2d 6878	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) = (abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − (seq1( + , 𝐹)‘(⌊‘𝑥)))))
126	79, 86, 83	abs3difd 15583	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − (seq1( + , 𝐹)‘(⌊‘𝑥)))) ≤ ((abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − 𝑆)) + (abs‘(𝑆 − (seq1( + , 𝐹)‘(⌊‘𝑥))))))
127	125, 126	eqbrtrd 5127	. 2 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ≤ ((abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − 𝑆)) + (abs‘(𝑆 − (seq1( + , 𝐹)‘(⌊‘𝑥))))))
128	94	ad2antrr 739	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝐶 ∈ ℝ)
129		simplr 781	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ⁺)
130	129	rpsqrtcld 15532	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘𝑥) ∈ ℝ⁺)
131	128, 130	rerpdivcld 13150	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝐶 / (√‘𝑥)) ∈ ℝ)
132		2z 12683	. . . . . . . . . 10 ⊢ 2 ∈ ℤ
133		rpexpcl 14177	. . . . . . . . . 10 ⊢ ((𝑥 ∈ ℝ⁺ ∧ 2 ∈ ℤ) → (𝑥↑2) ∈ ℝ⁺)
134	3, 132, 133	sylancl 598	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥↑2) ∈ ℝ⁺)
135	134	adantr 486	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝑥↑2) ∈ ℝ⁺)
136	67	nnrpd 13117	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑑 ∈ ℝ⁺)
137	135, 136	rpdivcld 13136	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) / 𝑑) ∈ ℝ⁺)
138	137	rpsqrtcld 15532	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑑)) ∈ ℝ⁺)
139	128, 138	rerpdivcld 13150	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝐶 / (√‘((𝑥↑2) / 𝑑))) ∈ ℝ)
140		2fveq3 6879	. . . . . . . 8 ⊢ (𝑦 = ((𝑥↑2) / 𝑑) → (seq1( + , 𝐹)‘(⌊‘𝑦)) = (seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))))
141	140	fvoveq1d 7431	. . . . . . 7 ⊢ (𝑦 = ((𝑥↑2) / 𝑑) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) = (abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − 𝑆)))
142		fveq2 6874	. . . . . . . 8 ⊢ (𝑦 = ((𝑥↑2) / 𝑑) → (√‘𝑦) = (√‘((𝑥↑2) / 𝑑)))
143	142	oveq2d 7425	. . . . . . 7 ⊢ (𝑦 = ((𝑥↑2) / 𝑑) → (𝐶 / (√‘𝑦)) = (𝐶 / (√‘((𝑥↑2) / 𝑑))))
144	141, 143	breq12d 5116	. . . . . 6 ⊢ (𝑦 = ((𝑥↑2) / 𝑑) → ((abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / (√‘𝑦)) ↔ (abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − 𝑆)) ≤ (𝐶 / (√‘((𝑥↑2) / 𝑑)))))
145		dchrisum0.1	. . . . . . 7 ⊢ (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / (√‘𝑦)))
146	145	ad2antrr 739	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / (√‘𝑦)))
147	134	rpred 13119	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥↑2) ∈ ℝ)
148		nndivre 12334	. . . . . . . 8 ⊢ (((𝑥↑2) ∈ ℝ ∧ 𝑑 ∈ ℕ) → ((𝑥↑2) / 𝑑) ∈ ℝ)
149	147, 66, 148	syl2an 608	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) / 𝑑) ∈ ℝ)
150	12	simpld 500	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑥 ≤ ((𝑥↑2) / 𝑑))
151	65, 64, 149, 74, 150	letrd 11424	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 1 ≤ ((𝑥↑2) / 𝑑))
152		1re 11265	. . . . . . . 8 ⊢ 1 ∈ ℝ
153		elicopnf 13531	. . . . . . . 8 ⊢ (1 ∈ ℝ → (((𝑥↑2) / 𝑑) ∈ (1[,)+∞) ↔ (((𝑥↑2) / 𝑑) ∈ ℝ ∧ 1 ≤ ((𝑥↑2) / 𝑑))))
154	152, 153	ax-mp 5	. . . . . . 7 ⊢ (((𝑥↑2) / 𝑑) ∈ (1[,)+∞) ↔ (((𝑥↑2) / 𝑑) ∈ ℝ ∧ 1 ≤ ((𝑥↑2) / 𝑑)))
155	149, 151, 154	sylanbrc 595	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) / 𝑑) ∈ (1[,)+∞))
156	144, 146, 155	rspcdva 3577	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − 𝑆)) ≤ (𝐶 / (√‘((𝑥↑2) / 𝑑))))
157	130	rpregt0d 13125	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((√‘𝑥) ∈ ℝ ∧ 0 < (√‘𝑥)))
158	138	rpregt0d 13125	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((√‘((𝑥↑2) / 𝑑)) ∈ ℝ ∧ 0 < (√‘((𝑥↑2) / 𝑑))))
159	93	ad2antrr 739	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
160	129	rprege0d 13126	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
161	137	rprege0d 13126	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((𝑥↑2) / 𝑑) ∈ ℝ ∧ 0 ≤ ((𝑥↑2) / 𝑑)))
162		sqrtle 15380	. . . . . . . 8 ⊢ (((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) ∧ (((𝑥↑2) / 𝑑) ∈ ℝ ∧ 0 ≤ ((𝑥↑2) / 𝑑))) → (𝑥 ≤ ((𝑥↑2) / 𝑑) ↔ (√‘𝑥) ≤ (√‘((𝑥↑2) / 𝑑))))
163	160, 161, 162	syl2anc 596	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝑥 ≤ ((𝑥↑2) / 𝑑) ↔ (√‘𝑥) ≤ (√‘((𝑥↑2) / 𝑑))))
164	150, 163	mpbid 235	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘𝑥) ≤ (√‘((𝑥↑2) / 𝑑)))
165		lediv2a 12166	. . . . . 6 ⊢ (((((√‘𝑥) ∈ ℝ ∧ 0 < (√‘𝑥)) ∧ ((√‘((𝑥↑2) / 𝑑)) ∈ ℝ ∧ 0 < (√‘((𝑥↑2) / 𝑑))) ∧ (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶)) ∧ (√‘𝑥) ≤ (√‘((𝑥↑2) / 𝑑))) → (𝐶 / (√‘((𝑥↑2) / 𝑑))) ≤ (𝐶 / (√‘𝑥)))
166	157, 158, 159, 164, 165	syl31anc 1400	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝐶 / (√‘((𝑥↑2) / 𝑑))) ≤ (𝐶 / (√‘𝑥)))
167	85, 139, 131, 156, 166	letrd 11424	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − 𝑆)) ≤ (𝐶 / (√‘𝑥)))
168	83, 86	abssubd 15576	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑆 − (seq1( + , 𝐹)‘(⌊‘𝑥)))) = (abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑆)))
169		2fveq3 6879	. . . . . . . 8 ⊢ (𝑦 = 𝑥 → (seq1( + , 𝐹)‘(⌊‘𝑦)) = (seq1( + , 𝐹)‘(⌊‘𝑥)))
170	169	fvoveq1d 7431	. . . . . . 7 ⊢ (𝑦 = 𝑥 → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) = (abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑆)))
171		fveq2 6874	. . . . . . . 8 ⊢ (𝑦 = 𝑥 → (√‘𝑦) = (√‘𝑥))
172	171	oveq2d 7425	. . . . . . 7 ⊢ (𝑦 = 𝑥 → (𝐶 / (√‘𝑦)) = (𝐶 / (√‘𝑥)))
173	170, 172	breq12d 5116	. . . . . 6 ⊢ (𝑦 = 𝑥 → ((abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / (√‘𝑦)) ↔ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑆)) ≤ (𝐶 / (√‘𝑥))))
174		elicopnf 13531	. . . . . . . 8 ⊢ (1 ∈ ℝ → (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥)))
175	152, 174	ax-mp 5	. . . . . . 7 ⊢ (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥))
176	64, 74, 175	sylanbrc 595	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ (1[,)+∞))
177	173, 146, 176	rspcdva 3577	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑥)) − 𝑆)) ≤ (𝐶 / (√‘𝑥)))
178	168, 177	eqbrtrd 5127	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑆 − (seq1( + , 𝐹)‘(⌊‘𝑥)))) ≤ (𝐶 / (√‘𝑥)))
179	85, 88, 131, 131, 167, 178	le2addd 11890	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − 𝑆)) + (abs‘(𝑆 − (seq1( + , 𝐹)‘(⌊‘𝑥))))) ≤ ((𝐶 / (√‘𝑥)) + (𝐶 / (√‘𝑥))))
180		2cnd 12376	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 2 ∈ ℂ)
181	94	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝐶 ∈ ℝ)
182	181	recnd 11294	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝐶 ∈ ℂ)
183	182	adantr 486	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝐶 ∈ ℂ)
184	98	rpcnne0d 13128	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((√‘𝑥) ∈ ℂ ∧ (√‘𝑥) ≠ 0))
185	184	adantr 486	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((√‘𝑥) ∈ ℂ ∧ (√‘𝑥) ≠ 0))
186		divass 11947	. . . . 5 ⊢ ((2 ∈ ℂ ∧ 𝐶 ∈ ℂ ∧ ((√‘𝑥) ∈ ℂ ∧ (√‘𝑥) ≠ 0)) → ((2 · 𝐶) / (√‘𝑥)) = (2 · (𝐶 / (√‘𝑥))))
187	180, 183, 185, 186	syl3anc 1398	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((2 · 𝐶) / (√‘𝑥)) = (2 · (𝐶 / (√‘𝑥))))
188	131	recnd 11294	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝐶 / (√‘𝑥)) ∈ ℂ)
189	188	2timesd 12544	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (2 · (𝐶 / (√‘𝑥))) = ((𝐶 / (√‘𝑥)) + (𝐶 / (√‘𝑥))))
190	187, 189	eqtrd 2795	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((2 · 𝐶) / (√‘𝑥)) = ((𝐶 / (√‘𝑥)) + (𝐶 / (√‘𝑥))))
191	179, 190	breqtrrd 5133	. 2 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘((seq1( + , 𝐹)‘(⌊‘((𝑥↑2) / 𝑑))) − 𝑆)) + (abs‘(𝑆 − (seq1( + , 𝐹)‘(⌊‘𝑥))))) ≤ ((2 · 𝐶) / (√‘𝑥)))
192	40, 89, 100, 127, 191	letrd 11424	1 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ≤ ((2 · 𝐶) / (√‘𝑥)))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 = wceq 1570 ∈ wcel 2145 ≠ wne 2955 ∀wral 3076 {crab 3412 ∖ cdif 3896 ∪ cun 3897 ∩ cin 3898 ∅c0 4279 {csn 4584 class class class wbr 5103 ↦ cmpt 5186 ⟶wf 6524 ‘cfv 6528 (class class class)co 7409 ℂcc 11155 ℝcr 11156 0cc0 11157 1c1 11158 + caddc 11160 · cmul 11162 +∞cpnf 11297 < clt 11300 ≤ cle 11301 − cmin 11498 / cdiv 11928 ℕcn 12290 2c2 12352 ℕ₀cn0 12561 ℤcz 12648 ℤ_≥cuz 12920 ℝ⁺crp 13075 [,)cico 13433 ...cfz 13594 ⌊cfl 13884 seqcseq 14098 ↑cexp 14158 √csqrt 15353 abscabs 15354 ⇝ cli 15604 Σcsu 15806 Basecbs 17334 0_gc0g 17557 ℤRHomczrh 21752 ℤ/nℤczn 21755 DChrcdchr 27508

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2732 ax-rep 5232 ax-sep 5249 ax-nul 5260 ax-pow 5327 ax-pr 5391 ax-un 7735 ax-inf2 9620 ax-cnex 11213 ax-resscn 11214 ax-1cn 11215 ax-icn 11216 ax-addcl 11217 ax-addrcl 11218 ax-mulcl 11219 ax-mulrcl 11220 ax-mulcom 11221 ax-addass 11222 ax-mulass 11223 ax-distr 11224 ax-i2m1 11225 ax-1ne0 11226 ax-1rid 11227 ax-rnegex 11228 ax-rrecex 11229 ax-cnre 11230 ax-pre-lttri 11231 ax-pre-lttrn 11232 ax-pre-ltadd 11233 ax-pre-mulgt0 11234 ax-pre-sup 11235 ax-addf 11236 ax-mulf 11237

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3365 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-tp 4589 df-op 4591 df-uni 4868 df-int 4908 df-iun 4953 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5543 df-eprel 5548 df-po 5556 df-so 5557 df-fr 5601 df-se 5602 df-we 5603 df-xp 5654 df-rel 5655 df-cnv 5656 df-co 5657 df-dm 5658 df-rn 5659 df-res 5660 df-ima 5661 df-pred 6294 df-ord 6355 df-on 6356 df-lim 6357 df-suc 6358 df-iota 6484 df-fun 6530 df-fn 6531 df-f 6532 df-f1 6533 df-fo 6534 df-f1o 6535 df-fv 6536 df-isom 6537 df-riota 7366 df-ov 7412 df-oprab 7413 df-mpo 7414 df-om 7862 df-1st 7985 df-2nd 7986 df-tpos 8222 df-frecs 8278 df-wrecs 8309 df-recs 8358 df-rdg 8397 df-1o 8455 df-er 8696 df-ec 8698 df-qs 8702 df-map 8828 df-en 8953 df-dom 8954 df-sdom 8955 df-fin 8956 df-sup 9412 df-inf 9413 df-oi 9482 df-card 9977 df-pnf 11302 df-mnf 11303 df-xr 11304 df-ltxr 11305 df-le 11306 df-sub 11500 df-neg 11501 df-div 11929 df-nn 12291 df-2 12360 df-3 12361 df-4 12362 df-5 12363 df-6 12364 df-7 12365 df-8 12366 df-9 12367 df-n0 12562 df-z 12649 df-dec 12770 df-uz 12921 df-rp 13076 df-ico 13437 df-fz 13595 df-fzo 13743 df-fl 13886 df-seq 14099 df-exp 14159 df-hash 14428 df-cj 15219 df-re 15220 df-im 15221 df-sqrt 15355 df-abs 15356 df-clim 15608 df-sum 15807 df-struct 17272 df-sets 17289 df-slot 17307 df-ndx 17319 df-base 17335 df-ress 17356 df-plusg 17388 df-mulr 17389 df-starv 17390 df-sca 17391 df-vsca 17392 df-ip 17393 df-tset 17394 df-ple 17395 df-ds 17397 df-unif 17398 df-0g 17559 df-imas 17627 df-qus 17628 df-mgm 18763 df-sgrp 18855 df-mnd 18871 df-mhm 18925 df-grp 19094 df-minusg 19095 df-sbg 19096 df-mulg 19225 df-subg 19280 df-nsg 19281 df-eqg 19282 df-ghm 19375 df-cmn 19943 df-abl 19944 df-mgp 20308 df-rng 20322 df-ur 20355 df-ring 20408 df-cring 20409 df-oppr 20514 df-dvdsr 20534 df-unit 20535 df-rhm 20649 df-subrng 20745 df-subrg 20769 df-lmod 21084 df-lss 21154 df-lsp 21194 df-sra 21395 df-rgmod 21396 df-lidl 21433 df-rsp 21434 df-2idl 21490 df-cnfld 21626 df-zring 21700 df-zrh 21756 df-zn 21759 df-dchr 27509

This theorem is used by: dchrisum0lem1 27792

W3C validator