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

Theorem dchrisum0lem1 27368
Description: Lemma for dchrisum0 27372. (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 = (0g𝐺)
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
StepHypRef Expression
1 fzfid 13936 . . . 4 ((𝜑𝑥 ∈ ℝ+) → (1...(⌊‘𝑥)) ∈ Fin)
2 fzfid 13936 . . . 4 ((𝜑𝑥 ∈ ℝ+) → (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∈ Fin)
3 fzfid 13936 . . . 4 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ∈ Fin)
4 elfznn 13528 . . . . . . 7 (𝑑 ∈ (1...(⌊‘𝑥)) → 𝑑 ∈ ℕ)
5 elfzuz 13495 . . . . . . 7 (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) → 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))
64, 5anim12i 612 . . . . . 6 ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1))))
76a1i 11 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))))
8 elfzuz 13495 . . . . . . 7 (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) → 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))
9 elfznn 13528 . . . . . . 7 (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) → 𝑑 ∈ ℕ)
108, 9anim12ci 613 . . . . . 6 ((𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1))))
1110a1i 11 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))))
12 eluzelz 12830 . . . . . . . . . . . 12 (𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)) → 𝑚 ∈ ℤ)
1312ad2antll 726 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℤ)
1413zred 12664 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℝ)
15 simpr 484 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ+) → 𝑥 ∈ ℝ+)
16 2z 12592 . . . . . . . . . . . . 13 2 ∈ ℤ
17 rpexpcl 14044 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ+ ∧ 2 ∈ ℤ) → (𝑥↑2) ∈ ℝ+)
1815, 16, 17sylancl 585 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ+) → (𝑥↑2) ∈ ℝ+)
1918rpred 13014 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℝ+) → (𝑥↑2) ∈ ℝ)
2019adantr 480 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ∈ ℝ)
21 simprl 768 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℕ)
2221nnrpd 13012 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℝ+)
2314, 20, 22lemuldivd 13063 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑚 · 𝑑) ≤ (𝑥↑2) ↔ 𝑚 ≤ ((𝑥↑2) / 𝑑)))
2421nnred 12225 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℝ)
2515rprege0d 13021 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ+) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
26 flge0nn0 13783 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ0)
27 nn0p1nn 12509 . . . . . . . . . . . . . 14 ((⌊‘𝑥) ∈ ℕ0 → ((⌊‘𝑥) + 1) ∈ ℕ)
2825, 26, 273syl 18 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ+) → ((⌊‘𝑥) + 1) ∈ ℕ)
2928adantr 480 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((⌊‘𝑥) + 1) ∈ ℕ)
30 simprr 770 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))
31 eluznn 12900 . . . . . . . . . . . 12 ((((⌊‘𝑥) + 1) ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1))) → 𝑚 ∈ ℕ)
3229, 30, 31syl2anc 583 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℕ)
3332nnrpd 13012 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℝ+)
3424, 20, 33lemuldiv2d 13064 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑚 · 𝑑) ≤ (𝑥↑2) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
3523, 34bitr3d 281 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
36 rpcn 12982 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ℝ+𝑥 ∈ ℂ)
3736adantl 481 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ+) → 𝑥 ∈ ℂ)
3837sqvald 14106 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ+) → (𝑥↑2) = (𝑥 · 𝑥))
3938adantr 480 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥↑2) = (𝑥 · 𝑥))
40 simplr 766 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑥 ∈ ℝ+)
4140rpred 13014 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑥 ∈ ℝ)
42 reflcl 13759 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ℝ → (⌊‘𝑥) ∈ ℝ)
43 peano2re 11385 . . . . . . . . . . . . . . . 16 ((⌊‘𝑥) ∈ ℝ → ((⌊‘𝑥) + 1) ∈ ℝ)
4441, 42, 433syl 18 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((⌊‘𝑥) + 1) ∈ ℝ)
45 fllep1 13764 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ℝ → 𝑥 ≤ ((⌊‘𝑥) + 1))
4641, 45syl 17 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑥 ≤ ((⌊‘𝑥) + 1))
47 eluzle 12833 . . . . . . . . . . . . . . . 16 (𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)) → ((⌊‘𝑥) + 1) ≤ 𝑚)
4847ad2antll 726 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((⌊‘𝑥) + 1) ≤ 𝑚)
4941, 44, 14, 46, 48letrd 11369 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑥𝑚)
5041, 14, 40lemul1d 13057 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥𝑚 ↔ (𝑥 · 𝑥) ≤ (𝑚 · 𝑥)))
5149, 50mpbid 231 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥 · 𝑥) ≤ (𝑚 · 𝑥))
5239, 51eqbrtrd 5161 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ≤ (𝑚 · 𝑥))
5320, 41, 33ledivmuld 13067 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (((𝑥↑2) / 𝑚) ≤ 𝑥 ↔ (𝑥↑2) ≤ (𝑚 · 𝑥)))
5452, 53mpbird 257 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑚) ≤ 𝑥)
55 nnre 12217 . . . . . . . . . . . . 13 (𝑑 ∈ ℕ → 𝑑 ∈ ℝ)
5655ad2antrl 725 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℝ)
5720, 32nndivred 12264 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑚) ∈ ℝ)
58 letr 11306 . . . . . . . . . . . 12 ((𝑑 ∈ ℝ ∧ ((𝑥↑2) / 𝑚) ∈ ℝ ∧ 𝑥 ∈ ℝ) → ((𝑑 ≤ ((𝑥↑2) / 𝑚) ∧ ((𝑥↑2) / 𝑚) ≤ 𝑥) → 𝑑𝑥))
5956, 57, 41, 58syl3anc 1368 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑑 ≤ ((𝑥↑2) / 𝑚) ∧ ((𝑥↑2) / 𝑚) ≤ 𝑥) → 𝑑𝑥))
6054, 59mpan2d 691 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ≤ ((𝑥↑2) / 𝑚) → 𝑑𝑥))
6135, 60sylbid 239 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) → 𝑑𝑥))
6261pm4.71rd 562 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ (𝑑𝑥𝑚 ≤ ((𝑥↑2) / 𝑑))))
63 nnge1 12238 . . . . . . . . . . . . . 14 (𝑑 ∈ ℕ → 1 ≤ 𝑑)
6463ad2antrl 725 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 1 ≤ 𝑑)
65 1re 11212 . . . . . . . . . . . . . . 15 1 ∈ ℝ
66 0lt1 11734 . . . . . . . . . . . . . . 15 0 < 1
6765, 66pm3.2i 470 . . . . . . . . . . . . . 14 (1 ∈ ℝ ∧ 0 < 1)
6822rpregt0d 13020 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ∈ ℝ ∧ 0 < 𝑑))
6918adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ∈ ℝ+)
7069rpregt0d 13020 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) ∈ ℝ ∧ 0 < (𝑥↑2)))
71 lediv2 12102 . . . . . . . . . . . . . 14 (((1 ∈ ℝ ∧ 0 < 1) ∧ (𝑑 ∈ ℝ ∧ 0 < 𝑑) ∧ ((𝑥↑2) ∈ ℝ ∧ 0 < (𝑥↑2))) → (1 ≤ 𝑑 ↔ ((𝑥↑2) / 𝑑) ≤ ((𝑥↑2) / 1)))
7267, 68, 70, 71mp3an2i 1462 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (1 ≤ 𝑑 ↔ ((𝑥↑2) / 𝑑) ≤ ((𝑥↑2) / 1)))
7364, 72mpbid 231 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑑) ≤ ((𝑥↑2) / 1))
7420recnd 11240 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ∈ ℂ)
7574div1d 11980 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 1) = (𝑥↑2))
7673, 75breqtrd 5165 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑑) ≤ (𝑥↑2))
77 simpl 482 . . . . . . . . . . . . 13 ((𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1))) → 𝑑 ∈ ℕ)
78 nndivre 12251 . . . . . . . . . . . . 13 (((𝑥↑2) ∈ ℝ ∧ 𝑑 ∈ ℕ) → ((𝑥↑2) / 𝑑) ∈ ℝ)
7919, 77, 78syl2an 595 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑑) ∈ ℝ)
80 letr 11306 . . . . . . . . . . . 12 ((𝑚 ∈ ℝ ∧ ((𝑥↑2) / 𝑑) ∈ ℝ ∧ (𝑥↑2) ∈ ℝ) → ((𝑚 ≤ ((𝑥↑2) / 𝑑) ∧ ((𝑥↑2) / 𝑑) ≤ (𝑥↑2)) → 𝑚 ≤ (𝑥↑2)))
8114, 79, 20, 80syl3anc 1368 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑚 ≤ ((𝑥↑2) / 𝑑) ∧ ((𝑥↑2) / 𝑑) ≤ (𝑥↑2)) → 𝑚 ≤ (𝑥↑2)))
8276, 81mpan2d 691 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) → 𝑚 ≤ (𝑥↑2)))
8335, 82sylbird 260 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ≤ ((𝑥↑2) / 𝑚) → 𝑚 ≤ (𝑥↑2)))
8483pm4.71rd 562 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ≤ ((𝑥↑2) / 𝑚) ↔ (𝑚 ≤ (𝑥↑2) ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
8535, 62, 843bitr3d 309 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑑𝑥𝑚 ≤ ((𝑥↑2) / 𝑑)) ↔ (𝑚 ≤ (𝑥↑2) ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
86 fznnfl 13825 . . . . . . . . . 10 (𝑥 ∈ ℝ → (𝑑 ∈ (1...(⌊‘𝑥)) ↔ (𝑑 ∈ ℕ ∧ 𝑑𝑥)))
8786baibd 539 . . . . . . . . 9 ((𝑥 ∈ ℝ ∧ 𝑑 ∈ ℕ) → (𝑑 ∈ (1...(⌊‘𝑥)) ↔ 𝑑𝑥))
8841, 21, 87syl2anc 583 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ∈ (1...(⌊‘𝑥)) ↔ 𝑑𝑥))
8979flcld 13761 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (⌊‘((𝑥↑2) / 𝑑)) ∈ ℤ)
90 elfz5 13491 . . . . . . . . . 10 ((𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)) ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ ℤ) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
9130, 89, 90syl2anc 583 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
92 flge 13768 . . . . . . . . . 10 ((((𝑥↑2) / 𝑑) ∈ ℝ ∧ 𝑚 ∈ ℤ) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
9379, 13, 92syl2anc 583 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
9491, 93bitr4d 282 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ↔ 𝑚 ≤ ((𝑥↑2) / 𝑑)))
9588, 94anbi12d 630 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑑𝑥𝑚 ≤ ((𝑥↑2) / 𝑑))))
9620flcld 13761 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (⌊‘(𝑥↑2)) ∈ ℤ)
97 elfz5 13491 . . . . . . . . . 10 ((𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)) ∧ (⌊‘(𝑥↑2)) ∈ ℤ) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
9830, 96, 97syl2anc 583 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
99 flge 13768 . . . . . . . . . 10 (((𝑥↑2) ∈ ℝ ∧ 𝑚 ∈ ℤ) → (𝑚 ≤ (𝑥↑2) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
10020, 13, 99syl2anc 583 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ (𝑥↑2) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
10198, 100bitr4d 282 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ↔ 𝑚 ≤ (𝑥↑2)))
102 fznnfl 13825 . . . . . . . . . 10 (((𝑥↑2) / 𝑚) ∈ ℝ → (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) ↔ (𝑑 ∈ ℕ ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
103102baibd 539 . . . . . . . . 9 ((((𝑥↑2) / 𝑚) ∈ ℝ ∧ 𝑑 ∈ ℕ) → (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
10457, 21, 103syl2anc 583 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
105101, 104anbi12d 630 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) ↔ (𝑚 ≤ (𝑥↑2) ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
10685, 95, 1053bitr4d 311 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))))))
107106ex 412 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1))) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))))))
1087, 11, 107pm5.21ndd 379 . . . 4 ((𝜑𝑥 ∈ ℝ+) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))))))
109 ssun2 4166 . . . . . . . 8 (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ⊆ ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))))
11028adantr 480 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((⌊‘𝑥) + 1) ∈ ℕ)
111 nnuz 12863 . . . . . . . . . 10 ℕ = (ℤ‘1)
112110, 111eleqtrdi 2835 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((⌊‘𝑥) + 1) ∈ (ℤ‘1))
113 dchrisum0lem1a 27338 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝑥 ≤ ((𝑥↑2) / 𝑑) ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ‘(⌊‘𝑥))))
114113simprd 495 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ‘(⌊‘𝑥)))
115 fzsplit2 13524 . . . . . . . . 9 ((((⌊‘𝑥) + 1) ∈ (ℤ‘1) ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ‘(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑑))) = ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))))
116112, 114, 115syl2anc 583 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑑))) = ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))))
117109, 116sseqtrrid 4028 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ⊆ (1...(⌊‘((𝑥↑2) / 𝑑))))
118117sselda 3975 . . . . . 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}
124123ssrab3 4073 . . . . . . . . . . . 12 𝑊 ⊆ (𝐷 ∖ { 1 })
125 dchrisum0.b . . . . . . . . . . . 12 (𝜑𝑋𝑊)
126124, 125sselid 3973 . . . . . . . . . . 11 (𝜑𝑋 ∈ (𝐷 ∖ { 1 }))
127126eldifad 3953 . . . . . . . . . 10 (𝜑𝑋𝐷)
128127ad3antrrr 727 . . . . . . . . 9 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑋𝐷)
129 elfzelz 13499 . . . . . . . . . 10 (𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑))) → 𝑚 ∈ ℤ)
130129adantl 481 . . . . . . . . 9 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℤ)
131119, 120, 121, 122, 128, 130dchrzrhcl 27097 . . . . . . . 8 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (𝑋‘(𝐿𝑚)) ∈ ℂ)
132 elfznn 13528 . . . . . . . . . . . 12 (𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑))) → 𝑚 ∈ ℕ)
133132adantl 481 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℕ)
134133nnrpd 13012 . . . . . . . . . 10 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℝ+)
135134rpsqrtcld 15356 . . . . . . . . 9 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ∈ ℝ+)
136135rpcnd 13016 . . . . . . . 8 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ∈ ℂ)
137135rpne0d 13019 . . . . . . . 8 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ≠ 0)
138131, 136, 137divcld 11988 . . . . . . 7 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → ((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
1394adantl 481 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑑 ∈ ℕ)
140139nnrpd 13012 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑑 ∈ ℝ+)
141140rpsqrtcld 15356 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘𝑑) ∈ ℝ+)
142141rpcnne0d 13023 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0))
143142adantr 480 . . . . . . . 8 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → ((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0))
144143simpld 494 . . . . . . 7 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑑) ∈ ℂ)
145143simprd 495 . . . . . . 7 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑑) ≠ 0)
146138, 144, 145divcld 11988 . . . . . 6 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
147118, 146syldan 590 . . . . 5 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
148147anasss 466 . . . 4 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
1491, 2, 3, 108, 148fsumcom2 15718 . . 3 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2)))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)))
150149mpteq2dva 5239 . 2 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) = (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2)))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))))
15165a1i 11 . . 3 (𝜑 → 1 ∈ ℝ)
152 2cn 12285 . . . . . . . 8 2 ∈ ℂ
15315rpsqrtcld 15356 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (√‘𝑥) ∈ ℝ+)
154153rpcnd 13016 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → (√‘𝑥) ∈ ℂ)
155 mulcl 11191 . . . . . . . 8 ((2 ∈ ℂ ∧ (√‘𝑥) ∈ ℂ) → (2 · (√‘𝑥)) ∈ ℂ)
156152, 154, 155sylancr 586 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (2 · (√‘𝑥)) ∈ ℂ)
157141rprecred 13025 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1 / (√‘𝑑)) ∈ ℝ)
1581, 157fsumrecl 15678 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) ∈ ℝ)
159158recnd 11240 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) ∈ ℂ)
160159, 156subcld 11569 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) ∈ ℂ)
161 2re 12284 . . . . . . . . . . 11 2 ∈ ℝ
162 dchrisum0.c . . . . . . . . . . . . 13 (𝜑𝐶 ∈ (0[,)+∞))
163 elrege0 13429 . . . . . . . . . . . . 13 (𝐶 ∈ (0[,)+∞) ↔ (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
164162, 163sylib 217 . . . . . . . . . . . 12 (𝜑 → (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
165164simpld 494 . . . . . . . . . . 11 (𝜑𝐶 ∈ ℝ)
166 remulcl 11192 . . . . . . . . . . 11 ((2 ∈ ℝ ∧ 𝐶 ∈ ℝ) → (2 · 𝐶) ∈ ℝ)
167161, 165, 166sylancr 586 . . . . . . . . . 10 (𝜑 → (2 · 𝐶) ∈ ℝ)
168167adantr 480 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (2 · 𝐶) ∈ ℝ)
169168, 153rerpdivcld 13045 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℝ)
170169recnd 11240 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℂ)
171156, 160, 170adddird 11237 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (((2 · (√‘𝑥)) + (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) · ((2 · 𝐶) / (√‘𝑥))) = (((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))))
172156, 159pncan3d 11572 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → ((2 · (√‘𝑥)) + (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) = Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)))
173172oveq1d 7417 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (((2 · (√‘𝑥)) + (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) · ((2 · 𝐶) / (√‘𝑥))) = (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
174 2cnd 12288 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → 2 ∈ ℂ)
175174, 154, 170mulassd 11235 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → ((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) = (2 · ((√‘𝑥) · ((2 · 𝐶) / (√‘𝑥)))))
176168recnd 11240 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℝ+) → (2 · 𝐶) ∈ ℂ)
177153rpne0d 13019 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℝ+) → (√‘𝑥) ≠ 0)
178176, 154, 177divcan2d 11990 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → ((√‘𝑥) · ((2 · 𝐶) / (√‘𝑥))) = (2 · 𝐶))
179178oveq2d 7418 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → (2 · ((√‘𝑥) · ((2 · 𝐶) / (√‘𝑥)))) = (2 · (2 · 𝐶)))
180175, 179eqtrd 2764 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → ((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) = (2 · (2 · 𝐶)))
181180oveq1d 7417 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))) = ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))))
182171, 173, 1813eqtr3d 2772 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) = ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))))
183182mpteq2dva 5239 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))) = (𝑥 ∈ ℝ+ ↦ ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥))))))
184 remulcl 11192 . . . . . . . 8 ((2 ∈ ℝ ∧ (2 · 𝐶) ∈ ℝ) → (2 · (2 · 𝐶)) ∈ ℝ)
185161, 167, 184sylancr 586 . . . . . . 7 (𝜑 → (2 · (2 · 𝐶)) ∈ ℝ)
186185recnd 11240 . . . . . 6 (𝜑 → (2 · (2 · 𝐶)) ∈ ℂ)
187186adantr 480 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (2 · (2 · 𝐶)) ∈ ℂ)
188160, 170mulcld 11232 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℂ)
189 rpssre 12979 . . . . . 6 + ⊆ ℝ
190 o1const 15562 . . . . . 6 ((ℝ+ ⊆ ℝ ∧ (2 · (2 · 𝐶)) ∈ ℂ) → (𝑥 ∈ ℝ+ ↦ (2 · (2 · 𝐶))) ∈ 𝑂(1))
191189, 186, 190sylancr 586 . . . . 5 (𝜑 → (𝑥 ∈ ℝ+ ↦ (2 · (2 · 𝐶))) ∈ 𝑂(1))
192 eqid 2724 . . . . . . . 8 (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))))
193192divsqrsum 26833 . . . . . . 7 (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ dom ⇝𝑟
194 rlimdmo1 15560 . . . . . . 7 ((𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ dom ⇝𝑟 → (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ 𝑂(1))
195193, 194mp1i 13 . . . . . 6 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ 𝑂(1))
196176, 154, 177divrecd 11991 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝐶) / (√‘𝑥)) = ((2 · 𝐶) · (1 / (√‘𝑥))))
197196mpteq2dva 5239 . . . . . . . 8 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) / (√‘𝑥))) = (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) · (1 / (√‘𝑥)))))
198153rprecred 13025 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (1 / (√‘𝑥)) ∈ ℝ)
199167recnd 11240 . . . . . . . . . 10 (𝜑 → (2 · 𝐶) ∈ ℂ)
200 rlimconst 15486 . . . . . . . . . 10 ((ℝ+ ⊆ ℝ ∧ (2 · 𝐶) ∈ ℂ) → (𝑥 ∈ ℝ+ ↦ (2 · 𝐶)) ⇝𝑟 (2 · 𝐶))
201189, 199, 200sylancr 586 . . . . . . . . 9 (𝜑 → (𝑥 ∈ ℝ+ ↦ (2 · 𝐶)) ⇝𝑟 (2 · 𝐶))
202 sqrtlim 26824 . . . . . . . . . 10 (𝑥 ∈ ℝ+ ↦ (1 / (√‘𝑥))) ⇝𝑟 0
203202a1i 11 . . . . . . . . 9 (𝜑 → (𝑥 ∈ ℝ+ ↦ (1 / (√‘𝑥))) ⇝𝑟 0)
204168, 198, 201, 203rlimmul 15588 . . . . . . . 8 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) · (1 / (√‘𝑥)))) ⇝𝑟 ((2 · 𝐶) · 0))
205197, 204eqbrtrd 5161 . . . . . . 7 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) / (√‘𝑥))) ⇝𝑟 ((2 · 𝐶) · 0))
206 rlimo1 15559 . . . . . . 7 ((𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) / (√‘𝑥))) ⇝𝑟 ((2 · 𝐶) · 0) → (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) / (√‘𝑥))) ∈ 𝑂(1))
207205, 206syl 17 . . . . . 6 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) / (√‘𝑥))) ∈ 𝑂(1))
208160, 170, 195, 207o1mul2 15567 . . . . 5 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))) ∈ 𝑂(1))
209187, 188, 191, 208o1add2 15566 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥))))) ∈ 𝑂(1))
210183, 209eqeltrd 2825 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))) ∈ 𝑂(1))
211158, 169remulcld 11242 . . 3 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℝ)
2123, 147fsumcl 15677 . . . 4 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
2131, 212fsumcl 15677 . . 3 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
214213abscld 15381 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ ℝ)
215211recnd 11240 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℂ)
216215abscld 15381 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))) ∈ ℝ)
217212abscld 15381 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ ℝ)
2181, 217fsumrecl 15678 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ ℝ)
2191, 212fsumabs 15745 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))))
220169adantr 480 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℝ)
221157, 220remulcld 11242 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℝ)
222118, 138syldan 590 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → ((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
2233, 222fsumcl 15677 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
224223abscld 15381 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) ∈ ℝ)
225 rpvmasum.a . . . . . . . . . . 11 (𝜑𝑁 ∈ ℕ)
226 rpvmasum2.1 . . . . . . . . . . 11 1 = (0g𝐺)
227 dchrisum0lem1.f . . . . . . . . . . 11 𝐹 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) / (√‘𝑎)))
228 dchrisum0.s . . . . . . . . . . 11 (𝜑 → seq1( + , 𝐹) ⇝ 𝑆)
229 dchrisum0.1 . . . . . . . . . . 11 (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / (√‘𝑦)))
230120, 122, 225, 119, 121, 226, 123, 125, 227, 162, 228, 229dchrisum0lem1b 27367 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) ≤ ((2 · 𝐶) / (√‘𝑥)))
231224, 220, 141, 230lediv1dd 13072 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) / (√‘𝑑)) ≤ (((2 · 𝐶) / (√‘𝑥)) / (√‘𝑑)))
232141rpcnd 13016 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘𝑑) ∈ ℂ)
233141rpne0d 13019 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘𝑑) ≠ 0)
234223, 232, 233absdivd 15400 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) = ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) / (abs‘(√‘𝑑))))
2353, 232, 222, 233fsumdivc 15730 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)))
236235fveq2d 6886 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) = (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))))
237141rprege0d 13021 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((√‘𝑑) ∈ ℝ ∧ 0 ≤ (√‘𝑑)))
238 absid 15241 . . . . . . . . . . . 12 (((√‘𝑑) ∈ ℝ ∧ 0 ≤ (√‘𝑑)) → (abs‘(√‘𝑑)) = (√‘𝑑))
239237, 238syl 17 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(√‘𝑑)) = (√‘𝑑))
240239oveq2d 7418 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) / (abs‘(√‘𝑑))) = ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) / (√‘𝑑)))
241234, 236, 2403eqtr3rd 2773 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) / (√‘𝑑)) = (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))))
242170adantr 480 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℂ)
243242, 232, 233divrec2d 11992 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((2 · 𝐶) / (√‘𝑥)) / (√‘𝑑)) = ((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
244231, 241, 2433brtr3d 5170 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ ((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
2451, 217, 221, 244fsumle 15743 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ Σ𝑑 ∈ (1...(⌊‘𝑥))((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
246157recnd 11240 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1 / (√‘𝑑)) ∈ ℂ)
2471, 170, 246fsummulc1 15729 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) = Σ𝑑 ∈ (1...(⌊‘𝑥))((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
248245, 247breqtrrd 5167 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
249214, 218, 211, 219, 248letrd 11369 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
250211leabsd 15359 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ≤ (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))))
251214, 211, 216, 249, 250letrd 11369 . . . 4 ((𝜑𝑥 ∈ ℝ+) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))))
252251adantrr 714 . . 3 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))))
253151, 210, 211, 213, 252o1le 15597 . 2 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1))
254150, 253eqeltrrd 2826 1 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2)))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395   = wceq 1533  wcel 2098  wne 2932  wral 3053  {crab 3424  cdif 3938  cun 3939  wss 3941  {csn 4621   class class class wbr 5139  cmpt 5222  dom cdm 5667  cfv 6534  (class class class)co 7402  cc 11105  cr 11106  0cc0 11107  1c1 11108   + caddc 11110   · cmul 11112  +∞cpnf 11243   < clt 11246  cle 11247  cmin 11442   / cdiv 11869  cn 12210  2c2 12265  0cn0 12470  cz 12556  cuz 12820  +crp 12972  [,)cico 13324  ...cfz 13482  cfl 13753  seqcseq 13964  cexp 14025  csqrt 15178  abscabs 15179  cli 15426  𝑟 crli 15427  𝑂(1)co1 15428  Σcsu 15630  Basecbs 17145  0gc0g 17386  ℤRHomczrh 21356  ℤ/nczn 21359  DChrcdchr 27084
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5276  ax-sep 5290  ax-nul 5297  ax-pow 5354  ax-pr 5418  ax-un 7719  ax-inf2 9633  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184  ax-pre-sup 11185  ax-addf 11186  ax-mulf 11187
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3771  df-csb 3887  df-dif 3944  df-un 3946  df-in 3948  df-ss 3958  df-pss 3960  df-nul 4316  df-if 4522  df-pw 4597  df-sn 4622  df-pr 4624  df-tp 4626  df-op 4628  df-uni 4901  df-int 4942  df-iun 4990  df-iin 4991  df-br 5140  df-opab 5202  df-mpt 5223  df-tr 5257  df-id 5565  df-eprel 5571  df-po 5579  df-so 5580  df-fr 5622  df-se 5623  df-we 5624  df-xp 5673  df-rel 5674  df-cnv 5675  df-co 5676  df-dm 5677  df-rn 5678  df-res 5679  df-ima 5680  df-pred 6291  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6486  df-fun 6536  df-fn 6537  df-f 6538  df-f1 6539  df-fo 6540  df-f1o 6541  df-fv 6542  df-isom 6543  df-riota 7358  df-ov 7405  df-oprab 7406  df-mpo 7407  df-of 7664  df-om 7850  df-1st 7969  df-2nd 7970  df-supp 8142  df-tpos 8207  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-2o 8463  df-er 8700  df-ec 8702  df-qs 8706  df-map 8819  df-pm 8820  df-ixp 8889  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-fsupp 9359  df-fi 9403  df-sup 9434  df-inf 9435  df-oi 9502  df-card 9931  df-pnf 11248  df-mnf 11249  df-xr 11250  df-ltxr 11251  df-le 11252  df-sub 11444  df-neg 11445  df-div 11870  df-nn 12211  df-2 12273  df-3 12274  df-4 12275  df-5 12276  df-6 12277  df-7 12278  df-8 12279  df-9 12280  df-n0 12471  df-z 12557  df-dec 12676  df-uz 12821  df-q 12931  df-rp 12973  df-xneg 13090  df-xadd 13091  df-xmul 13092  df-ioo 13326  df-ioc 13327  df-ico 13328  df-icc 13329  df-fz 13483  df-fzo 13626  df-fl 13755  df-mod 13833  df-seq 13965  df-exp 14026  df-fac 14232  df-bc 14261  df-hash 14289  df-shft 15012  df-cj 15044  df-re 15045  df-im 15046  df-sqrt 15180  df-abs 15181  df-limsup 15413  df-clim 15430  df-rlim 15431  df-o1 15432  df-lo1 15433  df-sum 15631  df-ef 16009  df-sin 16011  df-cos 16012  df-pi 16014  df-struct 17081  df-sets 17098  df-slot 17116  df-ndx 17128  df-base 17146  df-ress 17175  df-plusg 17211  df-mulr 17212  df-starv 17213  df-sca 17214  df-vsca 17215  df-ip 17216  df-tset 17217  df-ple 17218  df-ds 17220  df-unif 17221  df-hom 17222  df-cco 17223  df-rest 17369  df-topn 17370  df-0g 17388  df-gsum 17389  df-topgen 17390  df-pt 17391  df-prds 17394  df-xrs 17449  df-qtop 17454  df-imas 17455  df-qus 17456  df-xps 17457  df-mre 17531  df-mrc 17532  df-acs 17534  df-mgm 18565  df-sgrp 18644  df-mnd 18660  df-mhm 18705  df-submnd 18706  df-grp 18858  df-minusg 18859  df-sbg 18860  df-mulg 18988  df-subg 19042  df-nsg 19043  df-eqg 19044  df-ghm 19131  df-cntz 19225  df-cmn 19694  df-abl 19695  df-mgp 20032  df-rng 20050  df-ur 20079  df-ring 20132  df-cring 20133  df-oppr 20228  df-dvdsr 20251  df-unit 20252  df-rhm 20366  df-subrng 20438  df-subrg 20463  df-lmod 20700  df-lss 20771  df-lsp 20811  df-sra 21013  df-rgmod 21014  df-lidl 21059  df-rsp 21060  df-2idl 21099  df-psmet 21222  df-xmet 21223  df-met 21224  df-bl 21225  df-mopn 21226  df-fbas 21227  df-fg 21228  df-cnfld 21231  df-zring 21304  df-zrh 21360  df-zn 21363  df-top 22720  df-topon 22737  df-topsp 22759  df-bases 22773  df-cld 22847  df-ntr 22848  df-cls 22849  df-nei 22926  df-lp 22964  df-perf 22965  df-cn 23055  df-cnp 23056  df-haus 23143  df-cmp 23215  df-tx 23390  df-hmeo 23583  df-fil 23674  df-fm 23766  df-flim 23767  df-flf 23768  df-xms 24150  df-ms 24151  df-tms 24152  df-cncf 24722  df-limc 25719  df-dv 25720  df-log 26409  df-cxp 26410  df-dchr 27085
This theorem is referenced by:  dchrisum0lem3  27371
  Copyright terms: Public domain W3C validator