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

Theorem dchrisum0lem2 26571
Description: Lemma for dchrisum0 26573. (Contributed by Mario Carneiro, 12-May-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( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / (√‘𝑦)))
dchrisum0lem2.h 𝐻 = (𝑦 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))))
dchrisum0lem2.u (𝜑𝐻𝑟 𝑈)
dchrisum0lem2.k 𝐾 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) / 𝑎))
dchrisum0lem2.e (𝜑𝐸 ∈ (0[,)+∞))
dchrisum0lem2.t (𝜑 → seq1( + , 𝐾) ⇝ 𝑇)
dchrisum0lem2.3 (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 / 𝑦))
Assertion
Ref Expression
dchrisum0lem2 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1))
Distinct variable groups:   𝑥,𝑚,𝑦, 1   𝑚,𝑑,𝑥,𝑦,𝐶   𝐹,𝑑,𝑥,𝑦   𝑎,𝑑,𝑚,𝑥,𝑦   𝐸,𝑑,𝑚,𝑥,𝑦   𝑚,𝐾,𝑦   𝑚,𝑁,𝑥,𝑦   𝜑,𝑑,𝑚,𝑥   𝑇,𝑑,𝑚,𝑥,𝑦   𝑆,𝑑,𝑚,𝑥,𝑦   𝑈,𝑚,𝑥   𝑥,𝑊   𝑚,𝑍,𝑥,𝑦   𝐷,𝑚,𝑥,𝑦   𝐿,𝑎,𝑑,𝑚,𝑥,𝑦   𝑋,𝑎,𝑑,𝑚,𝑥,𝑦   𝑚,𝐹
Allowed substitution hints:   𝜑(𝑦,𝑎)   𝐶(𝑎)   𝐷(𝑎,𝑑)   𝑆(𝑎)   𝑇(𝑎)   𝑈(𝑦,𝑎,𝑑)   1 (𝑎,𝑑)   𝐸(𝑎)   𝐹(𝑎)   𝐺(𝑥,𝑦,𝑚,𝑎,𝑑)   𝐻(𝑥,𝑦,𝑚,𝑎,𝑑)   𝐾(𝑥,𝑎,𝑑)   𝑁(𝑎,𝑑)   𝑊(𝑦,𝑚,𝑎,𝑑)   𝑍(𝑎,𝑑)

