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

Theorem dchrisum0lem2 27410
Description: Lemma for dchrisum0 27412. (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 12194 . . 3 ((𝜑𝑥 ∈ ℝ+) → 2 ∈ ℂ)
2 rpcn 12892 . . . . 5 (𝑥 ∈ ℝ+𝑥 ∈ ℂ)
32adantl 481 . . . 4 ((𝜑𝑥 ∈ ℝ+) → 𝑥 ∈ ℂ)
4 fzfid 13868 . . . . 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 4029 . . . . . . . . . 10 𝑊 ⊆ (𝐷 ∖ { 1 })
11 dchrisum0.b . . . . . . . . . 10 (𝜑𝑋𝑊)
1210, 11sselid 3929 . . . . . . . . 9 (𝜑𝑋 ∈ (𝐷 ∖ { 1 }))
1312eldifad 3911 . . . . . . . 8 (𝜑𝑋𝐷)
1413ad2antrr 726 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑋𝐷)
15 elfzelz 13415 . . . . . . . 8 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℤ)
1615adantl 481 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℤ)
175, 6, 7, 8, 14, 16dchrzrhcl 27137 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑋‘(𝐿𝑚)) ∈ ℂ)
18 elfznn 13444 . . . . . . . . 9 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℕ)
1918nnrpd 12923 . . . . . . . 8 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℝ+)
2019adantl 481 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℝ+)
2120rpcnd 12927 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℂ)
2220rpne0d 12930 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ≠ 0)
2317, 21, 22divcld 11888 . . . . 5 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
244, 23fsumcl 15627 . . . 4 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
253, 24mulcld 11123 . . 3 ((𝜑𝑥 ∈ ℝ+) → (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℂ)
26 rpssre 12889 . . . . 5 + ⊆ ℝ
27 2cn 12191 . . . . 5 2 ∈ ℂ
28 o1const 15514 . . . . 5 ((ℝ+ ⊆ ℝ ∧ 2 ∈ ℂ) → (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1))
2926, 27, 28mp2an 692 . . . 4 (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1)
3029a1i 11 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1))
3126a1i 11 . . . 4 (𝜑 → ℝ+ ⊆ ℝ)
32 1red 11104 . . . 4 (𝜑 → 1 ∈ ℝ)
33 dchrisum0lem2.e . . . . 5 (𝜑𝐸 ∈ (0[,)+∞))
34 elrege0 13345 . . . . . 6 (𝐸 ∈ (0[,)+∞) ↔ (𝐸 ∈ ℝ ∧ 0 ≤ 𝐸))
3534simplbi 497 . . . . 5 (𝐸 ∈ (0[,)+∞) → 𝐸 ∈ ℝ)
3633, 35syl 17 . . . 4 (𝜑𝐸 ∈ ℝ)
373, 24absmuld 15351 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = ((abs‘𝑥) · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
38 rprege0 12897 . . . . . . . . . 10 (𝑥 ∈ ℝ+ → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
3938adantl 481 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
40 absid 15190 . . . . . . . . 9 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (abs‘𝑥) = 𝑥)
4139, 40syl 17 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → (abs‘𝑥) = 𝑥)
4241oveq1d 7355 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → ((abs‘𝑥) · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
4337, 42eqtrd 2764 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
4443adantrr 717 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
4524adantrr 717 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
4645subid1d 11452 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) − 0) = Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))
4718adantl 481 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℕ)
48 2fveq3 6821 . . . . . . . . . . . . . . 15 (𝑎 = 𝑚 → (𝑋‘(𝐿𝑎)) = (𝑋‘(𝐿𝑚)))
49 id 22 . . . . . . . . . . . . . . 15 (𝑎 = 𝑚𝑎 = 𝑚)
5048, 49oveq12d 7358 . . . . . . . . . . . . . 14 (𝑎 = 𝑚 → ((𝑋‘(𝐿𝑎)) / 𝑎) = ((𝑋‘(𝐿𝑚)) / 𝑚))
51 dchrisum0lem2.k . . . . . . . . . . . . . 14 𝐾 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) / 𝑎))
52 ovex 7373 . . . . . . . . . . . . . 14 ((𝑋‘(𝐿𝑎)) / 𝑎) ∈ V
5350, 51, 52fvmpt3i 6928 . . . . . . . . . . . . 13 (𝑚 ∈ ℕ → (𝐾𝑚) = ((𝑋‘(𝐿𝑚)) / 𝑚))
5447, 53syl 17 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐾𝑚) = ((𝑋‘(𝐿𝑚)) / 𝑚))
5554adantlrr 721 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐾𝑚) = ((𝑋‘(𝐿𝑚)) / 𝑚))
56 rpregt0 12896 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℝ+ → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
5756ad2antrl 728 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
5857simpld 494 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ ℝ)
59 simprr 772 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 1 ≤ 𝑥)
60 flge1nn 13713 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ ∧ 1 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ)
6158, 59, 60syl2anc 584 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (⌊‘𝑥) ∈ ℕ)
62 nnuz 12766 . . . . . . . . . . . 12 ℕ = (ℤ‘1)
6361, 62eleqtrdi 2838 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (⌊‘𝑥) ∈ (ℤ‘1))
6423adantlrr 721 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
6555, 63, 64fsumser 15624 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) = (seq1( + , 𝐾)‘(⌊‘𝑥)))
66 rpvmasum.a . . . . . . . . . . . . . 14 (𝜑𝑁 ∈ ℕ)
67 rpvmasum2.1 . . . . . . . . . . . . . 14 1 = (0g𝐺)
68 eldifsni 4739 . . . . . . . . . . . . . . 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 27396 . . . . . . . . . . . . 13 (𝜑 → (𝑋𝑊𝑇 = 0))
7311, 72mpbid 232 . . . . . . . . . . . 12 (𝜑𝑇 = 0)
7473adantr 480 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑇 = 0)
7574eqcomd 2735 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 0 = 𝑇)
7665, 75oveq12d 7358 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) − 0) = ((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇))
7746, 76eqtr3d 2766 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) = ((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇))
7877fveq2d 6820 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)))
79 2fveq3 6821 . . . . . . . . . 10 (𝑦 = 𝑥 → (seq1( + , 𝐾)‘(⌊‘𝑦)) = (seq1( + , 𝐾)‘(⌊‘𝑥)))
8079fvoveq1d 7362 . . . . . . . . 9 (𝑦 = 𝑥 → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)))
81 oveq2 7348 . . . . . . . . 9 (𝑦 = 𝑥 → (𝐸 / 𝑦) = (𝐸 / 𝑥))
8280, 81breq12d 5101 . . . . . . . 8 (𝑦 = 𝑥 → ((abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 / 𝑦) ↔ (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)) ≤ (𝐸 / 𝑥)))
8371adantr 480 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 / 𝑦))
84 1re 11103 . . . . . . . . . 10 1 ∈ ℝ
85 elicopnf 13336 . . . . . . . . . 10 (1 ∈ ℝ → (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥)))
8684, 85ax-mp 5 . . . . . . . . 9 (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥))
8758, 59, 86sylanbrc 583 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ (1[,)+∞))
8882, 83, 87rspcdva 3575 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)) ≤ (𝐸 / 𝑥))
8978, 88eqbrtrd 5110 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥))
9045abscld 15333 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℝ)
9136adantr 480 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝐸 ∈ ℝ)
92 lemuldiv2 11994 . . . . . . 7 (((abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℝ ∧ 𝐸 ∈ ℝ ∧ (𝑥 ∈ ℝ ∧ 0 < 𝑥)) → ((𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸 ↔ (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥)))
9390, 91, 57, 92syl3anc 1373 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → ((𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸 ↔ (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥)))
9489, 93mpbird 257 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸)
9544, 94eqbrtrd 5110 . . . 4 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸)
9631, 25, 32, 36, 95elo1d 15430 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ∈ 𝑂(1))
971, 25, 30, 96o1mul2 15519 . 2 (𝜑 → (𝑥 ∈ ℝ+ ↦ (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))) ∈ 𝑂(1))
98 fzfid 13868 . . . . 5 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑚))) ∈ Fin)
9920rpsqrtcld 15306 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ∈ ℝ+)
10099rpcnd 12927 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ∈ ℂ)
10199rpne0d 12930 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ≠ 0)
10217, 100, 101divcld 11888 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
103102adantr 480 . . . . . 6 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → ((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
104 elfznn 13444 . . . . . . . . . 10 (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) → 𝑑 ∈ ℕ)
105104adantl 481 . . . . . . . . 9 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → 𝑑 ∈ ℕ)
106105nnrpd 12923 . . . . . . . 8 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → 𝑑 ∈ ℝ+)
107106rpsqrtcld 15306 . . . . . . 7 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ∈ ℝ+)
108107rpcnd 12927 . . . . . 6 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ∈ ℂ)
109107rpne0d 12930 . . . . . 6 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ≠ 0)
110103, 108, 109divcld 11888 . . . . 5 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
11198, 110fsumcl 15627 . . . 4 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
1124, 111fsumcl 15627 . . 3 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
113 mulcl 11081 . . . 4 ((2 ∈ ℂ ∧ (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℂ) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ∈ ℂ)
11427, 25, 113sylancr 587 . . 3 ((𝜑𝑥 ∈ ℝ+) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ∈ ℂ)
115 2re 12190 . . . . . . . . . 10 2 ∈ ℝ
116 simpr 484 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ+) → 𝑥 ∈ ℝ+)
117 2z 12495 . . . . . . . . . . . . . 14 2 ∈ ℤ
118 rpexpcl 13975 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ+ ∧ 2 ∈ ℤ) → (𝑥↑2) ∈ ℝ+)
119116, 117, 118sylancl 586 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ+) → (𝑥↑2) ∈ ℝ+)
120 rpdivcl 12908 . . . . . . . . . . . . 13 (((𝑥↑2) ∈ ℝ+𝑚 ∈ ℝ+) → ((𝑥↑2) / 𝑚) ∈ ℝ+)
121119, 19, 120syl2an 596 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) / 𝑚) ∈ ℝ+)
122121rpsqrtcld 15306 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) ∈ ℝ+)
123122rpred 12925 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) ∈ ℝ)
124 remulcl 11082 . . . . . . . . . 10 ((2 ∈ ℝ ∧ (√‘((𝑥↑2) / 𝑚)) ∈ ℝ) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℝ)
125115, 123, 124sylancr 587 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℝ)
126125recnd 11131 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℂ)
127102, 126mulcld 11123 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))) ∈ ℂ)
1284, 111, 127fsumsub 15682 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
129107rpcnne0d 12934 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → ((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0))
130 reccl 11774 . . . . . . . . . . 11 (((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0) → (1 / (√‘𝑑)) ∈ ℂ)
131129, 130syl 17 . . . . . . . . . 10 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (1 / (√‘𝑑)) ∈ ℂ)
13298, 131fsumcl 15627 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) ∈ ℂ)
133102, 132, 126subdid 11564 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚))))) = ((((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
134 fveq2 6816 . . . . . . . . . . . . . 14 (𝑦 = ((𝑥↑2) / 𝑚) → (⌊‘𝑦) = (⌊‘((𝑥↑2) / 𝑚)))
135134oveq2d 7356 . . . . . . . . . . . . 13 (𝑦 = ((𝑥↑2) / 𝑚) → (1...(⌊‘𝑦)) = (1...(⌊‘((𝑥↑2) / 𝑚))))
136135sumeq1d 15594 . . . . . . . . . . . 12 (𝑦 = ((𝑥↑2) / 𝑚) → Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)))
137 fveq2 6816 . . . . . . . . . . . . 13 (𝑦 = ((𝑥↑2) / 𝑚) → (√‘𝑦) = (√‘((𝑥↑2) / 𝑚)))
138137oveq2d 7356 . . . . . . . . . . . 12 (𝑦 = ((𝑥↑2) / 𝑚) → (2 · (√‘𝑦)) = (2 · (√‘((𝑥↑2) / 𝑚))))
139136, 138oveq12d 7358 . . . . . . . . . . 11 (𝑦 = ((𝑥↑2) / 𝑚) → (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
140 dchrisum0lem2.h . . . . . . . . . . 11 𝐻 = (𝑦 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))))
141 ovex 7373 . . . . . . . . . . 11 𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))) ∈ V
142139, 140, 141fvmpt3i 6928 . . . . . . . . . 10 (((𝑥↑2) / 𝑚) ∈ ℝ+ → (𝐻‘((𝑥↑2) / 𝑚)) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
143121, 142syl 17 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐻‘((𝑥↑2) / 𝑚)) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
144143oveq2d 7356 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚))))))
145103, 108, 109divrecd 11891 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
146145sumeq2dv 15596 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
14798, 102, 131fsummulc2 15678 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
148146, 147eqtr4d 2767 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))))
149148oveq1d 7355 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))) = ((((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
150133, 144, 1493eqtr4d 2774 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
151150sumeq2dv 15596 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = Σ𝑚 ∈ (1...(⌊‘𝑥))(Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
152 mulcl 11081 . . . . . . . . . 10 ((2 ∈ ℂ ∧ 𝑥 ∈ ℂ) → (2 · 𝑥) ∈ ℂ)
15327, 3, 152sylancr 587 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (2 · 𝑥) ∈ ℂ)
1544, 153, 23fsummulc2 15678 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝑥) · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) = Σ𝑚 ∈ (1...(⌊‘𝑥))((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)))
1551, 3, 24mulassd 11126 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝑥) · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) = (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
156153adantr 480 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · 𝑥) ∈ ℂ)
157156, 102, 100, 101div12d 11924 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚))) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · ((2 · 𝑥) / (√‘𝑚))))
15899rpcnne0d 12934 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0))
159 divdiv1 11823 . . . . . . . . . . . . 13 (((𝑋‘(𝐿𝑚)) ∈ ℂ ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0) ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0)) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚)) = ((𝑋‘(𝐿𝑚)) / ((√‘𝑚) · (√‘𝑚))))
16017, 158, 158, 159syl3anc 1373 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚)) = ((𝑋‘(𝐿𝑚)) / ((√‘𝑚) · (√‘𝑚))))
16120rprege0d 12932 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑚 ∈ ℝ ∧ 0 ≤ 𝑚))
162 remsqsqrt 15150 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℝ ∧ 0 ≤ 𝑚) → ((√‘𝑚) · (√‘𝑚)) = 𝑚)
163161, 162syl 17 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) · (√‘𝑚)) = 𝑚)
164163oveq2d 7356 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / ((√‘𝑚) · (√‘𝑚))) = ((𝑋‘(𝐿𝑚)) / 𝑚))
165160, 164eqtr2d 2765 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / 𝑚) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚)))
166165oveq2d 7356 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)) = ((2 · 𝑥) · (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚))))
167119adantr 480 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑥↑2) ∈ ℝ+)
168167rprege0d 12932 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) ∈ ℝ ∧ 0 ≤ (𝑥↑2)))
169 sqrtdiv 15159 . . . . . . . . . . . . . . 15 ((((𝑥↑2) ∈ ℝ ∧ 0 ≤ (𝑥↑2)) ∧ 𝑚 ∈ ℝ+) → (√‘((𝑥↑2) / 𝑚)) = ((√‘(𝑥↑2)) / (√‘𝑚)))
170168, 20, 169syl2anc 584 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) = ((√‘(𝑥↑2)) / (√‘𝑚)))
17138ad2antlr 727 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
172 sqrtsq 15163 . . . . . . . . . . . . . . . 16 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (√‘(𝑥↑2)) = 𝑥)
173171, 172syl 17 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘(𝑥↑2)) = 𝑥)
174173oveq1d 7355 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘(𝑥↑2)) / (√‘𝑚)) = (𝑥 / (√‘𝑚)))
175170, 174eqtrd 2764 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) = (𝑥 / (√‘𝑚)))
176175oveq2d 7356 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) = (2 · (𝑥 / (√‘𝑚))))
177 2cnd 12194 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 2 ∈ ℂ)
1783adantr 480 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℂ)
179 divass 11785 . . . . . . . . . . . . 13 ((2 ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0)) → ((2 · 𝑥) / (√‘𝑚)) = (2 · (𝑥 / (√‘𝑚))))
180177, 178, 158, 179syl3anc 1373 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) / (√‘𝑚)) = (2 · (𝑥 / (√‘𝑚))))
181176, 180eqtr4d 2767 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) = ((2 · 𝑥) / (√‘𝑚)))
182181oveq2d 7356 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · ((2 · 𝑥) / (√‘𝑚))))
183157, 166, 1823eqtr4d 2774 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
184183sumeq2dv 15596 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)) = Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
185154, 155, 1843eqtr3d 2772 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
186185oveq2d 7356 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
187128, 151, 1863eqtr4d 2774 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))))
188187mpteq2dva 5181 . . . 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 27409 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚)))) ∈ 𝑂(1))
195188, 194eqeltrrd 2829 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))) ∈ 𝑂(1))
196112, 114, 195o1dif 15524 . 2 (𝜑 → ((𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1) ↔ (𝑥 ∈ ℝ+ ↦ (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))) ∈ 𝑂(1)))
19797, 196mpbird 257 1 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1540  wcel 2109  wne 2925  wral 3044  {crab 3392  cdif 3896  wss 3899  {csn 4573   class class class wbr 5088  cmpt 5169  cfv 6476  (class class class)co 7340  cc 10995  cr 10996  0cc0 10997  1c1 10998   + caddc 11000   · cmul 11002  +∞cpnf 11134   < clt 11137  cle 11138  cmin 11335   / cdiv 11765  cn 12116  2c2 12171  cz 12459  cuz 12723  +crp 12881  [,)cico 13238  ...cfz 13398  cfl 13682  seqcseq 13896  cexp 13956  csqrt 15127  abscabs 15128  cli 15378  𝑟 crli 15379  𝑂(1)co1 15380  Σcsu 15580  Basecbs 17107  0gc0g 17330  ℤRHomczrh 21390  ℤ/nczn 21393  DChrcdchr 27124
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5214  ax-sep 5231  ax-nul 5241  ax-pow 5300  ax-pr 5367  ax-un 7662  ax-inf2 9525  ax-cnex 11053  ax-resscn 11054  ax-1cn 11055  ax-icn 11056  ax-addcl 11057  ax-addrcl 11058  ax-mulcl 11059  ax-mulrcl 11060  ax-mulcom 11061  ax-addass 11062  ax-mulass 11063  ax-distr 11064  ax-i2m1 11065  ax-1ne0 11066  ax-1rid 11067  ax-rnegex 11068  ax-rrecex 11069  ax-cnre 11070  ax-pre-lttri 11071  ax-pre-lttrn 11072  ax-pre-ltadd 11073  ax-pre-mulgt0 11074  ax-pre-sup 11075  ax-addf 11076  ax-mulf 11077
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3343  df-reu 3344  df-rab 3393  df-v 3435  df-sbc 3739  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4281  df-if 4473  df-pw 4549  df-sn 4574  df-pr 4576  df-tp 4578  df-op 4580  df-uni 4857  df-int 4895  df-iun 4940  df-iin 4941  df-disj 5056  df-br 5089  df-opab 5151  df-mpt 5170  df-tr 5196  df-id 5508  df-eprel 5513  df-po 5521  df-so 5522  df-fr 5566  df-se 5567  df-we 5568  df-xp 5619  df-rel 5620  df-cnv 5621  df-co 5622  df-dm 5623  df-rn 5624  df-res 5625  df-ima 5626  df-pred 6243  df-ord 6304  df-on 6305  df-lim 6306  df-suc 6307  df-iota 6432  df-fun 6478  df-fn 6479  df-f 6480  df-f1 6481  df-fo 6482  df-f1o 6483  df-fv 6484  df-isom 6485  df-riota 7297  df-ov 7343  df-oprab 7344  df-mpo 7345  df-of 7604  df-om 7791  df-1st 7915  df-2nd 7916  df-supp 8085  df-tpos 8150  df-frecs 8205  df-wrecs 8236  df-recs 8285  df-rdg 8323  df-1o 8379  df-2o 8380  df-oadd 8383  df-omul 8384  df-er 8616  df-ec 8618  df-qs 8622  df-map 8746  df-pm 8747  df-ixp 8816  df-en 8864  df-dom 8865  df-sdom 8866  df-fin 8867  df-fsupp 9240  df-fi 9289  df-sup 9320  df-inf 9321  df-oi 9390  df-card 9823  df-acn 9826  df-pnf 11139  df-mnf 11140  df-xr 11141  df-ltxr 11142  df-le 11143  df-sub 11337  df-neg 11338  df-div 11766  df-nn 12117  df-2 12179  df-3 12180  df-4 12181  df-5 12182  df-6 12183  df-7 12184  df-8 12185  df-9 12186  df-n0 12373  df-z 12460  df-dec 12580  df-uz 12724  df-q 12838  df-rp 12882  df-xneg 13002  df-xadd 13003  df-xmul 13004  df-ioo 13240  df-ioc 13241  df-ico 13242  df-icc 13243  df-fz 13399  df-fzo 13546  df-fl 13684  df-mod 13762  df-seq 13897  df-exp 13957  df-fac 14169  df-bc 14198  df-hash 14226  df-shft 14961  df-cj 14993  df-re 14994  df-im 14995  df-sqrt 15129  df-abs 15130  df-limsup 15365  df-clim 15382  df-rlim 15383  df-o1 15384  df-lo1 15385  df-sum 15581  df-ef 15961  df-sin 15963  df-cos 15964  df-pi 15966  df-dvds 16151  df-struct 17045  df-sets 17062  df-slot 17080  df-ndx 17092  df-base 17108  df-ress 17129  df-plusg 17161  df-mulr 17162  df-starv 17163  df-sca 17164  df-vsca 17165  df-ip 17166  df-tset 17167  df-ple 17168  df-ds 17170  df-unif 17171  df-hom 17172  df-cco 17173  df-rest 17313  df-topn 17314  df-0g 17332  df-gsum 17333  df-topgen 17334  df-pt 17335  df-prds 17338  df-xrs 17393  df-qtop 17398  df-imas 17399  df-qus 17400  df-xps 17401  df-mre 17475  df-mrc 17476  df-acs 17478  df-mgm 18501  df-sgrp 18580  df-mnd 18596  df-mhm 18644  df-submnd 18645  df-grp 18802  df-minusg 18803  df-sbg 18804  df-mulg 18934  df-subg 18989  df-nsg 18990  df-eqg 18991  df-ghm 19079  df-cntz 19183  df-od 19394  df-cmn 19648  df-abl 19649  df-mgp 20013  df-rng 20025  df-ur 20054  df-ring 20107  df-cring 20108  df-oppr 20209  df-dvdsr 20229  df-unit 20230  df-invr 20260  df-dvr 20273  df-rhm 20344  df-subrng 20415  df-subrg 20439  df-drng 20600  df-lmod 20749  df-lss 20819  df-lsp 20859  df-sra 21061  df-rgmod 21062  df-lidl 21099  df-rsp 21100  df-2idl 21141  df-psmet 21237  df-xmet 21238  df-met 21239  df-bl 21240  df-mopn 21241  df-fbas 21242  df-fg 21243  df-cnfld 21246  df-zring 21338  df-zrh 21394  df-zn 21397  df-top 22763  df-topon 22780  df-topsp 22802  df-bases 22815  df-cld 22888  df-ntr 22889  df-cls 22890  df-nei 22967  df-lp 23005  df-perf 23006  df-cn 23096  df-cnp 23097  df-haus 23184  df-cmp 23256  df-tx 23431  df-hmeo 23624  df-fil 23715  df-fm 23807  df-flim 23808  df-flf 23809  df-xms 24189  df-ms 24190  df-tms 24191  df-cncf 24752  df-limc 25748  df-dv 25749  df-log 26446  df-cxp 26447  df-dchr 27125
This theorem is referenced by:  dchrisum0lem3  27411
  Copyright terms: Public domain W3C validator