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

Theorem dchrisum0lem2 27693
Description: Lemma for dchrisum0 27695. (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 12325 . . 3 ((𝜑𝑥 ∈ ℝ+) → 2 ∈ ℂ)
2 rpcn 13033 . . . . 5 (𝑥 ∈ ℝ+𝑥 ∈ ℂ)
32adantl 486 . . . 4 ((𝜑𝑥 ∈ ℝ+) → 𝑥 ∈ ℂ)
4 fzfid 14016 . . . . 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 4035 . . . . . . . . . 10 𝑊 ⊆ (𝐷 ∖ { 1 })
11 dchrisum0.b . . . . . . . . . 10 (𝜑𝑋𝑊)
1210, 11sselid 3934 . . . . . . . . 9 (𝜑𝑋 ∈ (𝐷 ∖ { 1 }))
1312eldifad 3916 . . . . . . . 8 (𝜑𝑋𝐷)
1413ad2antrr 738 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑋𝐷)
15 elfzelz 13558 . . . . . . . 8 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℤ)
1615adantl 486 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℤ)
175, 6, 7, 8, 14, 16dchrzrhcl 27420 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑋‘(𝐿𝑚)) ∈ ℂ)
18 elfznn 13588 . . . . . . . . 9 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℕ)
1918nnrpd 13064 . . . . . . . 8 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℝ+)
2019adantl 486 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℝ+)
2120rpcnd 13068 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℂ)
2220rpne0d 13071 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ≠ 0)
2317, 21, 22divcld 11997 . . . . 5 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
244, 23fsumcl 15791 . . . 4 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
253, 24mulcld 11235 . . 3 ((𝜑𝑥 ∈ ℝ+) → (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℂ)
26 rpssre 13030 . . . . 5 + ⊆ ℝ
27 2cn 12322 . . . . 5 2 ∈ ℂ
28 o1const 15678 . . . . 5 ((ℝ+ ⊆ ℝ ∧ 2 ∈ ℂ) → (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1))
2926, 27, 28mp2an 704 . . . 4 (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1)
3029a1i 11 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1))
3126a1i 11 . . . 4 (𝜑 → ℝ+ ⊆ ℝ)
32 1red 11215 . . . 4 (𝜑 → 1 ∈ ℝ)
33 dchrisum0lem2.e . . . . 5 (𝜑𝐸 ∈ (0[,)+∞))
34 elrege0 13487 . . . . . 6 (𝐸 ∈ (0[,)+∞) ↔ (𝐸 ∈ ℝ ∧ 0 ≤ 𝐸))
3534simplbi 501 . . . . 5 (𝐸 ∈ (0[,)+∞) → 𝐸 ∈ ℝ)
3633, 35syl 18 . . . 4 (𝜑𝐸 ∈ ℝ)
373, 24absmuld 15515 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = ((abs‘𝑥) · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
38 rprege0 13038 . . . . . . . . . 10 (𝑥 ∈ ℝ+ → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
3938adantl 486 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
40 absid 15354 . . . . . . . . 9 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (abs‘𝑥) = 𝑥)
4139, 40syl 18 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → (abs‘𝑥) = 𝑥)
4241oveq1d 7427 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → ((abs‘𝑥) · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
4337, 42eqtrd 2797 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
4443adantrr 729 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
4524adantrr 729 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
4645subid1d 11564 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) − 0) = Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))
4718adantl 486 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℕ)
48 2fveq3 6886 . . . . . . . . . . . . . . 15 (𝑎 = 𝑚 → (𝑋‘(𝐿𝑎)) = (𝑋‘(𝐿𝑚)))
49 id 23 . . . . . . . . . . . . . . 15 (𝑎 = 𝑚𝑎 = 𝑚)
5048, 49oveq12d 7430 . . . . . . . . . . . . . 14 (𝑎 = 𝑚 → ((𝑋‘(𝐿𝑎)) / 𝑎) = ((𝑋‘(𝐿𝑚)) / 𝑚))
51 dchrisum0lem2.k . . . . . . . . . . . . . 14 𝐾 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) / 𝑎))
52 ovex 7445 . . . . . . . . . . . . . 14 ((𝑋‘(𝐿𝑎)) / 𝑎) ∈ V
5350, 51, 52fvmpt3i 6995 . . . . . . . . . . . . 13 (𝑚 ∈ ℕ → (𝐾𝑚) = ((𝑋‘(𝐿𝑚)) / 𝑚))
5447, 53syl 18 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐾𝑚) = ((𝑋‘(𝐿𝑚)) / 𝑚))
5554adantlrr 733 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐾𝑚) = ((𝑋‘(𝐿𝑚)) / 𝑚))
56 rpregt0 13037 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℝ+ → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
5756ad2antrl 740 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
5857simpld 499 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ ℝ)
59 simprr 784 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 1 ≤ 𝑥)
60 flge1nn 13861 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ ∧ 1 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ)
6158, 59, 60syl2anc 595 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (⌊‘𝑥) ∈ ℕ)
62 nnuz 12907 . . . . . . . . . . . 12 ℕ = (ℤ‘1)
6361, 62eleqtrdi 2872 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (⌊‘𝑥) ∈ (ℤ‘1))
6423adantlrr 733 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / 𝑚) ∈ ℂ)
6555, 63, 64fsumser 15788 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) = (seq1( + , 𝐾)‘(⌊‘𝑥)))
66 rpvmasum.a . . . . . . . . . . . . . 14 (𝜑𝑁 ∈ ℕ)
67 rpvmasum2.1 . . . . . . . . . . . . . 14 1 = (0g𝐺)
68 eldifsni 4757 . . . . . . . . . . . . . . 15 (𝑋 ∈ (𝐷 ∖ { 1 }) → 𝑋1 )
6912, 68syl 18 . . . . . . . . . . . . . 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 27679 . . . . . . . . . . . . 13 (𝜑 → (𝑋𝑊𝑇 = 0))
7311, 72mpbid 235 . . . . . . . . . . . 12 (𝜑𝑇 = 0)
7473adantr 485 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑇 = 0)
7574eqcomd 2768 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 0 = 𝑇)
7665, 75oveq12d 7430 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) − 0) = ((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇))
7746, 76eqtr3d 2799 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚) = ((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇))
7877fveq2d 6885 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)))
79 2fveq3 6886 . . . . . . . . . 10 (𝑦 = 𝑥 → (seq1( + , 𝐾)‘(⌊‘𝑦)) = (seq1( + , 𝐾)‘(⌊‘𝑥)))
8079fvoveq1d 7434 . . . . . . . . 9 (𝑦 = 𝑥 → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)))
81 oveq2 7420 . . . . . . . . 9 (𝑦 = 𝑥 → (𝐸 / 𝑦) = (𝐸 / 𝑥))
8280, 81breq12d 5121 . . . . . . . 8 (𝑦 = 𝑥 → ((abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 / 𝑦) ↔ (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)) ≤ (𝐸 / 𝑥)))
8371adantr 485 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 / 𝑦))
84 1re 11214 . . . . . . . . . 10 1 ∈ ℝ
85 elicopnf 13478 . . . . . . . . . 10 (1 ∈ ℝ → (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥)))
8684, 85ax-mp 5 . . . . . . . . 9 (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥))
8758, 59, 86sylanbrc 594 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ (1[,)+∞))
8882, 83, 87rspcdva 3581 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)) ≤ (𝐸 / 𝑥))
8978, 88eqbrtrd 5132 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥))
9045abscld 15497 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℝ)
9136adantr 485 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝐸 ∈ ℝ)
92 lemuldiv2 12102 . . . . . . 7 (((abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℝ ∧ 𝐸 ∈ ℝ ∧ (𝑥 ∈ ℝ ∧ 0 < 𝑥)) → ((𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸 ↔ (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥)))
9390, 91, 57, 92syl3anc 1397 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → ((𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸 ↔ (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥)))
9489, 93mpbird 260 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸)
9544, 94eqbrtrd 5132 . . . 4 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ≤ 𝐸)
9631, 25, 32, 36, 95elo1d 15594 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ∈ 𝑂(1))
971, 25, 30, 96o1mul2 15683 . 2 (𝜑 → (𝑥 ∈ ℝ+ ↦ (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))) ∈ 𝑂(1))
98 fzfid 14016 . . . . 5 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑚))) ∈ Fin)
9920rpsqrtcld 15470 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ∈ ℝ+)
10099rpcnd 13068 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ∈ ℂ)
10199rpne0d 13071 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ≠ 0)
10217, 100, 101divcld 11997 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
103102adantr 485 . . . . . 6 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → ((𝑋‘(𝐿𝑚)) / (√‘𝑚)) ∈ ℂ)
104 elfznn 13588 . . . . . . . . . 10 (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) → 𝑑 ∈ ℕ)
105104adantl 486 . . . . . . . . 9 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → 𝑑 ∈ ℕ)
106105nnrpd 13064 . . . . . . . 8 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → 𝑑 ∈ ℝ+)
107106rpsqrtcld 15470 . . . . . . 7 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ∈ ℝ+)
108107rpcnd 13068 . . . . . 6 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ∈ ℂ)
109107rpne0d 13071 . . . . . 6 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ≠ 0)
110103, 108, 109divcld 11997 . . . . 5 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
11198, 110fsumcl 15791 . . . 4 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
1124, 111fsumcl 15791 . . 3 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
113 mulcl 11190 . . . 4 ((2 ∈ ℂ ∧ (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) ∈ ℂ) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ∈ ℂ)
11427, 25, 113sylancr 598 . . 3 ((𝜑𝑥 ∈ ℝ+) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) ∈ ℂ)
115 2re 12321 . . . . . . . . . 10 2 ∈ ℝ
116 simpr 489 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ+) → 𝑥 ∈ ℝ+)
117 2z 12632 . . . . . . . . . . . . . 14 2 ∈ ℤ
118 rpexpcl 14123 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ+ ∧ 2 ∈ ℤ) → (𝑥↑2) ∈ ℝ+)
119116, 117, 118sylancl 597 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ+) → (𝑥↑2) ∈ ℝ+)
120 rpdivcl 13049 . . . . . . . . . . . . 13 (((𝑥↑2) ∈ ℝ+𝑚 ∈ ℝ+) → ((𝑥↑2) / 𝑚) ∈ ℝ+)
121119, 19, 120syl2an 607 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) / 𝑚) ∈ ℝ+)
122121rpsqrtcld 15470 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) ∈ ℝ+)
123122rpred 13066 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) ∈ ℝ)
124 remulcl 11191 . . . . . . . . . 10 ((2 ∈ ℝ ∧ (√‘((𝑥↑2) / 𝑚)) ∈ ℝ) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℝ)
125115, 123, 124sylancr 598 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℝ)
126125recnd 11243 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℂ)
127102, 126mulcld 11235 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))) ∈ ℂ)
1284, 111, 127fsumsub 15846 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
129107rpcnne0d 13075 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → ((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0))
130 reccl 11885 . . . . . . . . . . 11 (((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0) → (1 / (√‘𝑑)) ∈ ℂ)
131129, 130syl 18 . . . . . . . . . 10 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (1 / (√‘𝑑)) ∈ ℂ)
13298, 131fsumcl 15791 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) ∈ ℂ)
133102, 132, 126subdid 11676 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚))))) = ((((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
134 fveq2 6881 . . . . . . . . . . . . . 14 (𝑦 = ((𝑥↑2) / 𝑚) → (⌊‘𝑦) = (⌊‘((𝑥↑2) / 𝑚)))
135134oveq2d 7428 . . . . . . . . . . . . 13 (𝑦 = ((𝑥↑2) / 𝑚) → (1...(⌊‘𝑦)) = (1...(⌊‘((𝑥↑2) / 𝑚))))
136135sumeq1d 15758 . . . . . . . . . . . 12 (𝑦 = ((𝑥↑2) / 𝑚) → Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)))
137 fveq2 6881 . . . . . . . . . . . . 13 (𝑦 = ((𝑥↑2) / 𝑚) → (√‘𝑦) = (√‘((𝑥↑2) / 𝑚)))
138137oveq2d 7428 . . . . . . . . . . . 12 (𝑦 = ((𝑥↑2) / 𝑚) → (2 · (√‘𝑦)) = (2 · (√‘((𝑥↑2) / 𝑚))))
139136, 138oveq12d 7430 . . . . . . . . . . 11 (𝑦 = ((𝑥↑2) / 𝑚) → (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
140 dchrisum0lem2.h . . . . . . . . . . 11 𝐻 = (𝑦 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))))
141 ovex 7445 . . . . . . . . . . 11 𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))) ∈ V
142139, 140, 141fvmpt3i 6995 . . . . . . . . . 10 (((𝑥↑2) / 𝑚) ∈ ℝ+ → (𝐻‘((𝑥↑2) / 𝑚)) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
143121, 142syl 18 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐻‘((𝑥↑2) / 𝑚)) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
144143oveq2d 7428 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚))))))
145103, 108, 109divrecd 12000 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
146145sumeq2dv 15760 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
14798, 102, 131fsummulc2 15842 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
148146, 147eqtr4d 2800 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))))
149148oveq1d 7427 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))) = ((((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
150133, 144, 1493eqtr4d 2807 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
151150sumeq2dv 15760 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = Σ𝑚 ∈ (1...(⌊‘𝑥))(Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
152 mulcl 11190 . . . . . . . . . 10 ((2 ∈ ℂ ∧ 𝑥 ∈ ℂ) → (2 · 𝑥) ∈ ℂ)
15327, 3, 152sylancr 598 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ+) → (2 · 𝑥) ∈ ℂ)
1544, 153, 23fsummulc2 15842 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝑥) · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) = Σ𝑚 ∈ (1...(⌊‘𝑥))((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)))
1551, 3, 24mulassd 11238 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → ((2 · 𝑥) · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)) = (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))
156153adantr 485 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · 𝑥) ∈ ℂ)
157156, 102, 100, 101div12d 12033 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚))) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · ((2 · 𝑥) / (√‘𝑚))))
15899rpcnne0d 13075 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0))
159 divdiv1 11932 . . . . . . . . . . . . 13 (((𝑋‘(𝐿𝑚)) ∈ ℂ ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0) ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0)) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚)) = ((𝑋‘(𝐿𝑚)) / ((√‘𝑚) · (√‘𝑚))))
16017, 158, 158, 159syl3anc 1397 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚)) = ((𝑋‘(𝐿𝑚)) / ((√‘𝑚) · (√‘𝑚))))
16120rprege0d 13073 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑚 ∈ ℝ ∧ 0 ≤ 𝑚))
162 remsqsqrt 15314 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℝ ∧ 0 ≤ 𝑚) → ((√‘𝑚) · (√‘𝑚)) = 𝑚)
163161, 162syl 18 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) · (√‘𝑚)) = 𝑚)
164163oveq2d 7428 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / ((√‘𝑚) · (√‘𝑚))) = ((𝑋‘(𝐿𝑚)) / 𝑚))
165160, 164eqtr2d 2798 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿𝑚)) / 𝑚) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚)))
166165oveq2d 7428 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)) = ((2 · 𝑥) · (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑚))))
167119adantr 485 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑥↑2) ∈ ℝ+)
168167rprege0d 13073 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) ∈ ℝ ∧ 0 ≤ (𝑥↑2)))
169 sqrtdiv 15323 . . . . . . . . . . . . . . 15 ((((𝑥↑2) ∈ ℝ ∧ 0 ≤ (𝑥↑2)) ∧ 𝑚 ∈ ℝ+) → (√‘((𝑥↑2) / 𝑚)) = ((√‘(𝑥↑2)) / (√‘𝑚)))
170168, 20, 169syl2anc 595 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) = ((√‘(𝑥↑2)) / (√‘𝑚)))
17138ad2antlr 739 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
172 sqrtsq 15327 . . . . . . . . . . . . . . . 16 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (√‘(𝑥↑2)) = 𝑥)
173171, 172syl 18 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘(𝑥↑2)) = 𝑥)
174173oveq1d 7427 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘(𝑥↑2)) / (√‘𝑚)) = (𝑥 / (√‘𝑚)))
175170, 174eqtrd 2797 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) = (𝑥 / (√‘𝑚)))
176175oveq2d 7428 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) = (2 · (𝑥 / (√‘𝑚))))
177 2cnd 12325 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 2 ∈ ℂ)
1783adantr 485 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℂ)
179 divass 11896 . . . . . . . . . . . . 13 ((2 ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0)) → ((2 · 𝑥) / (√‘𝑚)) = (2 · (𝑥 / (√‘𝑚))))
180177, 178, 158, 179syl3anc 1397 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) / (√‘𝑚)) = (2 · (𝑥 / (√‘𝑚))))
181176, 180eqtr4d 2800 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) = ((2 · 𝑥) / (√‘𝑚)))
182181oveq2d 7428 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · ((2 · 𝑥) / (√‘𝑚))))
183157, 166, 1823eqtr4d 2807 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)) = (((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
184183sumeq2dv 15760 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))((2 · 𝑥) · ((𝑋‘(𝐿𝑚)) / 𝑚)) = Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
185154, 155, 1843eqtr3d 2805 . . . . . . 7 ((𝜑𝑥 ∈ ℝ+) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))) = Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
186185oveq2d 7428 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
187128, 151, 1863eqtr4d 2807 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))))
188187mpteq2dva 5203 . . . 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 27692 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚)))) ∈ 𝑂(1))
195188, 194eqeltrrd 2863 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚))))) ∈ 𝑂(1))
196112, 114, 195o1dif 15688 . 2 (𝜑 → ((𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1) ↔ (𝑥 ∈ ℝ+ ↦ (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿𝑚)) / 𝑚)))) ∈ 𝑂(1)))
19797, 196mpbird 260 1 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿𝑚)) / (√‘𝑚)) / (√‘𝑑))) ∈ 𝑂(1))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 400   = wceq 1569  wcel 2142  wne 2957  wral 3078  {crab 3415  cdif 3901  wss 3904  {csn 4588   class class class wbr 5108  cmpt 5191  cfv 6536  (class class class)co 7412  cc 11104  cr 11105  0cc0 11106  1c1 11107   + caddc 11109   · cmul 11111  +∞cpnf 11246   < clt 11249  cle 11250  cmin 11447   / cdiv 11877  cn 12239  2c2 12301  cz 12597  cuz 12868  +crp 13022  [,)cico 13380  ...cfz 13541  cfl 13830  seqcseq 14044  cexp 14104  csqrt 15291  abscabs 15292  cli 15542  𝑟 crli 15543  𝑂(1)co1 15544  Σcsu 15744  Basecbs 17275  0gc0g 17498  ℤRHomczrh 21660  ℤ/nczn 21663  DChrcdchr 27407
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1824  ax-4 1838  ax-5 1939  ax-6 1996  ax-7 2037  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5237  ax-sep 5256  ax-nul 5268  ax-pow 5335  ax-pr 5403  ax-un 7734  ax-inf2 9608  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184  ax-addf 11185  ax-mulf 11186
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1103  df-3an 1104  df-tru 1572  df-fal 1582  df-ex 1809  df-nf 1813  df-sb 2096  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3064  df-ral 3079  df-rex 3089  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3456  df-sbc 3744  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4487  df-pw 4563  df-sn 4589  df-pr 4591  df-tp 4593  df-op 4595  df-uni 4872  df-int 4912  df-iun 4957  df-iin 4958  df-disj 5076  df-br 5109  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5555  df-eprel 5560  df-po 5568  df-so 5569  df-fr 5613  df-se 5614  df-we 5615  df-xp 5666  df-rel 5667  df-cnv 5668  df-co 5669  df-dm 5670  df-rn 5671  df-res 5672  df-ima 5673  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-of 7676  df-om 7861  df-1st 7984  df-2nd 7985  df-supp 8155  df-tpos 8220  df-frecs 8276  df-wrecs 8307  df-recs 8356  df-rdg 8395  df-1o 8451  df-2o 8452  df-oadd 8455  df-omul 8456  df-er 8692  df-ec 8694  df-qs 8698  df-map 8824  df-pm 8825  df-ixp 8894  df-en 8942  df-dom 8943  df-sdom 8944  df-fin 8945  df-fsupp 9320  df-fi 9369  df-sup 9400  df-inf 9401  df-oi 9470  df-card 9932  df-acn 9935  df-pnf 11251  df-mnf 11252  df-xr 11253  df-ltxr 11254  df-le 11255  df-sub 11449  df-neg 11450  df-div 11878  df-nn 12240  df-2 12309  df-3 12310  df-4 12311  df-5 12312  df-6 12313  df-7 12314  df-8 12315  df-9 12316  df-n0 12511  df-z 12598  df-dec 12718  df-uz 12869  df-q 12979  df-rp 13023  df-xneg 13143  df-xadd 13144  df-xmul 13145  df-ioo 13382  df-ioc 13383  df-ico 13384  df-icc 13385  df-fz 13542  df-fzo 13690  df-fl 13832  df-mod 13910  df-seq 14045  df-exp 14105  df-fac 14317  df-bc 14346  df-hash 14374  df-shft 15111  df-cj 15157  df-re 15158  df-im 15159  df-sqrt 15293  df-abs 15294  df-limsup 15529  df-clim 15546  df-rlim 15547  df-o1 15548  df-lo1 15549  df-sum 15745  df-ef 16127  df-sin 16129  df-cos 16130  df-pi 16132  df-dvds 16317  df-struct 17213  df-sets 17230  df-slot 17248  df-ndx 17260  df-base 17276  df-ress 17297  df-plusg 17329  df-mulr 17330  df-starv 17331  df-sca 17332  df-vsca 17333  df-ip 17334  df-tset 17335  df-ple 17336  df-ds 17338  df-unif 17339  df-hom 17340  df-cco 17341  df-rest 17481  df-topn 17482  df-0g 17500  df-gsum 17501  df-topgen 17502  df-pt 17503  df-prds 17506  df-xrs 17562  df-qtop 17567  df-imas 17568  df-qus 17569  df-xps 17570  df-mre 17644  df-mrc 17645  df-acs 17647  df-mgm 18704  df-sgrp 18783  df-mnd 18799  df-mhm 18847  df-submnd 18848  df-grp 19009  df-minusg 19010  df-sbg 19011  df-mulg 19140  df-subg 19195  df-nsg 19196  df-eqg 19197  df-ghm 19290  df-cntz 19393  df-od 19604  df-cmn 19858  df-abl 19859  df-mgp 20223  df-rng 20237  df-ur 20270  df-ring 20323  df-cring 20324  df-oppr 20426  df-dvdsr 20446  df-unit 20447  df-invr 20477  df-dvr 20490  df-rhm 20561  df-subrng 20656  df-subrg 20680  df-drng 20840  df-lmod 20994  df-lss 21064  df-lsp 21104  df-sra 21305  df-rgmod 21306  df-lidl 21343  df-rsp 21344  df-2idl 21400  df-psmet 21525  df-xmet 21526  df-met 21527  df-bl 21528  df-mopn 21529  df-fbas 21530  df-fg 21531  df-cnfld 21534  df-zring 21608  df-zrh 21664  df-zn 21667  df-top 23062  df-topon 23079  df-topsp 23101  df-bases 23114  df-cld 23187  df-ntr 23188  df-cls 23189  df-nei 23266  df-lp 23304  df-perf 23305  df-cn 23395  df-cnp 23396  df-haus 23483  df-cmp 23555  df-tx 23730  df-hmeo 23923  df-fil 24014  df-fm 24106  df-flim 24107  df-flf 24108  df-xms 24488  df-ms 24489  df-tms 24490  df-cncf 25048  df-limc 26036  df-dv 26037  df-log 26732  df-cxp 26733  df-dchr 27408
This theorem is used by:  dchrisum0lem3  27694
  Copyright terms: Public domain W3C validator