dchrisum0lem1 - Metamath Proof Explorer

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

Theorem dchrisum0lem1 26199

Description: Lemma for dchrisum0 26203. (Contributed by Mario Carneiro, 12-May-2016.) (Revised 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
dchrisum0lem1	⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2)))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1))

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

**Proof of Theorem dchrisum0lem1**
Step	Hyp	Ref	Expression
1		fzfid 13390	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (1...(⌊‘𝑥)) ∈ Fin)
2		fzfid 13390	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∈ Fin)
3		fzfid 13390	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ∈ Fin)
4		elfznn 12985	. . . . . . 7 ⊢ (𝑑 ∈ (1...(⌊‘𝑥)) → 𝑑 ∈ ℕ)
5		elfzuz 12952	. . . . . . 7 ⊢ (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) → 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))
6	4, 5	anim12i 615	. . . . . 6 ⊢ ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1))))
7	6	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))))
8		elfzuz 12952	. . . . . . 7 ⊢ (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) → 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))
9		elfznn 12985	. . . . . . 7 ⊢ (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) → 𝑑 ∈ ℕ)
10	8, 9	anim12ci 616	. . . . . 6 ⊢ ((𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1))))
11	10	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))))
12		eluzelz 12292	. . . . . . . . . . . 12 ⊢ (𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)) → 𝑚 ∈ ℤ)
13	12	ad2antll 728	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℤ)
14	13	zred 12126	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℝ)
15		simpr 488	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝑥 ∈ ℝ⁺)
16		2z 12053	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℤ
17		rpexpcl 13498	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ ℝ⁺ ∧ 2 ∈ ℤ) → (𝑥↑2) ∈ ℝ⁺)
18	15, 16, 17	sylancl 589	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥↑2) ∈ ℝ⁺)
19	18	rpred 12472	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥↑2) ∈ ℝ)
20	19	adantr 484	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ∈ ℝ)
21		simprl 770	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℕ)
22	21	nnrpd 12470	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℝ⁺)
23	14, 20, 22	lemuldivd 12521	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑚 · 𝑑) ≤ (𝑥↑2) ↔ 𝑚 ≤ ((𝑥↑2) / 𝑑)))
24	21	nnred 11689	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℝ)
25	15	rprege0d 12479	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
26		flge0nn0 13239	. . . . . . . . . . . . . 14 ⊢ ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ₀)
27		nn0p1nn 11973	. . . . . . . . . . . . . 14 ⊢ ((⌊‘𝑥) ∈ ℕ₀ → ((⌊‘𝑥) + 1) ∈ ℕ)
28	25, 26, 27	3syl 18	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((⌊‘𝑥) + 1) ∈ ℕ)
29	28	adantr 484	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((⌊‘𝑥) + 1) ∈ ℕ)
30		simprr 772	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))
31		eluznn 12358	. . . . . . . . . . . 12 ⊢ ((((⌊‘𝑥) + 1) ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1))) → 𝑚 ∈ ℕ)
32	29, 30, 31	syl2anc 587	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℕ)
33	32	nnrpd 12470	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℝ⁺)
34	24, 20, 33	lemuldiv2d 12522	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑚 · 𝑑) ≤ (𝑥↑2) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
35	23, 34	bitr3d 284	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
36		rpcn 12440	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℝ⁺ → 𝑥 ∈ ℂ)
37	36	adantl 485	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝑥 ∈ ℂ)
38	37	sqvald 13557	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥↑2) = (𝑥 · 𝑥))
39	38	adantr 484	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑥↑2) = (𝑥 · 𝑥))
40		simplr 768	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑥 ∈ ℝ⁺)
41	40	rpred 12472	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑥 ∈ ℝ)
42		reflcl 13215	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℝ → (⌊‘𝑥) ∈ ℝ)
43		peano2re 10851	. . . . . . . . . . . . . . . 16 ⊢ ((⌊‘𝑥) ∈ ℝ → ((⌊‘𝑥) + 1) ∈ ℝ)
44	41, 42, 43	3syl 18	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((⌊‘𝑥) + 1) ∈ ℝ)
45		fllep1 13220	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℝ → 𝑥 ≤ ((⌊‘𝑥) + 1))
46	41, 45	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑥 ≤ ((⌊‘𝑥) + 1))
47		eluzle 12295	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)) → ((⌊‘𝑥) + 1) ≤ 𝑚)
48	47	ad2antll 728	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((⌊‘𝑥) + 1) ≤ 𝑚)
49	41, 44, 14, 46, 48	letrd 10835	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑥 ≤ 𝑚)
50	41, 14, 40	lemul1d 12515	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑥 ≤ 𝑚 ↔ (𝑥 · 𝑥) ≤ (𝑚 · 𝑥)))
51	49, 50	mpbid 235	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑥 · 𝑥) ≤ (𝑚 · 𝑥))
52	39, 51	eqbrtrd 5054	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ≤ (𝑚 · 𝑥))
53	20, 41, 33	ledivmuld 12525	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (((𝑥↑2) / 𝑚) ≤ 𝑥 ↔ (𝑥↑2) ≤ (𝑚 · 𝑥)))
54	52, 53	mpbird 260	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑚) ≤ 𝑥)
55		nnre 11681	. . . . . . . . . . . . 13 ⊢ (𝑑 ∈ ℕ → 𝑑 ∈ ℝ)
56	55	ad2antrl 727	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℝ)
57	20, 32	nndivred 11728	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑚) ∈ ℝ)
58		letr 10772	. . . . . . . . . . . 12 ⊢ ((𝑑 ∈ ℝ ∧ ((𝑥↑2) / 𝑚) ∈ ℝ ∧ 𝑥 ∈ ℝ) → ((𝑑 ≤ ((𝑥↑2) / 𝑚) ∧ ((𝑥↑2) / 𝑚) ≤ 𝑥) → 𝑑 ≤ 𝑥))
59	56, 57, 41, 58	syl3anc 1368	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑑 ≤ ((𝑥↑2) / 𝑚) ∧ ((𝑥↑2) / 𝑚) ≤ 𝑥) → 𝑑 ≤ 𝑥))
60	54, 59	mpan2d 693	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑑 ≤ ((𝑥↑2) / 𝑚) → 𝑑 ≤ 𝑥))
61	35, 60	sylbid 243	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) → 𝑑 ≤ 𝑥))
62	61	pm4.71rd 566	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ (𝑑 ≤ 𝑥 ∧ 𝑚 ≤ ((𝑥↑2) / 𝑑))))
63		nnge1 11702	. . . . . . . . . . . . . 14 ⊢ (𝑑 ∈ ℕ → 1 ≤ 𝑑)
64	63	ad2antrl 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → 1 ≤ 𝑑)
65		1re 10679	. . . . . . . . . . . . . . 15 ⊢ 1 ∈ ℝ
66		0lt1 11200	. . . . . . . . . . . . . . 15 ⊢ 0 < 1
67	65, 66	pm3.2i 474	. . . . . . . . . . . . . 14 ⊢ (1 ∈ ℝ ∧ 0 < 1)
68	22	rpregt0d 12478	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑑 ∈ ℝ ∧ 0 < 𝑑))
69	18	adantr 484	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ∈ ℝ⁺)
70	69	rpregt0d 12478	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) ∈ ℝ ∧ 0 < (𝑥↑2)))
71		lediv2 11568	. . . . . . . . . . . . . 14 ⊢ (((1 ∈ ℝ ∧ 0 < 1) ∧ (𝑑 ∈ ℝ ∧ 0 < 𝑑) ∧ ((𝑥↑2) ∈ ℝ ∧ 0 < (𝑥↑2))) → (1 ≤ 𝑑 ↔ ((𝑥↑2) / 𝑑) ≤ ((𝑥↑2) / 1)))
72	67, 68, 70, 71	mp3an2i 1463	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (1 ≤ 𝑑 ↔ ((𝑥↑2) / 𝑑) ≤ ((𝑥↑2) / 1)))
73	64, 72	mpbid 235	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑑) ≤ ((𝑥↑2) / 1))
74	20	recnd 10707	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ∈ ℂ)
75	74	div1d 11446	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 1) = (𝑥↑2))
76	73, 75	breqtrd 5058	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑑) ≤ (𝑥↑2))
77		simpl 486	. . . . . . . . . . . . 13 ⊢ ((𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1))) → 𝑑 ∈ ℕ)
78		nndivre 11715	. . . . . . . . . . . . 13 ⊢ (((𝑥↑2) ∈ ℝ ∧ 𝑑 ∈ ℕ) → ((𝑥↑2) / 𝑑) ∈ ℝ)
79	19, 77, 78	syl2an 598	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑑) ∈ ℝ)
80		letr 10772	. . . . . . . . . . . 12 ⊢ ((𝑚 ∈ ℝ ∧ ((𝑥↑2) / 𝑑) ∈ ℝ ∧ (𝑥↑2) ∈ ℝ) → ((𝑚 ≤ ((𝑥↑2) / 𝑑) ∧ ((𝑥↑2) / 𝑑) ≤ (𝑥↑2)) → 𝑚 ≤ (𝑥↑2)))
81	14, 79, 20, 80	syl3anc 1368	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑚 ≤ ((𝑥↑2) / 𝑑) ∧ ((𝑥↑2) / 𝑑) ≤ (𝑥↑2)) → 𝑚 ≤ (𝑥↑2)))
82	76, 81	mpan2d 693	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) → 𝑚 ≤ (𝑥↑2)))
83	35, 82	sylbird 263	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑑 ≤ ((𝑥↑2) / 𝑚) → 𝑚 ≤ (𝑥↑2)))
84	83	pm4.71rd 566	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑑 ≤ ((𝑥↑2) / 𝑚) ↔ (𝑚 ≤ (𝑥↑2) ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
85	35, 62, 84	3bitr3d 312	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑑 ≤ 𝑥 ∧ 𝑚 ≤ ((𝑥↑2) / 𝑑)) ↔ (𝑚 ≤ (𝑥↑2) ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
86		fznnfl 13279	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℝ → (𝑑 ∈ (1...(⌊‘𝑥)) ↔ (𝑑 ∈ ℕ ∧ 𝑑 ≤ 𝑥)))
87	86	baibd 543	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℝ ∧ 𝑑 ∈ ℕ) → (𝑑 ∈ (1...(⌊‘𝑥)) ↔ 𝑑 ≤ 𝑥))
88	41, 21, 87	syl2anc 587	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑑 ∈ (1...(⌊‘𝑥)) ↔ 𝑑 ≤ 𝑥))
89	79	flcld 13217	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (⌊‘((𝑥↑2) / 𝑑)) ∈ ℤ)
90		elfz5 12948	. . . . . . . . . 10 ⊢ ((𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)) ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ ℤ) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
91	30, 89, 90	syl2anc 587	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
92		flge 13224	. . . . . . . . . 10 ⊢ ((((𝑥↑2) / 𝑑) ∈ ℝ ∧ 𝑚 ∈ ℤ) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
93	79, 13, 92	syl2anc 587	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
94	91, 93	bitr4d 285	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ↔ 𝑚 ≤ ((𝑥↑2) / 𝑑)))
95	88, 94	anbi12d 633	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑑 ≤ 𝑥 ∧ 𝑚 ≤ ((𝑥↑2) / 𝑑))))
96	20	flcld 13217	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (⌊‘(𝑥↑2)) ∈ ℤ)
97		elfz5 12948	. . . . . . . . . 10 ⊢ ((𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)) ∧ (⌊‘(𝑥↑2)) ∈ ℤ) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
98	30, 96, 97	syl2anc 587	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
99		flge 13224	. . . . . . . . . 10 ⊢ (((𝑥↑2) ∈ ℝ ∧ 𝑚 ∈ ℤ) → (𝑚 ≤ (𝑥↑2) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
100	20, 13, 99	syl2anc 587	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ (𝑥↑2) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
101	98, 100	bitr4d 285	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ↔ 𝑚 ≤ (𝑥↑2)))
102		fznnfl 13279	. . . . . . . . . 10 ⊢ (((𝑥↑2) / 𝑚) ∈ ℝ → (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) ↔ (𝑑 ∈ ℕ ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
103	102	baibd 543	. . . . . . . . 9 ⊢ ((((𝑥↑2) / 𝑚) ∈ ℝ ∧ 𝑑 ∈ ℕ) → (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
104	57, 21, 103	syl2anc 587	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
105	101, 104	anbi12d 633	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) ↔ (𝑚 ≤ (𝑥↑2) ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
106	85, 95, 105	3bitr4d 314	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1)))) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))))))
107	106	ex 416	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ_≥‘((⌊‘𝑥) + 1))) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))))))
108	7, 11, 107	pm5.21ndd 384	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))))))
109		ssun2 4078	. . . . . . . 8 ⊢ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ⊆ ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))))
110	28	adantr 484	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((⌊‘𝑥) + 1) ∈ ℕ)
111		nnuz 12321	. . . . . . . . . 10 ⊢ ℕ = (ℤ_≥‘1)
112	110, 111	eleqtrdi 2862	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((⌊‘𝑥) + 1) ∈ (ℤ_≥‘1))
113		dchrisum0lem1a 26169	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝑥 ≤ ((𝑥↑2) / 𝑑) ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ_≥‘(⌊‘𝑥))))
114	113	simprd 499	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ_≥‘(⌊‘𝑥)))
115		fzsplit2 12981	. . . . . . . . 9 ⊢ ((((⌊‘𝑥) + 1) ∈ (ℤ_≥‘1) ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ_≥‘(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑑))) = ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))))
116	112, 114, 115	syl2anc 587	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑑))) = ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))))
117	109, 116	sseqtrrid 3945	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ⊆ (1...(⌊‘((𝑥↑2) / 𝑑))))
118	117	sselda 3892	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑))))
119		rpvmasum2.g	. . . . . . . . 9 ⊢ 𝐺 = (DChr‘𝑁)
120		rpvmasum.z	. . . . . . . . 9 ⊢ 𝑍 = (ℤ/nℤ‘𝑁)
121		rpvmasum2.d	. . . . . . . . 9 ⊢ 𝐷 = (Base‘𝐺)
122		rpvmasum.l	. . . . . . . . 9 ⊢ 𝐿 = (ℤRHom‘𝑍)
123		rpvmasum2.w	. . . . . . . . . . . . 13 ⊢ 𝑊 = {𝑦 ∈ (𝐷 ∖ { 1 }) ∣ Σ𝑚 ∈ ℕ ((𝑦‘(𝐿‘𝑚)) / 𝑚) = 0}
124	123	ssrab3 3986	. . . . . . . . . . . 12 ⊢ 𝑊 ⊆ (𝐷 ∖ { 1 })
125		dchrisum0.b	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 ∈ 𝑊)
126	124, 125	sseldi 3890	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 ∈ (𝐷 ∖ { 1 }))
127	126	eldifad 3870	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ 𝐷)
128	127	ad3antrrr 729	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑋 ∈ 𝐷)
129		elfzelz 12956	. . . . . . . . . 10 ⊢ (𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑))) → 𝑚 ∈ ℤ)
130	129	adantl 485	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℤ)
131	119, 120, 121, 122, 128, 130	dchrzrhcl 25928	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (𝑋‘(𝐿‘𝑚)) ∈ ℂ)
132		elfznn 12985	. . . . . . . . . . . 12 ⊢ (𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑))) → 𝑚 ∈ ℕ)
133	132	adantl 485	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℕ)
134	133	nnrpd 12470	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℝ⁺)
135	134	rpsqrtcld 14819	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ∈ ℝ⁺)
136	135	rpcnd 12474	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ∈ ℂ)
137	135	rpne0d 12477	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ≠ 0)
138	131, 136, 137	divcld 11454	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
139	4	adantl 485	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑑 ∈ ℕ)
140	139	nnrpd 12470	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑑 ∈ ℝ⁺)
141	140	rpsqrtcld 14819	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘𝑑) ∈ ℝ⁺)
142	141	rpcnne0d 12481	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0))
143	142	adantr 484	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → ((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0))
144	143	simpld 498	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑑) ∈ ℂ)
145	143	simprd 499	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑑) ≠ 0)
146	138, 144, 145	divcld 11454	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
147	118, 146	syldan 594	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
148	147	anasss 470	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ (𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
149	1, 2, 3, 108, 148	fsumcom2 15177	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) = Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2)))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)))
150	149	mpteq2dva 5127	. 2 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) = (𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2)))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))))
151	65	a1i 11	. . 3 ⊢ (𝜑 → 1 ∈ ℝ)
152		2cn 11749	. . . . . . . 8 ⊢ 2 ∈ ℂ
153	15	rpsqrtcld 14819	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (√‘𝑥) ∈ ℝ⁺)
154	153	rpcnd 12474	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (√‘𝑥) ∈ ℂ)
155		mulcl 10659	. . . . . . . 8 ⊢ ((2 ∈ ℂ ∧ (√‘𝑥) ∈ ℂ) → (2 · (√‘𝑥)) ∈ ℂ)
156	152, 154, 155	sylancr 590	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (2 · (√‘𝑥)) ∈ ℂ)
157	141	rprecred 12483	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1 / (√‘𝑑)) ∈ ℝ)
158	1, 157	fsumrecl 15139	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) ∈ ℝ)
159	158	recnd 10707	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) ∈ ℂ)
160	159, 156	subcld 11035	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) ∈ ℂ)
161		2re 11748	. . . . . . . . . . 11 ⊢ 2 ∈ ℝ
162		dchrisum0.c	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐶 ∈ (0[,)+∞))
163		elrege0 12886	. . . . . . . . . . . . 13 ⊢ (𝐶 ∈ (0[,)+∞) ↔ (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
164	162, 163	sylib 221	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
165	164	simpld 498	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐶 ∈ ℝ)
166		remulcl 10660	. . . . . . . . . . 11 ⊢ ((2 ∈ ℝ ∧ 𝐶 ∈ ℝ) → (2 · 𝐶) ∈ ℝ)
167	161, 165, 166	sylancr 590	. . . . . . . . . 10 ⊢ (𝜑 → (2 · 𝐶) ∈ ℝ)
168	167	adantr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (2 · 𝐶) ∈ ℝ)
169	168, 153	rerpdivcld 12503	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℝ)
170	169	recnd 10707	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℂ)
171	156, 160, 170	adddird 10704	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (((2 · (√‘𝑥)) + (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) · ((2 · 𝐶) / (√‘𝑥))) = (((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))))
172	156, 159	pncan3d 11038	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((2 · (√‘𝑥)) + (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) = Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)))
173	172	oveq1d 7165	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (((2 · (√‘𝑥)) + (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) · ((2 · 𝐶) / (√‘𝑥))) = (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
174		2cnd 11752	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 2 ∈ ℂ)
175	174, 154, 170	mulassd 10702	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) = (2 · ((√‘𝑥) · ((2 · 𝐶) / (√‘𝑥)))))
176	168	recnd 10707	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (2 · 𝐶) ∈ ℂ)
177	153	rpne0d 12477	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (√‘𝑥) ≠ 0)
178	176, 154, 177	divcan2d 11456	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((√‘𝑥) · ((2 · 𝐶) / (√‘𝑥))) = (2 · 𝐶))
179	178	oveq2d 7166	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (2 · ((√‘𝑥) · ((2 · 𝐶) / (√‘𝑥)))) = (2 · (2 · 𝐶)))
180	175, 179	eqtrd 2793	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) = (2 · (2 · 𝐶)))
181	180	oveq1d 7165	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))) = ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))))
182	171, 173, 181	3eqtr3d 2801	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) = ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))))
183	182	mpteq2dva 5127	. . . 4 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))) = (𝑥 ∈ ℝ⁺ ↦ ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥))))))
184		remulcl 10660	. . . . . . . 8 ⊢ ((2 ∈ ℝ ∧ (2 · 𝐶) ∈ ℝ) → (2 · (2 · 𝐶)) ∈ ℝ)
185	161, 167, 184	sylancr 590	. . . . . . 7 ⊢ (𝜑 → (2 · (2 · 𝐶)) ∈ ℝ)
186	185	recnd 10707	. . . . . 6 ⊢ (𝜑 → (2 · (2 · 𝐶)) ∈ ℂ)
187	186	adantr 484	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (2 · (2 · 𝐶)) ∈ ℂ)
188	160, 170	mulcld 10699	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℂ)
189		rpssre 12437	. . . . . 6 ⊢ ℝ⁺ ⊆ ℝ
190		o1const 15024	. . . . . 6 ⊢ ((ℝ⁺ ⊆ ℝ ∧ (2 · (2 · 𝐶)) ∈ ℂ) → (𝑥 ∈ ℝ⁺ ↦ (2 · (2 · 𝐶))) ∈ 𝑂(1))
191	189, 186, 190	sylancr 590	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ (2 · (2 · 𝐶))) ∈ 𝑂(1))
192		eqid 2758	. . . . . . . 8 ⊢ (𝑥 ∈ ℝ⁺ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) = (𝑥 ∈ ℝ⁺ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))))
193	192	divsqrsum 25666	. . . . . . 7 ⊢ (𝑥 ∈ ℝ⁺ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ dom ⇝_𝑟
194		rlimdmo1 15022	. . . . . . 7 ⊢ ((𝑥 ∈ ℝ⁺ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ dom ⇝_𝑟 → (𝑥 ∈ ℝ⁺ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ 𝑂(1))
195	193, 194	mp1i 13	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ 𝑂(1))
196	176, 154, 177	divrecd 11457	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((2 · 𝐶) / (√‘𝑥)) = ((2 · 𝐶) · (1 / (√‘𝑥))))
197	196	mpteq2dva 5127	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ ((2 · 𝐶) / (√‘𝑥))) = (𝑥 ∈ ℝ⁺ ↦ ((2 · 𝐶) · (1 / (√‘𝑥)))))
198	153	rprecred 12483	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (1 / (√‘𝑥)) ∈ ℝ)
199	167	recnd 10707	. . . . . . . . . 10 ⊢ (𝜑 → (2 · 𝐶) ∈ ℂ)
200		rlimconst 14949	. . . . . . . . . 10 ⊢ ((ℝ⁺ ⊆ ℝ ∧ (2 · 𝐶) ∈ ℂ) → (𝑥 ∈ ℝ⁺ ↦ (2 · 𝐶)) ⇝_𝑟 (2 · 𝐶))
201	189, 199, 200	sylancr 590	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ (2 · 𝐶)) ⇝_𝑟 (2 · 𝐶))
202		sqrtlim 25657	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℝ⁺ ↦ (1 / (√‘𝑥))) ⇝_𝑟 0
203	202	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ (1 / (√‘𝑥))) ⇝_𝑟 0)
204	168, 198, 201, 203	rlimmul 15049	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ ((2 · 𝐶) · (1 / (√‘𝑥)))) ⇝_𝑟 ((2 · 𝐶) · 0))
205	197, 204	eqbrtrd 5054	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ ((2 · 𝐶) / (√‘𝑥))) ⇝_𝑟 ((2 · 𝐶) · 0))
206		rlimo1 15021	. . . . . . 7 ⊢ ((𝑥 ∈ ℝ⁺ ↦ ((2 · 𝐶) / (√‘𝑥))) ⇝_𝑟 ((2 · 𝐶) · 0) → (𝑥 ∈ ℝ⁺ ↦ ((2 · 𝐶) / (√‘𝑥))) ∈ 𝑂(1))
207	205, 206	syl 17	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ ((2 · 𝐶) / (√‘𝑥))) ∈ 𝑂(1))
208	160, 170, 195, 207	o1mul2 15029	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))) ∈ 𝑂(1))
209	187, 188, 191, 208	o1add2 15028	. . . 4 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥))))) ∈ 𝑂(1))
210	183, 209	eqeltrd 2852	. . 3 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))) ∈ 𝑂(1))
211	158, 169	remulcld 10709	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℝ)
212	3, 147	fsumcl 15138	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
213	1, 212	fsumcl 15138	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
214	213	abscld 14844	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ ℝ)
215	211	recnd 10707	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℂ)
216	215	abscld 14844	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))) ∈ ℝ)
217	212	abscld 14844	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ ℝ)
218	1, 217	fsumrecl 15139	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ ℝ)
219	1, 212	fsumabs 15204	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))))
220	169	adantr 484	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℝ)
221	157, 220	remulcld 10709	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℝ)
222	118, 138	syldan 594	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
223	3, 222	fsumcl 15138	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
224	223	abscld 14844	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ∈ ℝ)
225		rpvmasum.a	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑁 ∈ ℕ)
226		rpvmasum2.1	. . . . . . . . . . 11 ⊢ 1 = (0_g‘𝐺)
227		dchrisum0lem1.f	. . . . . . . . . . 11 ⊢ 𝐹 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) / (√‘𝑎)))
228		dchrisum0.s	. . . . . . . . . . 11 ⊢ (𝜑 → seq1( + , 𝐹) ⇝ 𝑆)
229		dchrisum0.1	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / (√‘𝑦)))
230	120, 122, 225, 119, 121, 226, 123, 125, 227, 162, 228, 229	dchrisum0lem1b 26198	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ≤ ((2 · 𝐶) / (√‘𝑥)))
231	224, 220, 141, 230	lediv1dd 12530	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) / (√‘𝑑)) ≤ (((2 · 𝐶) / (√‘𝑥)) / (√‘𝑑)))
232	141	rpcnd 12474	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘𝑑) ∈ ℂ)
233	141	rpne0d 12477	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘𝑑) ≠ 0)
234	223, 232, 233	absdivd 14863	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) = ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) / (abs‘(√‘𝑑))))
235	3, 232, 222, 233	fsumdivc 15189	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) = Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)))
236	235	fveq2d 6662	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) = (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))))
237	141	rprege0d 12479	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((√‘𝑑) ∈ ℝ ∧ 0 ≤ (√‘𝑑)))
238		absid 14704	. . . . . . . . . . . 12 ⊢ (((√‘𝑑) ∈ ℝ ∧ 0 ≤ (√‘𝑑)) → (abs‘(√‘𝑑)) = (√‘𝑑))
239	237, 238	syl 17	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(√‘𝑑)) = (√‘𝑑))
240	239	oveq2d 7166	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) / (abs‘(√‘𝑑))) = ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) / (√‘𝑑)))
241	234, 236, 240	3eqtr3rd 2802	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) / (√‘𝑑)) = (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))))
242	170	adantr 484	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℂ)
243	242, 232, 233	divrec2d 11458	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((2 · 𝐶) / (√‘𝑥)) / (√‘𝑑)) = ((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
244	231, 241, 243	3brtr3d 5063	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ ((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
245	1, 217, 221, 244	fsumle 15202	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ Σ𝑑 ∈ (1...(⌊‘𝑥))((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
246	157	recnd 10707	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1 / (√‘𝑑)) ∈ ℂ)
247	1, 170, 246	fsummulc1 15188	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) = Σ𝑑 ∈ (1...(⌊‘𝑥))((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
248	245, 247	breqtrrd 5060	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
249	214, 218, 211, 219, 248	letrd 10835	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
250	211	leabsd 14822	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ≤ (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))))
251	214, 211, 216, 249, 250	letrd 10835	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))))
252	251	adantrr 716	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ ℝ⁺ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))))
253	151, 210, 211, 213, 252	o1le 15057	. 2 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1))
254	150, 253	eqeltrrd 2853	1 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2)))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 209 ∧ wa 399 = wceq 1538 ∈ wcel 2111 ≠ wne 2951 ∀wral 3070 {crab 3074 ∖ cdif 3855 ∪ cun 3856 ⊆ wss 3858 {csn 4522 class class class wbr 5032 ↦ cmpt 5112 dom cdm 5524 ‘cfv 6335 (class class class)co 7150 ℂcc 10573 ℝcr 10574 0cc0 10575 1c1 10576 + caddc 10578 · cmul 10580 +∞cpnf 10710 < clt 10713 ≤ cle 10714 − cmin 10908 / cdiv 11335 ℕcn 11674 2c2 11729 ℕ₀cn0 11934 ℤcz 12020 ℤ_≥cuz 12282 ℝ⁺crp 12430 [,)cico 12781 ...cfz 12939 ⌊cfl 13209 seqcseq 13418 ↑cexp 13479 √csqrt 14640 abscabs 14641 ⇝ cli 14889 ⇝_𝑟 crli 14890 𝑂(1)co1 14891 Σcsu 15090 Basecbs 16541 0_gc0g 16771 ℤRHomczrh 20269 ℤ/nℤczn 20272 DChrcdchr 25915

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2113 ax-9 2121 ax-10 2142 ax-11 2158 ax-12 2175 ax-ext 2729 ax-rep 5156 ax-sep 5169 ax-nul 5176 ax-pow 5234 ax-pr 5298 ax-un 7459 ax-inf2 9137 ax-cnex 10631 ax-resscn 10632 ax-1cn 10633 ax-icn 10634 ax-addcl 10635 ax-addrcl 10636 ax-mulcl 10637 ax-mulrcl 10638 ax-mulcom 10639 ax-addass 10640 ax-mulass 10641 ax-distr 10642 ax-i2m1 10643 ax-1ne0 10644 ax-1rid 10645 ax-rnegex 10646 ax-rrecex 10647 ax-cnre 10648 ax-pre-lttri 10649 ax-pre-lttrn 10650 ax-pre-ltadd 10651 ax-pre-mulgt0 10652 ax-pre-sup 10653 ax-addf 10654 ax-mulf 10655

This theorem depends on definitions: df-bi 210 df-an 400 df-or 845 df-3or 1085 df-3an 1086 df-tru 1541 df-fal 1551 df-ex 1782 df-nf 1786 df-sb 2070 df-mo 2557 df-eu 2588 df-clab 2736 df-cleq 2750 df-clel 2830 df-nfc 2901 df-ne 2952 df-nel 3056 df-ral 3075 df-rex 3076 df-reu 3077 df-rmo 3078 df-rab 3079 df-v 3411 df-sbc 3697 df-csb 3806 df-dif 3861 df-un 3863 df-in 3865 df-ss 3875 df-pss 3877 df-nul 4226 df-if 4421 df-pw 4496 df-sn 4523 df-pr 4525 df-tp 4527 df-op 4529 df-uni 4799 df-int 4839 df-iun 4885 df-iin 4886 df-br 5033 df-opab 5095 df-mpt 5113 df-tr 5139 df-id 5430 df-eprel 5435 df-po 5443 df-so 5444 df-fr 5483 df-se 5484 df-we 5485 df-xp 5530 df-rel 5531 df-cnv 5532 df-co 5533 df-dm 5534 df-rn 5535 df-res 5536 df-ima 5537 df-pred 6126 df-ord 6172 df-on 6173 df-lim 6174 df-suc 6175 df-iota 6294 df-fun 6337 df-fn 6338 df-f 6339 df-f1 6340 df-fo 6341 df-f1o 6342 df-fv 6343 df-isom 6344 df-riota 7108 df-ov 7153 df-oprab 7154 df-mpo 7155 df-of 7405 df-om 7580 df-1st 7693 df-2nd 7694 df-supp 7836 df-tpos 7902 df-wrecs 7957 df-recs 8018 df-rdg 8056 df-1o 8112 df-2o 8113 df-er 8299 df-ec 8301 df-qs 8305 df-map 8418 df-pm 8419 df-ixp 8480 df-en 8528 df-dom 8529 df-sdom 8530 df-fin 8531 df-fsupp 8867 df-fi 8908 df-sup 8939 df-inf 8940 df-oi 9007 df-card 9401 df-pnf 10715 df-mnf 10716 df-xr 10717 df-ltxr 10718 df-le 10719 df-sub 10910 df-neg 10911 df-div 11336 df-nn 11675 df-2 11737 df-3 11738 df-4 11739 df-5 11740 df-6 11741 df-7 11742 df-8 11743 df-9 11744 df-n0 11935 df-z 12021 df-dec 12138 df-uz 12283 df-q 12389 df-rp 12431 df-xneg 12548 df-xadd 12549 df-xmul 12550 df-ioo 12783 df-ioc 12784 df-ico 12785 df-icc 12786 df-fz 12940 df-fzo 13083 df-fl 13211 df-mod 13287 df-seq 13419 df-exp 13480 df-fac 13684 df-bc 13713 df-hash 13741 df-shft 14474 df-cj 14506 df-re 14507 df-im 14508 df-sqrt 14642 df-abs 14643 df-limsup 14876 df-clim 14893 df-rlim 14894 df-o1 14895 df-lo1 14896 df-sum 15091 df-ef 15469 df-sin 15471 df-cos 15472 df-pi 15474 df-struct 16543 df-ndx 16544 df-slot 16545 df-base 16547 df-sets 16548 df-ress 16549 df-plusg 16636 df-mulr 16637 df-starv 16638 df-sca 16639 df-vsca 16640 df-ip 16641 df-tset 16642 df-ple 16643 df-ds 16645 df-unif 16646 df-hom 16647 df-cco 16648 df-rest 16754 df-topn 16755 df-0g 16773 df-gsum 16774 df-topgen 16775 df-pt 16776 df-prds 16779 df-xrs 16833 df-qtop 16838 df-imas 16839 df-qus 16840 df-xps 16841 df-mre 16915 df-mrc 16916 df-acs 16918 df-mgm 17918 df-sgrp 17967 df-mnd 17978 df-mhm 18022 df-submnd 18023 df-grp 18172 df-minusg 18173 df-sbg 18174 df-mulg 18292 df-subg 18343 df-nsg 18344 df-eqg 18345 df-ghm 18423 df-cntz 18514 df-cmn 18975 df-abl 18976 df-mgp 19308 df-ur 19320 df-ring 19367 df-cring 19368 df-oppr 19444 df-dvdsr 19462 df-unit 19463 df-rnghom 19538 df-subrg 19601 df-lmod 19704 df-lss 19772 df-lsp 19812 df-sra 20012 df-rgmod 20013 df-lidl 20014 df-rsp 20015 df-2idl 20073 df-psmet 20158 df-xmet 20159 df-met 20160 df-bl 20161 df-mopn 20162 df-fbas 20163 df-fg 20164 df-cnfld 20167 df-zring 20239 df-zrh 20273 df-zn 20276 df-top 21594 df-topon 21611 df-topsp 21633 df-bases 21646 df-cld 21719 df-ntr 21720 df-cls 21721 df-nei 21798 df-lp 21836 df-perf 21837 df-cn 21927 df-cnp 21928 df-haus 22015 df-cmp 22087 df-tx 22262 df-hmeo 22455 df-fil 22546 df-fm 22638 df-flim 22639 df-flf 22640 df-xms 23022 df-ms 23023 df-tms 23024 df-cncf 23579 df-limc 24565 df-dv 24566 df-log 25247 df-cxp 25248 df-dchr 25916

This theorem is referenced by: dchrisum0lem3 26202

W3C validator