Proof of Theorem dchrisum0lem2
StepHypRef Expression
1 2cnd 11981 . . 3 ((𝜑𝑥 ∈ ℝ+) → 2 ∈ ℂ)
2 rpcn 12669 . . . . 5 (𝑥 ∈ ℝ+𝑥 ∈ ℂ)
32adantl 481 . . . 4 ((𝜑𝑥 ∈ ℝ+) → 𝑥 ∈ ℂ)
4 fzfid 13621 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (1...(⌊‘𝑥)) ∈ Fin)
5 rpvmasum2.g . . . . . . 7 𝐺 = (DChr‘𝑁)
6 rpvmasum.z . . . . . . 7 𝑍 = (ℤ/nℤ‘𝑁)
7 rpvmasum2.d . . . . . . 7 𝐷 = (Base‘𝐺)
8 rpvmasum.l . . . . . . 7 𝐿 = (ℤRHom‘𝑍)
9 rpvmasum2.w . . . . . . . . . . 11 𝑊 = {𝑦 ∈ (𝐷 ∖ { 1 }) ∣ Σ𝑚 ∈ ℕ ((𝑦‘(𝐿𝑚)) / 𝑚) = 0}
109ssrab3 4011 . . . . . . . . . 10 𝑊 ⊆ (𝐷 ∖ { 1 })
11 dchrisum0.b . . . . . . . . . 10 (𝜑𝑋𝑊)
1210, 11sselid 3915 . . . . . . . . 9 (𝜑𝑋 ∈ (𝐷 ∖ { 1 }))
1312eldifad 3895 . . . . . . . 8 (𝜑𝑋𝐷)
1413ad2antrr 722 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑋𝐷)
15 elfzelz 13185 . . . . . . . 8 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℤ)
1615adantl 481 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℤ)
175, 6, 7, 8, 14, 16dchrzrhcl 26298 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑋‘(𝐿𝑚)) ∈ ℂ)
18 elfznn 13214 . . . . . . . . 9 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℕ)
1918nnrpd 12699 . . . . . . . 8 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℝ+)
2019adantl 481 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℝ+)
2120rpcnd 12703 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℂ)
2220rpne0d 12706 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ≠ 0)
2317, 21, 22divcld 11681 . . . . 5 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
244, 23fsumcl 15373 . . . 4 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
253, 24mulcld 10926 . . 3 ((𝜑𝑥 ∈ ℝ+) → (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℂ)
26 rpssre 12666 . . . . 5 + ⊆ ℝ
27 2cn 11978 . . . . 5 2 ∈ ℂ
28 o1const 15257 . . . . 5 ((ℝ+ ⊆ ℝ ∧ 2 ∈ ℂ) → (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1))
2926, 27, 28mp2an 688 . . . 4 (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1)
3029a1i 11 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1))
3126a1i 11 . . . 4 (𝜑 → ℝ+ ⊆ ℝ)
32 1red 10907 . . . 4 (𝜑 → 1 ∈ ℝ)
33 dchrisum0lem2.e . . . . 5 (𝜑𝐸 ∈ (0[,)+∞))
34 elrege0 13115 . . . . . 6 (𝐸 ∈ (0[,)+∞) ↔ (𝐸 ∈ ℝ ∧ 0 ≤ 𝐸))
3534simplbi 497 . . . . 5 (𝐸 ∈ (0[,)+∞) → 𝐸 ∈ ℝ)
3633, 35syl 17 . . . 4 (𝜑𝐸 ∈ ℝ)
373, 24absmuld 15094 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = ((abs‘𝑥) · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
38 rprege0 12674 . . . . . . . . . 10 (𝑥 ∈ ℝ+ → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
3938adantl 481 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
40 absid 14936 . . . . . . . . 9 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (abs‘𝑥) = 𝑥)
4139, 40syl 17 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → (abs‘𝑥) = 𝑥)
4241oveq1d 7270 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → ((abs‘𝑥) · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
4337, 42eqtrd 2778 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
4443adantrr 713 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
4524adantrr 713 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
4645subid1d 11251 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) − 0) = Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))
4718adantl 481 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℕ)
48 2fveq3 6761 . . . . . . . . . . . . . . 15 (𝑎 = 𝑚 → (𝑋‘(𝐿𝑎)) = (𝑋‘(𝐿𝑚)))
49 id 22 . . . . . . . . . . . . . . 15 (𝑎 = 𝑚𝑎 = 𝑚)
5048, 49oveq12d 7273 . . . . . . . . . . . . . 14 (𝑎 = 𝑚 → ((𝑋‘(𝐿𝑎)) / 𝑎) = ((𝑋‘(𝐿𝑚)) / 𝑚))
51 dchrisum0lem2.k . . . . . . . . . . . . . 14 𝐾 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) / 𝑎))
52 ovex 7288 . . . . . . . . . . . . . 14 ((𝑋‘(𝐿𝑎)) / 𝑎) ∈ V
5350, 51, 52fvmpt3i 6862 . . . . . . . . . . . . 13 (𝑚 ∈ ℕ → (𝐾𝑚) = ((𝑋‘(𝐿𝑚)) / 𝑚))
5447, 53syl 17 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐾𝑚) = ((𝑋‘(𝐿𝑚)) / 𝑚))
5554adantlrr 717 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐾𝑚) = ((𝑋‘(𝐿𝑚)) / 𝑚))
56 rpregt0 12673 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℝ+ → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
5756ad2antrl 724 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
5857simpld 494 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ ℝ)
59 simprr 769 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 1 ≤ 𝑥)
60 flge1nn 13469 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ ∧ 1 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ)
6158, 59, 60syl2anc 583 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (⌊‘𝑥) ∈ ℕ)
62 nnuz 12550 . . . . . . . . . . . 12 ℕ = (ℤ‘1)
6361, 62eleqtrdi 2849 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (⌊‘𝑥) ∈ (ℤ‘1))
6423adantlrr 717 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
6555, 63, 64fsumser 15370 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) = (seq1( + , 𝐾)‘(⌊‘𝑥)))
66 rpvmasum.a . . . . . . . . . . . . . 14 (𝜑𝑁 ∈ ℕ)
67 rpvmasum2.1 . . . . . . . . . . . . . 14 1 = (0g𝐺)
68 eldifsni 4720 . . . . . . . . . . . . . . 15 (𝑋 ∈ (𝐷 ∖ { 1 }) → 𝑋1 )
6912, 68syl 17 . . . . . . . . . . . . . 14 (𝜑𝑋1 )
70 dchrisum0lem2.t . . . . . . . . . . . . . 14 (𝜑 → seq1( + , 𝐾) ⇝ 𝑇)
71 dchrisum0lem2.3 . . . . . . . . . . . . . 14 (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 / 𝑦))
726, 8, 66, 5, 7, 67, 13, 69, 51, 33, 70, 71, 9dchrvmaeq0 26557 . . . . . . . . . . . . 13 (𝜑 → (𝑋𝑊𝑇 = 0))
7311, 72mpbid 231 . . . . . . . . . . . 12 (𝜑𝑇 = 0)
7473adantr 480 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑇 = 0)
7574eqcomd 2744 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 0 = 𝑇)
7665, 75oveq12d 7273 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) − 0) = ((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇))
7746, 76eqtr3d 2780 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) = ((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇))
7877fveq2d 6760 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)))
79 2fveq3 6761 . . . . . . . . . 10 (𝑦 = 𝑥 → (seq1( + , 𝐾)‘(⌊‘𝑦)) = (seq1( + , 𝐾)‘(⌊‘𝑥)))
8079fvoveq1d 7277 . . . . . . . . 9 (𝑦 = 𝑥 → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)))
81 oveq2 7263 . . . . . . . . 9 (𝑦 = 𝑥 → (𝐸 / 𝑦) = (𝐸 / 𝑥))
8280, 81breq12d 5083 . . . . . . . 8 (𝑦 = 𝑥 → ((abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 / 𝑦) ↔ (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)) ≤ (𝐸 / 𝑥)))
8371adantr 480 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 / 𝑦))
84 1re 10906 . . . . . . . . . 10 1 ∈ ℝ
85 elicopnf 13106 . . . . . . . . . 10 (1 ∈ ℝ → (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥)))
8684, 85ax-mp 5 . . . . . . . . 9 (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥))
8758, 59, 86sylanbrc 582 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ (1[,)+∞))
8882, 83, 87rspcdva 3554 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)) ≤ (𝐸 / 𝑥))
8978, 88eqbrtrd 5092 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥))
9045abscld 15076 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℝ)
9136adantr 480 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝐸 ∈ ℝ)
92 lemuldiv2 11786 . . . . . . 7 (((abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℝ ∧ 𝐸 ∈ ℝ ∧ (𝑥 ∈ ℝ ∧ 0 < 𝑥)) → ((𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸 ↔ (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥)))
9390, 91, 57, 92syl3anc 1369 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → ((𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸 ↔ (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥)))
9489, 93mpbird 256 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸)
9544, 94eqbrtrd 5092 . . . 4 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸)
9631, 25, 32, 36, 95elo1d 15173 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ∈ 𝑂(1))
971, 25, 30, 96o1mul2 15262 . 2 (𝜑 → (𝑥 ∈ ℝ+ ↦ (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))) ∈ 𝑂(1))
98 fzfid 13621 . . . . 5 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑚))) ∈ Fin)
9920rpsqrtcld 15051 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ∈ ℝ+)
10099rpcnd 12703 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ∈ ℂ)
10199rpne0d 12706 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ≠ 0)
10217, 100, 101divcld 11681 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
103102adantr 480 . . . . . 6 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → ((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
104 elfznn 13214 . . . . . . . . . 10 (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) → 𝑑 ∈ ℕ)
105104adantl 481 . . . . . . . . 9 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → 𝑑 ∈ ℕ)
106105nnrpd 12699 . . . . . . . 8 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → 𝑑 ∈ ℝ+)
107106rpsqrtcld 15051 . . . . . . 7 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ∈ ℝ+)
108107rpcnd 12703 . . . . . 6 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ∈ ℂ)
109107rpne0d 12706 . . . . . 6 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ≠ 0)
110103, 108, 109divcld 11681 . . . . 5 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
11198, 110fsumcl 15373 . . . 4 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
1124, 111fsumcl 15373 . . 3 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
113 mulcl 10886 . . . 4 ((2 ∈ ℂ ∧ (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℂ) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ∈ ℂ)
11427, 25, 113sylancr 586 . . 3 ((𝜑𝑥 ∈ ℝ+) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ∈ ℂ)
115 2re 11977 . . . . . . . . . 10 2 ∈ ℝ
116 simpr 484 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ+) → 𝑥 ∈ ℝ+)
117 2z 12282 . . . . . . . . . . . . . 14 2 ∈ ℤ
118 rpexpcl 13729 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ+ ∧ 2 ∈ ℤ) → (𝑥↑2) ∈ ℝ+)
119116, 117, 118sylancl 585 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ+) → (𝑥↑2) ∈ ℝ+)
120 rpdivcl 12684 . . . . . . . . . . . . 13 (((𝑥↑2) ∈ ℝ+𝑚 ∈ ℝ+) → ((𝑥↑2) / 𝑚) ∈ ℝ+)
121119, 19, 120syl2an 595 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) / 𝑚) ∈ ℝ+)
122121rpsqrtcld 15051 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) ∈ ℝ+)
123122rpred 12701 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) ∈ ℝ)
124 remulcl 10887 . . . . . . . . . 10 ((2 ∈ ℝ ∧ (√‘((𝑥↑2) / 𝑚)) ∈ ℝ) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℝ)
125115, 123, 124sylancr 586 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℝ)
126125recnd 10934 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℂ)
127102, 126mulcld 10926 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))) ∈ ℂ)
1284, 111, 127fsumsub 15428 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
129107rpcnne0d 12710 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → ((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0))
130 reccl 11570 . . . . . . . . . . 11 (((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0) → (1 / (√‘𝑑)) ∈ ℂ)
131129, 130syl 17 . . . . . . . . . 10 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (1 / (√‘𝑑)) ∈ ℂ)
13298, 131fsumcl 15373 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) ∈ ℂ)
133102, 132, 126subdid 11361 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚))))) = ((((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
134 fveq2 6756 . . . . . . . . . . . . . 14 (𝑦 = ((𝑥↑2) / 𝑚) → (⌊‘𝑦) = (⌊‘((𝑥↑2) / 𝑚)))
135134oveq2d 7271 . . . . . . . . . . . . 13 (𝑦 = ((𝑥↑2) / 𝑚) → (1...(⌊‘𝑦)) = (1...(⌊‘((𝑥↑2) / 𝑚))))
136135sumeq1d 15341 . . . . . . . . . . . 12 (𝑦 = ((𝑥↑2) / 𝑚) → Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)))
137 fveq2 6756 . . . . . . . . . . . . 13 (𝑦 = ((𝑥↑2) / 𝑚) → (√‘𝑦) = (√‘((𝑥↑2) / 𝑚)))
138137oveq2d 7271 . . . . . . . . . . . 12 (𝑦 = ((𝑥↑2) / 𝑚) → (2 · (√‘𝑦)) = (2 · (√‘((𝑥↑2) / 𝑚))))
139136, 138oveq12d 7273 . . . . . . . . . . 11 (𝑦 = ((𝑥↑2) / 𝑚) → (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
140 dchrisum0lem2.h . . . . . . . . . . 11 𝐻 = (𝑦 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))))
141 ovex 7288 . . . . . . . . . . 11 𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))) ∈ V
142139, 140, 141fvmpt3i 6862 . . . . . . . . . 10 (((𝑥↑2) / 𝑚) ∈ ℝ+ → (𝐻‘((𝑥↑2) / 𝑚)) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
143121, 142syl 17 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐻‘((𝑥↑2) / 𝑚)) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
144143oveq2d 7271 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚))))))
145103, 108, 109divrecd 11684 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
146145sumeq2dv 15343 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
14798, 102, 131fsummulc2 15424 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
148146, 147eqtr4d 2781 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))))
149148oveq1d 7270 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))) = ((((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
150133, 144, 1493eqtr4d 2788 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
151150sumeq2dv 15343 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = Σ𝑚 ∈ (1...(⌊‘𝑥))(Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
152 mulcl 10886 . . . . . . . . . 10 ((2 ∈ ℂ ∧ 𝑥 ∈ ℂ) → (2 · 𝑥) ∈ ℂ)
15327, 3, 152sylancr 586 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (2 · 𝑥) ∈ ℂ)
1544, 153, 23fsummulc2 15424 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝑥) · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) = Σ𝑚 ∈ (1...(⌊‘𝑥))((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)))
1551, 3, 24mulassd 10929 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝑥) · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) = (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
156153adantr 480 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · 𝑥) ∈ ℂ)
157156, 102, 100, 101div12d 11717 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚))) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · ((2 · 𝑥) / (√‘𝑚))))
15899rpcnne0d 12710 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0))
159 divdiv1 11616 . . . . . . . . . . . . 13 (((𝑋‘(𝐿𝑚)) ∈ ℂ ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0) ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0)) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚)) = ((𝑋‘(𝐿𝑚)) / ((√‘𝑚) · (√‘𝑚))))
16017, 158, 158, 159syl3anc 1369 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚)) = ((𝑋‘(𝐿𝑚)) / ((√‘𝑚) · (√‘𝑚))))
16120rprege0d 12708 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑚 ∈ ℝ ∧ 0 ≤ 𝑚))
162 remsqsqrt 14896 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℝ ∧ 0 ≤ 𝑚) → ((√‘𝑚) · (√‘𝑚)) = 𝑚)
163161, 162syl 17 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) · (√‘𝑚)) = 𝑚)
164163oveq2d 7271 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / ((√‘𝑚) · (√‘𝑚))) = ((𝑋‘(𝐿𝑚)) / 𝑚))
165160, 164eqtr2d 2779 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / 𝑚) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚)))
166165oveq2d 7271 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)) = ((2 · 𝑥) · (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚))))
167119adantr 480 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑥↑2) ∈ ℝ+)
168167rprege0d 12708 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) ∈ ℝ ∧ 0 ≤ (𝑥↑2)))
169 sqrtdiv 14905 . . . . . . . . . . . . . . 15 ((((𝑥↑2) ∈ ℝ ∧ 0 ≤ (𝑥↑2)) ∧ 𝑚 ∈ ℝ+) → (√‘((𝑥↑2) / 𝑚)) = ((√‘(𝑥↑2)) / (√‘𝑚)))
170168, 20, 169syl2anc 583 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) = ((√‘(𝑥↑2)) / (√‘𝑚)))
17138ad2antlr 723 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
172 sqrtsq 14909 . . . . . . . . . . . . . . . 16 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (√‘(𝑥↑2)) = 𝑥)
173171, 172syl 17 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘(𝑥↑2)) = 𝑥)
174173oveq1d 7270 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘(𝑥↑2)) / (√‘𝑚)) = (𝑥 / (√‘𝑚)))
175170, 174eqtrd 2778 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) = (𝑥 / (√‘𝑚)))
176175oveq2d 7271 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) = (2 · (𝑥 / (√‘𝑚))))
177 2cnd 11981 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 2 ∈ ℂ)
1783adantr 480 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℂ)
179 divass 11581 . . . . . . . . . . . . 13 ((2 ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0)) → ((2 · 𝑥) / (√‘𝑚)) = (2 · (𝑥 / (√‘𝑚))))
180177, 178, 158, 179syl3anc 1369 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) / (√‘𝑚)) = (2 · (𝑥 / (√‘𝑚))))
181176, 180eqtr4d 2781 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) = ((2 · 𝑥) / (√‘𝑚)))
182181oveq2d 7271 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · ((2 · 𝑥) / (√‘𝑚))))
183157, 166, 1823eqtr4d 2788 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
184183sumeq2dv 15343 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)) = Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
185154, 155, 1843eqtr3d 2786 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
186185oveq2d 7271 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
187128, 151, 1863eqtr4d 2788 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))))
188187mpteq2dva 5170 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚)))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))))
189 dchrisum0lem1.f . . . . 5 𝐹 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) / (√‘𝑎)))
190 dchrisum0.c . . . . 5 (𝜑𝐶 ∈ (0[,)+∞))
191 dchrisum0.s . . . . 5 (𝜑 → seq1( + , 𝐹) ⇝ 𝑆)
192 dchrisum0.1 . . . . 5 (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / (√‘𝑦)))
193 dchrisum0lem2.u . . . . 5 (𝜑𝐻𝑟 𝑈)
1946, 8, 66, 5, 7, 67, 9, 11, 189, 190, 191, 192, 140, 193dchrisum0lem2a 26570 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚)))) ∈ 𝑂(1))
195188, 194eqeltrrd 2840 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))) ∈ 𝑂(1))
196112, 114, 195o1dif 15267 . 2 (𝜑 → ((𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1) ↔ (𝑥 ∈ ℝ+ ↦ (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))) ∈ 𝑂(1)))
19797, 196mpbird 256 1 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395   = wceq 1539  wcel 2108  wne 2942  wral 3063  {crab 3067  cdif 3880  wss 3883  {csn 4558   class class class wbr 5070  cmpt 5153  cfv 6418  (class class class)co 7255  cc 10800  cr 10801  0cc0 10802  1c1 10803   + caddc 10805   · cmul 10807  +∞cpnf 10937   < clt 10940  cle 10941  cmin 11135   / cdiv 11562  cn 11903  2c2 11958  cz 12249  cuz 12511  +crp 12659  [,)cico 13010  ...cfz 13168  cfl 13438  seqcseq 13649  cexp 13710  csqrt 14872  abscabs 14873  cli 15121  𝑟 crli 15122  𝑂(1)co1 15123  Σcsu 15325  Basecbs 16840  0gc0g 17067  ℤRHomczrh 20613  ℤ/nczn 20616  DChrcdchr 26285
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-inf2 9329  ax-cnex 10858  ax-resscn 10859  ax-1cn 10860  ax-icn 10861  ax-addcl 10862  ax-addrcl 10863  ax-mulcl 10864  ax-mulrcl 10865  ax-mulcom 10866  ax-addass 10867  ax-mulass 10868  ax-distr 10869  ax-i2m1 10870  ax-1ne0 10871  ax-1rid 10872  ax-rnegex 10873  ax-rrecex 10874  ax-cnre 10875  ax-pre-lttri 10876  ax-pre-lttrn 10877  ax-pre-ltadd 10878  ax-pre-mulgt0 10879  ax-pre-sup 10880  ax-addf 10881  ax-mulf 10882
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-nel 3049  df-ral 3068  df-rex 3069  df-reu 3070  df-rmo 3071  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-int 4877  df-iun 4923  df-iin 4924  df-disj 5036  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-se 5536  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-isom 6427  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-of 7511  df-om 7688  df-1st 7804  df-2nd 7805  df-supp 7949  df-tpos 8013  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-1o 8267  df-2o 8268  df-oadd 8271  df-omul 8272  df-er 8456  df-ec 8458  df-qs 8462  df-map 8575  df-pm 8576  df-ixp 8644  df-en 8692  df-dom 8693  df-sdom 8694  df-fin 8695  df-fsupp 9059  df-fi 9100  df-sup 9131  df-inf 9132  df-oi 9199  df-card 9628  df-acn 9631  df-pnf 10942  df-mnf 10943  df-xr 10944  df-ltxr 10945  df-le 10946  df-sub 11137  df-neg 11138  df-div 11563  df-nn 11904  df-2 11966  df-3 11967  df-4 11968  df-5 11969  df-6 11970  df-7 11971  df-8 11972  df-9 11973  df-n0 12164  df-z 12250  df-dec 12367  df-uz 12512  df-q 12618  df-rp 12660  df-xneg 12777  df-xadd 12778  df-xmul 12779  df-ioo 13012  df-ioc 13013  df-ico 13014  df-icc 13015  df-fz 13169  df-fzo 13312  df-fl 13440  df-mod 13518  df-seq 13650  df-exp 13711  df-fac 13916  df-bc 13945  df-hash 13973  df-shft 14706  df-cj 14738  df-re 14739  df-im 14740  df-sqrt 14874  df-abs 14875  df-limsup 15108  df-clim 15125  df-rlim 15126  df-o1 15127  df-lo1 15128  df-sum 15326  df-ef 15705  df-sin 15707  df-cos 15708  df-pi 15710  df-dvds 15892  df-struct 16776  df-sets 16793  df-slot 16811  df-ndx 16823  df-base 16841  df-ress 16868  df-plusg 16901  df-mulr 16902  df-starv 16903  df-sca 16904  df-vsca 16905  df-ip 16906  df-tset 16907  df-ple 16908  df-ds 16910  df-unif 16911  df-hom 16912  df-cco 16913  df-rest 17050  df-topn 17051  df-0g 17069  df-gsum 17070  df-topgen 17071  df-pt 17072  df-prds 17075  df-xrs 17130  df-qtop 17135  df-imas 17136  df-qus 17137  df-xps 17138  df-mre 17212  df-mrc 17213  df-acs 17215  df-mgm 18241  df-sgrp 18290  df-mnd 18301  df-mhm 18345  df-submnd 18346  df-grp 18495  df-minusg 18496  df-sbg 18497  df-mulg 18616  df-subg 18667  df-nsg 18668  df-eqg 18669  df-ghm 18747  df-cntz 18838  df-od 19051  df-cmn 19303  df-abl 19304  df-mgp 19636  df-ur 19653  df-ring 19700  df-cring 19701  df-oppr 19777  df-dvdsr 19798  df-unit 19799  df-invr 19829  df-dvr 19840  df-rnghom 19874  df-drng 19908  df-subrg 19937  df-lmod 20040  df-lss 20109  df-lsp 20149  df-sra 20349  df-rgmod 20350  df-lidl 20351  df-rsp 20352  df-2idl 20416  df-psmet 20502  df-xmet 20503  df-met 20504  df-bl 20505  df-mopn 20506  df-fbas 20507  df-fg 20508  df-cnfld 20511  df-zring 20583  df-zrh 20617  df-zn 20620  df-top 21951  df-topon 21968  df-topsp 21990  df-bases 22004  df-cld 22078  df-ntr 22079  df-cls 22080  df-nei 22157  df-lp 22195  df-perf 22196  df-cn 22286  df-cnp 22287  df-haus 22374  df-cmp 22446  df-tx 22621  df-hmeo 22814  df-fil 22905  df-fm 22997  df-flim 22998  df-flf 22999  df-xms 23381  df-ms 23382  df-tms 23383  df-cncf 23947  df-limc 24935  df-dv 24936  df-log 25617  df-cxp 25618  df-dchr 26286
This theorem is referenced by:  dchrisum0lem3  26572
  Copyright terms: Public domain W3C validator