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

Theorem dchrisum0lem1 26019
Description: Lemma for dchrisum0 26023. (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 13329 . . . 4 ((𝜑𝑥 ∈ ℝ+) → (1...(⌊‘𝑥)) ∈ Fin)
2 fzfid 13329 . . . 4 ((𝜑𝑥 ∈ ℝ+) → (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∈ Fin)
3 fzfid 13329 . . . 4 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ∈ Fin)
4 elfznn 12924 . . . . . . 7 (𝑑 ∈ (1...(⌊‘𝑥)) → 𝑑 ∈ ℕ)
5 elfzuz 12892 . . . . . . 7 (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) → 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))
64, 5anim12i 612 . . . . . 6 ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1))))
76a1i 11 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))))
8 elfzuz 12892 . . . . . . 7 (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) → 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))
9 elfznn 12924 . . . . . . 7 (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) → 𝑑 ∈ ℕ)
108, 9anim12ci 613 . . . . . 6 ((𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1))))
1110a1i 11 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))))
12 eluzelz 12241 . . . . . . . . . . . 12 (𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)) → 𝑚 ∈ ℤ)
1312ad2antll 725 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℤ)
1413zred 12075 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℝ)
15 simpr 485 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ+) → 𝑥 ∈ ℝ+)
16 2z 12002 . . . . . . . . . . . . 13 2 ∈ ℤ
17 rpexpcl 13436 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ+ ∧ 2 ∈ ℤ) → (𝑥↑2) ∈ ℝ+)
1815, 16, 17sylancl 586 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ+) → (𝑥↑2) ∈ ℝ+)
1918rpred 12419 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℝ+) → (𝑥↑2) ∈ ℝ)
2019adantr 481 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ∈ ℝ)
21 simprl 767 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℕ)
2221nnrpd 12417 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℝ+)
2314, 20, 22lemuldivd 12468 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑚 · 𝑑) ≤ (𝑥↑2) ↔ 𝑚 ≤ ((𝑥↑2) / 𝑑)))
2421nnred 11641 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℝ)
2515rprege0d 12426 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ+) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
26 flge0nn0 13178 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ0)
27 nn0p1nn 11924 . . . . . . . . . . . . . 14 ((⌊‘𝑥) ∈ ℕ0 → ((⌊‘𝑥) + 1) ∈ ℕ)
2825, 26, 273syl 18 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ+) → ((⌊‘𝑥) + 1) ∈ ℕ)
2928adantr 481 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((⌊‘𝑥) + 1) ∈ ℕ)
30 simprr 769 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))
31 eluznn 12306 . . . . . . . . . . . 12 ((((⌊‘𝑥) + 1) ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1))) → 𝑚 ∈ ℕ)
3229, 30, 31syl2anc 584 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℕ)
3332nnrpd 12417 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑚 ∈ ℝ+)
3424, 20, 33lemuldiv2d 12469 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑚 · 𝑑) ≤ (𝑥↑2) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
3523, 34bitr3d 282 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
36 rpcn 12387 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ℝ+𝑥 ∈ ℂ)
3736adantl 482 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ+) → 𝑥 ∈ ℂ)
3837sqvald 13495 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ+) → (𝑥↑2) = (𝑥 · 𝑥))
3938adantr 481 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥↑2) = (𝑥 · 𝑥))
40 simplr 765 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑥 ∈ ℝ+)
4140rpred 12419 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑥 ∈ ℝ)
42 reflcl 13154 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ℝ → (⌊‘𝑥) ∈ ℝ)
43 peano2re 10801 . . . . . . . . . . . . . . . 16 ((⌊‘𝑥) ∈ ℝ → ((⌊‘𝑥) + 1) ∈ ℝ)
4441, 42, 433syl 18 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((⌊‘𝑥) + 1) ∈ ℝ)
45 fllep1 13159 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ℝ → 𝑥 ≤ ((⌊‘𝑥) + 1))
4641, 45syl 17 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑥 ≤ ((⌊‘𝑥) + 1))
47 eluzle 12244 . . . . . . . . . . . . . . . 16 (𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)) → ((⌊‘𝑥) + 1) ≤ 𝑚)
4847ad2antll 725 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((⌊‘𝑥) + 1) ≤ 𝑚)
4941, 44, 14, 46, 48letrd 10785 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑥𝑚)
5041, 14, 40lemul1d 12462 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥𝑚 ↔ (𝑥 · 𝑥) ≤ (𝑚 · 𝑥)))
5149, 50mpbid 233 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥 · 𝑥) ≤ (𝑚 · 𝑥))
5239, 51eqbrtrd 5079 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ≤ (𝑚 · 𝑥))
5320, 41, 33ledivmuld 12472 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (((𝑥↑2) / 𝑚) ≤ 𝑥 ↔ (𝑥↑2) ≤ (𝑚 · 𝑥)))
5452, 53mpbird 258 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑚) ≤ 𝑥)
55 nnre 11633 . . . . . . . . . . . . 13 (𝑑 ∈ ℕ → 𝑑 ∈ ℝ)
5655ad2antrl 724 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 𝑑 ∈ ℝ)
5720, 32nndivred 11679 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑚) ∈ ℝ)
58 letr 10722 . . . . . . . . . . . 12 ((𝑑 ∈ ℝ ∧ ((𝑥↑2) / 𝑚) ∈ ℝ ∧ 𝑥 ∈ ℝ) → ((𝑑 ≤ ((𝑥↑2) / 𝑚) ∧ ((𝑥↑2) / 𝑚) ≤ 𝑥) → 𝑑𝑥))
5956, 57, 41, 58syl3anc 1363 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑑 ≤ ((𝑥↑2) / 𝑚) ∧ ((𝑥↑2) / 𝑚) ≤ 𝑥) → 𝑑𝑥))
6054, 59mpan2d 690 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ≤ ((𝑥↑2) / 𝑚) → 𝑑𝑥))
6135, 60sylbid 241 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) → 𝑑𝑥))
6261pm4.71rd 563 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ (𝑑𝑥𝑚 ≤ ((𝑥↑2) / 𝑑))))
63 nnge1 11653 . . . . . . . . . . . . . 14 (𝑑 ∈ ℕ → 1 ≤ 𝑑)
6463ad2antrl 724 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → 1 ≤ 𝑑)
65 1re 10629 . . . . . . . . . . . . . . 15 1 ∈ ℝ
66 0lt1 11150 . . . . . . . . . . . . . . 15 0 < 1
6765, 66pm3.2i 471 . . . . . . . . . . . . . 14 (1 ∈ ℝ ∧ 0 < 1)
6822rpregt0d 12425 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ∈ ℝ ∧ 0 < 𝑑))
6918adantr 481 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ∈ ℝ+)
7069rpregt0d 12425 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) ∈ ℝ ∧ 0 < (𝑥↑2)))
71 lediv2 11518 . . . . . . . . . . . . . 14 (((1 ∈ ℝ ∧ 0 < 1) ∧ (𝑑 ∈ ℝ ∧ 0 < 𝑑) ∧ ((𝑥↑2) ∈ ℝ ∧ 0 < (𝑥↑2))) → (1 ≤ 𝑑 ↔ ((𝑥↑2) / 𝑑) ≤ ((𝑥↑2) / 1)))
7267, 68, 70, 71mp3an2i 1457 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (1 ≤ 𝑑 ↔ ((𝑥↑2) / 𝑑) ≤ ((𝑥↑2) / 1)))
7364, 72mpbid 233 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑑) ≤ ((𝑥↑2) / 1))
7420recnd 10657 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑥↑2) ∈ ℂ)
7574div1d 11396 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 1) = (𝑥↑2))
7673, 75breqtrd 5083 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑑) ≤ (𝑥↑2))
77 simpl 483 . . . . . . . . . . . . 13 ((𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1))) → 𝑑 ∈ ℕ)
78 nndivre 11666 . . . . . . . . . . . . 13 (((𝑥↑2) ∈ ℝ ∧ 𝑑 ∈ ℕ) → ((𝑥↑2) / 𝑑) ∈ ℝ)
7919, 77, 78syl2an 595 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑥↑2) / 𝑑) ∈ ℝ)
80 letr 10722 . . . . . . . . . . . 12 ((𝑚 ∈ ℝ ∧ ((𝑥↑2) / 𝑑) ∈ ℝ ∧ (𝑥↑2) ∈ ℝ) → ((𝑚 ≤ ((𝑥↑2) / 𝑑) ∧ ((𝑥↑2) / 𝑑) ≤ (𝑥↑2)) → 𝑚 ≤ (𝑥↑2)))
8114, 79, 20, 80syl3anc 1363 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑚 ≤ ((𝑥↑2) / 𝑑) ∧ ((𝑥↑2) / 𝑑) ≤ (𝑥↑2)) → 𝑚 ≤ (𝑥↑2)))
8276, 81mpan2d 690 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) → 𝑚 ≤ (𝑥↑2)))
8335, 82sylbird 261 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ≤ ((𝑥↑2) / 𝑚) → 𝑚 ≤ (𝑥↑2)))
8483pm4.71rd 563 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ≤ ((𝑥↑2) / 𝑚) ↔ (𝑚 ≤ (𝑥↑2) ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
8535, 62, 843bitr3d 310 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑑𝑥𝑚 ≤ ((𝑥↑2) / 𝑑)) ↔ (𝑚 ≤ (𝑥↑2) ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
86 fznnfl 13218 . . . . . . . . . 10 (𝑥 ∈ ℝ → (𝑑 ∈ (1...(⌊‘𝑥)) ↔ (𝑑 ∈ ℕ ∧ 𝑑𝑥)))
8786baibd 540 . . . . . . . . 9 ((𝑥 ∈ ℝ ∧ 𝑑 ∈ ℕ) → (𝑑 ∈ (1...(⌊‘𝑥)) ↔ 𝑑𝑥))
8841, 21, 87syl2anc 584 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ∈ (1...(⌊‘𝑥)) ↔ 𝑑𝑥))
8979flcld 13156 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (⌊‘((𝑥↑2) / 𝑑)) ∈ ℤ)
90 elfz5 12888 . . . . . . . . . 10 ((𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)) ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ ℤ) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
9130, 89, 90syl2anc 584 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
92 flge 13163 . . . . . . . . . 10 ((((𝑥↑2) / 𝑑) ∈ ℝ ∧ 𝑚 ∈ ℤ) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
9379, 13, 92syl2anc 584 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ ((𝑥↑2) / 𝑑) ↔ 𝑚 ≤ (⌊‘((𝑥↑2) / 𝑑))))
9491, 93bitr4d 283 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ↔ 𝑚 ≤ ((𝑥↑2) / 𝑑)))
9588, 94anbi12d 630 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑑𝑥𝑚 ≤ ((𝑥↑2) / 𝑑))))
9620flcld 13156 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (⌊‘(𝑥↑2)) ∈ ℤ)
97 elfz5 12888 . . . . . . . . . 10 ((𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)) ∧ (⌊‘(𝑥↑2)) ∈ ℤ) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
9830, 96, 97syl2anc 584 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
99 flge 13163 . . . . . . . . . 10 (((𝑥↑2) ∈ ℝ ∧ 𝑚 ∈ ℤ) → (𝑚 ≤ (𝑥↑2) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
10020, 13, 99syl2anc 584 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ≤ (𝑥↑2) ↔ 𝑚 ≤ (⌊‘(𝑥↑2))))
10198, 100bitr4d 283 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ↔ 𝑚 ≤ (𝑥↑2)))
102 fznnfl 13218 . . . . . . . . . 10 (((𝑥↑2) / 𝑚) ∈ ℝ → (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) ↔ (𝑑 ∈ ℕ ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
103102baibd 540 . . . . . . . . 9 ((((𝑥↑2) / 𝑚) ∈ ℝ ∧ 𝑑 ∈ ℕ) → (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
10457, 21, 103syl2anc 584 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) ↔ 𝑑 ≤ ((𝑥↑2) / 𝑚)))
105101, 104anbi12d 630 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) ↔ (𝑚 ≤ (𝑥↑2) ∧ 𝑑 ≤ ((𝑥↑2) / 𝑚))))
10685, 95, 1053bitr4d 312 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1)))) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))))))
107106ex 413 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((𝑑 ∈ ℕ ∧ 𝑚 ∈ (ℤ‘((⌊‘𝑥) + 1))) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))))))
1087, 11, 107pm5.21ndd 381 . . . 4 ((𝜑𝑥 ∈ ℝ+) → ((𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) ↔ (𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))))))
109 ssun2 4146 . . . . . . . 8 (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ⊆ ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))))
11028adantr 481 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((⌊‘𝑥) + 1) ∈ ℕ)
111 nnuz 12269 . . . . . . . . . 10 ℕ = (ℤ‘1)
112110, 111eleqtrdi 2920 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((⌊‘𝑥) + 1) ∈ (ℤ‘1))
113 dchrisum0lem1a 25989 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (𝑥 ≤ ((𝑥↑2) / 𝑑) ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ‘(⌊‘𝑥))))
114113simprd 496 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ‘(⌊‘𝑥)))
115 fzsplit2 12920 . . . . . . . . 9 ((((⌊‘𝑥) + 1) ∈ (ℤ‘1) ∧ (⌊‘((𝑥↑2) / 𝑑)) ∈ (ℤ‘(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑑))) = ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))))
116112, 114, 115syl2anc 584 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑑))) = ((1...(⌊‘𝑥)) ∪ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))))
117109, 116sseqtrrid 4017 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))) ⊆ (1...(⌊‘((𝑥↑2) / 𝑑))))
118117sselda 3964 . . . . . 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 4054 . . . . . . . . . . . 12 𝑊 ⊆ (𝐷 ∖ { 1 })
125 dchrisum0.b . . . . . . . . . . . 12 (𝜑𝑋𝑊)
126124, 125sseldi 3962 . . . . . . . . . . 11 (𝜑𝑋 ∈ (𝐷 ∖ { 1 }))
127126eldifad 3945 . . . . . . . . . 10 (𝜑𝑋𝐷)
128127ad3antrrr 726 . . . . . . . . 9 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑋𝐷)
129 elfzelz 12896 . . . . . . . . . 10 (𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑))) → 𝑚 ∈ ℤ)
130129adantl 482 . . . . . . . . 9 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℤ)
131119, 120, 121, 122, 128, 130dchrzrhcl 25748 . . . . . . . 8 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (𝑋‘(𝐿𝑚)) ∈ ℂ)
132 elfznn 12924 . . . . . . . . . . . 12 (𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑))) → 𝑚 ∈ ℕ)
133132adantl 482 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℕ)
134133nnrpd 12417 . . . . . . . . . 10 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → 𝑚 ∈ ℝ+)
135134rpsqrtcld 14759 . . . . . . . . 9 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ∈ ℝ+)
136135rpcnd 12421 . . . . . . . 8 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ∈ ℂ)
137135rpne0d 12424 . . . . . . . 8 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑚) ≠ 0)
138131, 136, 137divcld 11404 . . . . . . 7 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → ((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
1394adantl 482 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑑 ∈ ℕ)
140139nnrpd 12417 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → 𝑑 ∈ ℝ+)
141140rpsqrtcld 14759 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘𝑑) ∈ ℝ+)
142141rpcnne0d 12428 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0))
143142adantr 481 . . . . . . . 8 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → ((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0))
144143simpld 495 . . . . . . 7 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑑) ∈ ℂ)
145143simprd 496 . . . . . . 7 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (√‘𝑑) ≠ 0)
146138, 144, 145divcld 11404 . . . . . 6 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘((𝑥↑2) / 𝑑)))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
147118, 146syldan 591 . . . . 5 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
148147anasss 467 . . . 4 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑑 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑))))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
1491, 2, 3, 108, 148fsumcom2 15117 . . 3 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2)))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)))
150149mpteq2dva 5152 . 2 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) = (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2)))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))))
15165a1i 11 . . 3 (𝜑 → 1 ∈ ℝ)
152 2cn 11700 . . . . . . . 8 2 ∈ ℂ
15315rpsqrtcld 14759 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (√‘𝑥) ∈ ℝ+)
154153rpcnd 12421 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → (√‘𝑥) ∈ ℂ)
155 mulcl 10609 . . . . . . . 8 ((2 ∈ ℂ ∧ (√‘𝑥) ∈ ℂ) → (2 · (√‘𝑥)) ∈ ℂ)
156152, 154, 155sylancr 587 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (2 · (√‘𝑥)) ∈ ℂ)
157141rprecred 12430 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1 / (√‘𝑑)) ∈ ℝ)
1581, 157fsumrecl 15079 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) ∈ ℝ)
159158recnd 10657 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) ∈ ℂ)
160159, 156subcld 10985 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) ∈ ℂ)
161 2re 11699 . . . . . . . . . . 11 2 ∈ ℝ
162 dchrisum0.c . . . . . . . . . . . . 13 (𝜑𝐶 ∈ (0[,)+∞))
163 elrege0 12830 . . . . . . . . . . . . 13 (𝐶 ∈ (0[,)+∞) ↔ (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
164162, 163sylib 219 . . . . . . . . . . . 12 (𝜑 → (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
165164simpld 495 . . . . . . . . . . 11 (𝜑𝐶 ∈ ℝ)
166 remulcl 10610 . . . . . . . . . . 11 ((2 ∈ ℝ ∧ 𝐶 ∈ ℝ) → (2 · 𝐶) ∈ ℝ)
167161, 165, 166sylancr 587 . . . . . . . . . 10 (𝜑 → (2 · 𝐶) ∈ ℝ)
168167adantr 481 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (2 · 𝐶) ∈ ℝ)
169168, 153rerpdivcld 12450 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℝ)
170169recnd 10657 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℂ)
171156, 160, 170adddird 10654 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (((2 · (√‘𝑥)) + (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) · ((2 · 𝐶) / (√‘𝑥))) = (((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))))
172156, 159pncan3d 10988 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → ((2 · (√‘𝑥)) + (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) = Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)))
173172oveq1d 7160 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (((2 · (√‘𝑥)) + (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) · ((2 · 𝐶) / (√‘𝑥))) = (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
174 2cnd 11703 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → 2 ∈ ℂ)
175174, 154, 170mulassd 10652 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → ((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) = (2 · ((√‘𝑥) · ((2 · 𝐶) / (√‘𝑥)))))
176168recnd 10657 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℝ+) → (2 · 𝐶) ∈ ℂ)
177153rpne0d 12424 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℝ+) → (√‘𝑥) ≠ 0)
178176, 154, 177divcan2d 11406 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → ((√‘𝑥) · ((2 · 𝐶) / (√‘𝑥))) = (2 · 𝐶))
179178oveq2d 7161 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → (2 · ((√‘𝑥) · ((2 · 𝐶) / (√‘𝑥)))) = (2 · (2 · 𝐶)))
180175, 179eqtrd 2853 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → ((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) = (2 · (2 · 𝐶)))
181180oveq1d 7160 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (((2 · (√‘𝑥)) · ((2 · 𝐶) / (√‘𝑥))) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))) = ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))))
182171, 173, 1813eqtr3d 2861 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) = ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))))
183182mpteq2dva 5152 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))) = (𝑥 ∈ ℝ+ ↦ ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥))))))
184 remulcl 10610 . . . . . . . 8 ((2 ∈ ℝ ∧ (2 · 𝐶) ∈ ℝ) → (2 · (2 · 𝐶)) ∈ ℝ)
185161, 167, 184sylancr 587 . . . . . . 7 (𝜑 → (2 · (2 · 𝐶)) ∈ ℝ)
186185recnd 10657 . . . . . 6 (𝜑 → (2 · (2 · 𝐶)) ∈ ℂ)
187186adantr 481 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (2 · (2 · 𝐶)) ∈ ℂ)
188160, 170mulcld 10649 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℂ)
189 rpssre 12384 . . . . . 6 + ⊆ ℝ
190 o1const 14964 . . . . . 6 ((ℝ+ ⊆ ℝ ∧ (2 · (2 · 𝐶)) ∈ ℂ) → (𝑥 ∈ ℝ+ ↦ (2 · (2 · 𝐶))) ∈ 𝑂(1))
191189, 186, 190sylancr 587 . . . . 5 (𝜑 → (𝑥 ∈ ℝ+ ↦ (2 · (2 · 𝐶))) ∈ 𝑂(1))
192 eqid 2818 . . . . . . . 8 (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))))
193192divsqrsum 25486 . . . . . . 7 (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ dom ⇝𝑟
194 rlimdmo1 14962 . . . . . . 7 ((𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ dom ⇝𝑟 → (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ 𝑂(1))
195193, 194mp1i 13 . . . . . 6 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥)))) ∈ 𝑂(1))
196176, 154, 177divrecd 11407 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝐶) / (√‘𝑥)) = ((2 · 𝐶) · (1 / (√‘𝑥))))
197196mpteq2dva 5152 . . . . . . . 8 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) / (√‘𝑥))) = (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) · (1 / (√‘𝑥)))))
198153rprecred 12430 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (1 / (√‘𝑥)) ∈ ℝ)
199167recnd 10657 . . . . . . . . . 10 (𝜑 → (2 · 𝐶) ∈ ℂ)
200 rlimconst 14889 . . . . . . . . . 10 ((ℝ+ ⊆ ℝ ∧ (2 · 𝐶) ∈ ℂ) → (𝑥 ∈ ℝ+ ↦ (2 · 𝐶)) ⇝𝑟 (2 · 𝐶))
201189, 199, 200sylancr 587 . . . . . . . . 9 (𝜑 → (𝑥 ∈ ℝ+ ↦ (2 · 𝐶)) ⇝𝑟 (2 · 𝐶))
202 sqrtlim 25477 . . . . . . . . . 10 (𝑥 ∈ ℝ+ ↦ (1 / (√‘𝑥))) ⇝𝑟 0
203202a1i 11 . . . . . . . . 9 (𝜑 → (𝑥 ∈ ℝ+ ↦ (1 / (√‘𝑥))) ⇝𝑟 0)
204168, 198, 201, 203rlimmul 14989 . . . . . . . 8 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) · (1 / (√‘𝑥)))) ⇝𝑟 ((2 · 𝐶) · 0))
205197, 204eqbrtrd 5079 . . . . . . 7 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) / (√‘𝑥))) ⇝𝑟 ((2 · 𝐶) · 0))
206 rlimo1 14961 . . . . . . 7 ((𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) / (√‘𝑥))) ⇝𝑟 ((2 · 𝐶) · 0) → (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) / (√‘𝑥))) ∈ 𝑂(1))
207205, 206syl 17 . . . . . 6 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((2 · 𝐶) / (√‘𝑥))) ∈ 𝑂(1))
208160, 170, 195, 207o1mul2 14969 . . . . 5 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥)))) ∈ 𝑂(1))
209187, 188, 191, 208o1add2 14968 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((2 · (2 · 𝐶)) + ((Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) − (2 · (√‘𝑥))) · ((2 · 𝐶) / (√‘𝑥))))) ∈ 𝑂(1))
210183, 209eqeltrd 2910 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))) ∈ 𝑂(1))
211158, 169remulcld 10659 . . 3 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℝ)
2123, 147fsumcl 15078 . . . 4 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
2131, 212fsumcl 15078 . . 3 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
214213abscld 14784 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ ℝ)
215211recnd 10657 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℂ)
216215abscld 14784 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))) ∈ ℝ)
217212abscld 14784 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ ℝ)
2181, 217fsumrecl 15079 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ ℝ)
2191, 212fsumabs 15144 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))))
220169adantr 481 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℝ)
221157, 220remulcld 10659 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ∈ ℝ)
222118, 138syldan 591 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))) → ((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
2233, 222fsumcl 15078 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
224223abscld 14784 . . . . . . . . . 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 26018 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) ≤ ((2 · 𝐶) / (√‘𝑥)))
231224, 220, 141, 230lediv1dd 12477 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) / (√‘𝑑)) ≤ (((2 · 𝐶) / (√‘𝑥)) / (√‘𝑑)))
232141rpcnd 12421 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘𝑑) ∈ ℂ)
233141rpne0d 12424 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (√‘𝑑) ≠ 0)
234223, 232, 233absdivd 14803 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) = ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) / (abs‘(√‘𝑑))))
2353, 232, 222, 233fsumdivc 15129 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)))
236235fveq2d 6667 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) = (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))))
237141rprege0d 12426 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((√‘𝑑) ∈ ℝ ∧ 0 ≤ (√‘𝑑)))
238 absid 14644 . . . . . . . . . . . 12 (((√‘𝑑) ∈ ℝ ∧ 0 ≤ (√‘𝑑)) → (abs‘(√‘𝑑)) = (√‘𝑑))
239237, 238syl 17 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘(√‘𝑑)) = (√‘𝑑))
240239oveq2d 7161 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) / (abs‘(√‘𝑑))) = ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) / (√‘𝑑)))
241234, 236, 2403eqtr3rd 2862 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))((𝑋‘(𝐿𝑚)) / (√‘𝑚))) / (√‘𝑑)) = (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))))
242170adantr 481 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → ((2 · 𝐶) / (√‘𝑥)) ∈ ℂ)
243242, 232, 233divrec2d 11408 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (((2 · 𝐶) / (√‘𝑥)) / (√‘𝑑)) = ((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
244231, 241, 2433brtr3d 5088 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ ((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
2451, 217, 221, 244fsumle 15142 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ Σ𝑑 ∈ (1...(⌊‘𝑥))((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
246157recnd 10657 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑑 ∈ (1...(⌊‘𝑥))) → (1 / (√‘𝑑)) ∈ ℂ)
2471, 170, 246fsummulc1 15128 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) = Σ𝑑 ∈ (1...(⌊‘𝑥))((1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
248245, 247breqtrrd 5085 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → Σ𝑑 ∈ (1...(⌊‘𝑥))(abs‘Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
249214, 218, 211, 219, 248letrd 10785 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))))
250211leabsd 14762 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥))) ≤ (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))))
251214, 211, 216, 249, 250letrd 10785 . . . 4 ((𝜑𝑥 ∈ ℝ+) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))))
252251adantrr 713 . . 3 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ≤ (abs‘(Σ𝑑 ∈ (1...(⌊‘𝑥))(1 / (√‘𝑑)) · ((2 · 𝐶) / (√‘𝑥)))))
253151, 210, 211, 213, 252o1le 14997 . 2 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑑 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘((𝑥↑2) / 𝑑)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1))
254150, 253eqeltrrd 2911 1 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (((⌊‘𝑥) + 1)...(⌊‘(𝑥↑2)))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396   = wceq 1528  wcel 2105  wne 3013  wral 3135  {crab 3139  cdif 3930  cun 3931  wss 3933  {csn 4557   class class class wbr 5057  cmpt 5137  dom cdm 5548  cfv 6348  (class class class)co 7145  cc 10523  cr 10524  0cc0 10525  1c1 10526   + caddc 10528   · cmul 10530  +∞cpnf 10660   < clt 10663  cle 10664  cmin 10858   / cdiv 11285  cn 11626  2c2 11680  0cn0 11885  cz 11969  cuz 12231  +crp 12377  [,)cico 12728  ...cfz 12880  cfl 13148  seqcseq 13357  cexp 13417  csqrt 14580  abscabs 14581  cli 14829  𝑟 crli 14830  𝑂(1)co1 14831  Σcsu 15030  Basecbs 16471  0gc0g 16701  ℤRHomczrh 20575  ℤ/nczn 20578  DChrcdchr 25735
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1787  ax-4 1801  ax-5 1902  ax-6 1961  ax-7 2006  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2151  ax-12 2167  ax-ext 2790  ax-rep 5181  ax-sep 5194  ax-nul 5201  ax-pow 5257  ax-pr 5320  ax-un 7450  ax-inf2 9092  ax-cnex 10581  ax-resscn 10582  ax-1cn 10583  ax-icn 10584  ax-addcl 10585  ax-addrcl 10586  ax-mulcl 10587  ax-mulrcl 10588  ax-mulcom 10589  ax-addass 10590  ax-mulass 10591  ax-distr 10592  ax-i2m1 10593  ax-1ne0 10594  ax-1rid 10595  ax-rnegex 10596  ax-rrecex 10597  ax-cnre 10598  ax-pre-lttri 10599  ax-pre-lttrn 10600  ax-pre-ltadd 10601  ax-pre-mulgt0 10602  ax-pre-sup 10603  ax-addf 10604  ax-mulf 10605
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 842  df-3or 1080  df-3an 1081  df-tru 1531  df-fal 1541  df-ex 1772  df-nf 1776  df-sb 2061  df-mo 2615  df-eu 2647  df-clab 2797  df-cleq 2811  df-clel 2890  df-nfc 2960  df-ne 3014  df-nel 3121  df-ral 3140  df-rex 3141  df-reu 3142  df-rmo 3143  df-rab 3144  df-v 3494  df-sbc 3770  df-csb 3881  df-dif 3936  df-un 3938  df-in 3940  df-ss 3949  df-pss 3951  df-nul 4289  df-if 4464  df-pw 4537  df-sn 4558  df-pr 4560  df-tp 4562  df-op 4564  df-uni 4831  df-int 4868  df-iun 4912  df-iin 4913  df-br 5058  df-opab 5120  df-mpt 5138  df-tr 5164  df-id 5453  df-eprel 5458  df-po 5467  df-so 5468  df-fr 5507  df-se 5508  df-we 5509  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-res 5560  df-ima 5561  df-pred 6141  df-ord 6187  df-on 6188  df-lim 6189  df-suc 6190  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-fo 6354  df-f1o 6355  df-fv 6356  df-isom 6357  df-riota 7103  df-ov 7148  df-oprab 7149  df-mpo 7150  df-of 7398  df-om 7570  df-1st 7678  df-2nd 7679  df-supp 7820  df-tpos 7881  df-wrecs 7936  df-recs 7997  df-rdg 8035  df-1o 8091  df-2o 8092  df-oadd 8095  df-er 8278  df-ec 8280  df-qs 8284  df-map 8397  df-pm 8398  df-ixp 8450  df-en 8498  df-dom 8499  df-sdom 8500  df-fin 8501  df-fsupp 8822  df-fi 8863  df-sup 8894  df-inf 8895  df-oi 8962  df-card 9356  df-pnf 10665  df-mnf 10666  df-xr 10667  df-ltxr 10668  df-le 10669  df-sub 10860  df-neg 10861  df-div 11286  df-nn 11627  df-2 11688  df-3 11689  df-4 11690  df-5 11691  df-6 11692  df-7 11693  df-8 11694  df-9 11695  df-n0 11886  df-z 11970  df-dec 12087  df-uz 12232  df-q 12337  df-rp 12378  df-xneg 12495  df-xadd 12496  df-xmul 12497  df-ioo 12730  df-ioc 12731  df-ico 12732  df-icc 12733  df-fz 12881  df-fzo 13022  df-fl 13150  df-mod 13226  df-seq 13358  df-exp 13418  df-fac 13622  df-bc 13651  df-hash 13679  df-shft 14414  df-cj 14446  df-re 14447  df-im 14448  df-sqrt 14582  df-abs 14583  df-limsup 14816  df-clim 14833  df-rlim 14834  df-o1 14835  df-lo1 14836  df-sum 15031  df-ef 15409  df-sin 15411  df-cos 15412  df-pi 15414  df-struct 16473  df-ndx 16474  df-slot 16475  df-base 16477  df-sets 16478  df-ress 16479  df-plusg 16566  df-mulr 16567  df-starv 16568  df-sca 16569  df-vsca 16570  df-ip 16571  df-tset 16572  df-ple 16573  df-ds 16575  df-unif 16576  df-hom 16577  df-cco 16578  df-rest 16684  df-topn 16685  df-0g 16703  df-gsum 16704  df-topgen 16705  df-pt 16706  df-prds 16709  df-xrs 16763  df-qtop 16768  df-imas 16769  df-qus 16770  df-xps 16771  df-mre 16845  df-mrc 16846  df-acs 16848  df-mgm 17840  df-sgrp 17889  df-mnd 17900  df-mhm 17944  df-submnd 17945  df-grp 18044  df-minusg 18045  df-sbg 18046  df-mulg 18163  df-subg 18214  df-nsg 18215  df-eqg 18216  df-ghm 18294  df-cntz 18385  df-cmn 18837  df-abl 18838  df-mgp 19169  df-ur 19181  df-ring 19228  df-cring 19229  df-oppr 19302  df-dvdsr 19320  df-unit 19321  df-rnghom 19396  df-subrg 19462  df-lmod 19565  df-lss 19633  df-lsp 19673  df-sra 19873  df-rgmod 19874  df-lidl 19875  df-rsp 19876  df-2idl 19933  df-psmet 20465  df-xmet 20466  df-met 20467  df-bl 20468  df-mopn 20469  df-fbas 20470  df-fg 20471  df-cnfld 20474  df-zring 20546  df-zrh 20579  df-zn 20582  df-top 21430  df-topon 21447  df-topsp 21469  df-bases 21482  df-cld 21555  df-ntr 21556  df-cls 21557  df-nei 21634  df-lp 21672  df-perf 21673  df-cn 21763  df-cnp 21764  df-haus 21851  df-cmp 21923  df-tx 22098  df-hmeo 22291  df-fil 22382  df-fm 22474  df-flim 22475  df-flf 22476  df-xms 22857  df-ms 22858  df-tms 22859  df-cncf 23413  df-limc 24391  df-dv 24392  df-log 25067  df-cxp 25068  df-dchr 25736
This theorem is referenced by:  dchrisum0lem3  26022
  Copyright terms: Public domain W3C validator