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

Theorem dchrisum0lem2 27845
Description: Lemma for dchrisum0 27847. (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 12421 . . 3 ((𝜑 ∧ 𝑥 ∈ ℝ+) → 2 ∈ ℂ)
2 rpcn 13131 . . . . 5 (𝑥 ∈ ℝ+ → 𝑥 ∈ ℂ)
32adantl 487 . . . 4 ((𝜑 ∧ 𝑥 ∈ ℝ+) → 𝑥 ∈ ℂ)
4 fzfid 14116 . . . . 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 4007 . . . . . . . . . 10 𝑊 ⊆ (𝐷 ∖ { 1 })
11 dchrisum0.b . . . . . . . . . 10 (𝜑 → 𝑋 ∈ 𝑊)
1210, 11sselid 3906 . . . . . . . . 9 (𝜑 → 𝑋 ∈ (𝐷 ∖ { 1 }))
1312eldifad 4051 . . . . . . . 8 (𝜑 → 𝑋 ∈ 𝐷)
1413ad2antrr 739 . . . . . . 7 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑋 ∈ 𝐷)
15 elfzelz 13656 . . . . . . . 8 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℤ)
1615adantl 487 . . . . . . 7 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℤ)
175, 6, 7, 8, 14, 16dchrzrhcl 27572 . . . . . 6 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑋‘(𝐿‘𝑚)) ∈ ℂ)
18 elfznn 13687 . . . . . . . . 9 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℕ)
1918nnrpd 13162 . . . . . . . 8 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℝ+)
2019adantl 487 . . . . . . 7 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℝ+)
2120rpcnd 13166 . . . . . 6 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℂ)
2220rpne0d 13169 . . . . . 6 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ≠ 0)
2317, 21, 22divcld 12093 . . . . 5 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿‘𝑚)) / 𝑚) ∈ ℂ)
244, 23fsumcl 15899 . . . 4 ((𝜑 ∧ 𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚) ∈ ℂ)
253, 24mulcld 11329 . . 3 ((𝜑 ∧ 𝑥 ∈ ℝ+) → (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)) ∈ ℂ)
26 rpssre 13128 . . . . 5 ℝ+ ⊆ ℝ
27 2cn 12418 . . . . 5 2 ∈ ℂ
28 o1const 15787 . . . . 5 ((ℝ+ ⊆ ℝ ∧ 2 ∈ ℂ) → (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1))
2926, 27, 28mp2an 705 . . . 4 (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1)
3029a1i 11 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ 2) ∈ 𝑂(1))
3126a1i 11 . . . 4 (𝜑 → ℝ+ ⊆ ℝ)
32 1red 11309 . . . 4 (𝜑 → 1 ∈ ℝ)
33 dchrisum0lem2.e . . . . 5 (𝜑 → 𝐸 ∈ (0[,)+∞))
34 elrege0 13585 . . . . . 6 (𝐸 ∈ (0[,)+∞) ↔ (𝐸 ∈ ℝ ∧ 0 ≤ 𝐸))
3534simplbi 502 . . . . 5 (𝐸 ∈ (0[,)+∞) → 𝐸 ∈ ℝ)
3633, 35syl 18 . . . 4 (𝜑 → 𝐸 ∈ ℝ)
373, 24absmuld 15624 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ ℝ+) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) = ((abs‘𝑥) · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))))
38 rprege0 13136 . . . . . . . . . 10 (𝑥 ∈ ℝ+ → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
3938adantl 487 . . . . . . . . 9 ((𝜑 ∧ 𝑥 ∈ ℝ+) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
40 absid 15463 . . . . . . . . 9 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (abs‘𝑥) = 𝑥)
4139, 40syl 18 . . . . . . . 8 ((𝜑 ∧ 𝑥 ∈ ℝ+) → (abs‘𝑥) = 𝑥)
4241oveq1d 7435 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ ℝ+) → ((abs‘𝑥) · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))))
4337, 42eqtrd 2795 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ ℝ+) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))))
4443adantrr 730 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) = (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))))
4524adantrr 730 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚) ∈ ℂ)
4645subid1d 11658 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚) − 0) = Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))
4718adantl 487 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℕ)
48 2fveq3 6890 . . . . . . . . . . . . . . 15 (𝑎 = 𝑚 → (𝑋‘(𝐿‘𝑎)) = (𝑋‘(𝐿‘𝑚)))
49 id 23 . . . . . . . . . . . . . . 15 (𝑎 = 𝑚 → 𝑎 = 𝑚)
5048, 49oveq12d 7438 . . . . . . . . . . . . . 14 (𝑎 = 𝑚 → ((𝑋‘(𝐿‘𝑎)) / 𝑎) = ((𝑋‘(𝐿‘𝑚)) / 𝑚))
51 dchrisum0lem2.k . . . . . . . . . . . . . 14 𝐾 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) / 𝑎))
52 ovex 7453 . . . . . . . . . . . . . 14 ((𝑋‘(𝐿‘𝑎)) / 𝑎) ∈ V
5350, 51, 52fvmpt3i 6999 . . . . . . . . . . . . 13 (𝑚 ∈ ℕ → (𝐾‘𝑚) = ((𝑋‘(𝐿‘𝑚)) / 𝑚))
5447, 53syl 18 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐾‘𝑚) = ((𝑋‘(𝐿‘𝑚)) / 𝑚))
5554adantlrr 734 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐾‘𝑚) = ((𝑋‘(𝐿‘𝑚)) / 𝑚))
56 rpregt0 13135 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℝ+ → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
5756ad2antrl 741 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
5857simpld 500 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ ℝ)
59 simprr 785 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 1 ≤ 𝑥)
60 flge1nn 13961 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ ∧ 1 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ)
6158, 59, 60syl2anc 596 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (⌊‘𝑥) ∈ ℕ)
62 nnuz 13004 . . . . . . . . . . . 12 ℕ = (ℤ≥‘1)
6361, 62eleqtrdi 2870 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (⌊‘𝑥) ∈ (ℤ≥‘1))
6423adantlrr 734 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿‘𝑚)) / 𝑚) ∈ ℂ)
6555, 63, 64fsumser 15896 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚) = (seq1( + , 𝐾)‘(⌊‘𝑥)))
66 rpvmasum.a . . . . . . . . . . . . . 14 (𝜑 → 𝑁 ∈ ℕ)
67 rpvmasum2.1 . . . . . . . . . . . . . 14 1 = (0g‘𝐺)
68 eldifsni 4752 . . . . . . . . . . . . . . 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 27831 . . . . . . . . . . . . 13 (𝜑 → (𝑋 ∈ 𝑊 ↔ 𝑇 = 0))
7311, 72mpbid 235 . . . . . . . . . . . 12 (𝜑 → 𝑇 = 0)
7473adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑇 = 0)
7574eqcomd 2766 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 0 = 𝑇)
7665, 75oveq12d 7438 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚) − 0) = ((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇))
7746, 76eqtr3d 2797 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚) = ((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇))
7877fveq2d 6889 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)))
79 2fveq3 6890 . . . . . . . . . 10 (𝑦 = 𝑥 → (seq1( + , 𝐾)‘(⌊‘𝑦)) = (seq1( + , 𝐾)‘(⌊‘𝑥)))
8079fvoveq1d 7442 . . . . . . . . 9 (𝑦 = 𝑥 → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)))
81 oveq2 7428 . . . . . . . . 9 (𝑦 = 𝑥 → (𝐸 / 𝑦) = (𝐸 / 𝑥))
8280, 81breq12d 5115 . . . . . . . 8 (𝑦 = 𝑥 → ((abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 / 𝑦) ↔ (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)) ≤ (𝐸 / 𝑥)))
8371adantr 486 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 / 𝑦))
84 1re 11308 . . . . . . . . . 10 1 ∈ ℝ
85 elicopnf 13576 . . . . . . . . . 10 (1 ∈ ℝ → (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥)))
8684, 85ax-mp 5 . . . . . . . . 9 (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥))
8758, 59, 86sylanbrc 595 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ (1[,)+∞))
8882, 83, 87rspcdva 3577 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑥)) − 𝑇)) ≤ (𝐸 / 𝑥))
8978, 88eqbrtrd 5126 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥))
9045abscld 15606 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)) ∈ ℝ)
9136adantr 486 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝐸 ∈ ℝ)
92 lemuldiv2 12198 . . . . . . 7 (((abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)) ∈ ℝ ∧ 𝐸 ∈ ℝ ∧ (𝑥 ∈ ℝ ∧ 0 < 𝑥)) → ((𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) ≤ 𝐸 ↔ (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥)))
9390, 91, 57, 92syl3anc 1398 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → ((𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) ≤ 𝐸 ↔ (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)) ≤ (𝐸 / 𝑥)))
9489, 93mpbird 260 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (𝑥 · (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) ≤ 𝐸)
9544, 94eqbrtrd 5126 . . . 4 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘(𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) ≤ 𝐸)
9631, 25, 32, 36, 95elo1d 15703 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) ∈ 𝑂(1))
971, 25, 30, 96o1mul2 15792 . 2 (𝜑 → (𝑥 ∈ ℝ+ ↦ (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)))) ∈ 𝑂(1))
98 fzfid 14116 . . . . 5 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘((𝑥↑2) / 𝑚))) ∈ Fin)
9920rpsqrtcld 15579 . . . . . . . . 9 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ∈ ℝ+)
10099rpcnd 13166 . . . . . . . 8 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ∈ ℂ)
10199rpne0d 13169 . . . . . . . 8 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ≠ 0)
10217, 100, 101divcld 12093 . . . . . . 7 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
103102adantr 486 . . . . . 6 ((((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
104 elfznn 13687 . . . . . . . . . 10 (𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚))) → 𝑑 ∈ ℕ)
105104adantl 487 . . . . . . . . 9 ((((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → 𝑑 ∈ ℕ)
106105nnrpd 13162 . . . . . . . 8 ((((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → 𝑑 ∈ ℝ+)
107106rpsqrtcld 15579 . . . . . . 7 ((((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ∈ ℝ+)
108107rpcnd 13166 . . . . . 6 ((((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ∈ ℂ)
109107rpne0d 13169 . . . . . 6 ((((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (√‘𝑑) ≠ 0)
110103, 108, 109divcld 12093 . . . . 5 ((((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
11198, 110fsumcl 15899 . . . 4 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
1124, 111fsumcl 15899 . . 3 ((𝜑 ∧ 𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) ∈ ℂ)
113 mulcl 11284 . . . 4 ((2 ∈ ℂ ∧ (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)) ∈ ℂ) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) ∈ ℂ)
11427, 25, 113sylancr 599 . . 3 ((𝜑 ∧ 𝑥 ∈ ℝ+) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) ∈ ℂ)
115 2re 12417 . . . . . . . . . 10 2 ∈ ℝ
116 simpr 490 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑥 ∈ ℝ+) → 𝑥 ∈ ℝ+)
117 2z 12728 . . . . . . . . . . . . . 14 2 ∈ ℤ
118 rpexpcl 14223 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ+ ∧ 2 ∈ ℤ) → (𝑥↑2) ∈ ℝ+)
119116, 117, 118sylancl 598 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑥 ∈ ℝ+) → (𝑥↑2) ∈ ℝ+)
120 rpdivcl 13147 . . . . . . . . . . . . 13 (((𝑥↑2) ∈ ℝ+ ∧ 𝑚 ∈ ℝ+) → ((𝑥↑2) / 𝑚) ∈ ℝ+)
121119, 19, 120syl2an 608 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) / 𝑚) ∈ ℝ+)
122121rpsqrtcld 15579 . . . . . . . . . . 11 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) ∈ ℝ+)
123122rpred 13164 . . . . . . . . . 10 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) ∈ ℝ)
124 remulcl 11285 . . . . . . . . . 10 ((2 ∈ ℝ ∧ (√‘((𝑥↑2) / 𝑚)) ∈ ℝ) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℝ)
125115, 123, 124sylancr 599 . . . . . . . . 9 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℝ)
126125recnd 11337 . . . . . . . 8 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) ∈ ℂ)
127102, 126mulcld 11329 . . . . . . 7 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))) ∈ ℂ)
1284, 111, 127fsumsub 15954 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) − Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
129107rpcnne0d 13173 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → ((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0))
130 reccl 11981 . . . . . . . . . . 11 (((√‘𝑑) ∈ ℂ ∧ (√‘𝑑) ≠ 0) → (1 / (√‘𝑑)) ∈ ℂ)
131129, 130syl 18 . . . . . . . . . 10 ((((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (1 / (√‘𝑑)) ∈ ℂ)
13298, 131fsumcl 15899 . . . . . . . . 9 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) ∈ ℂ)
133102, 132, 126subdid 11772 . . . . . . . 8 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚))))) = ((((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) − (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
134 fveq2 6885 . . . . . . . . . . . . . 14 (𝑦 = ((𝑥↑2) / 𝑚) → (⌊‘𝑦) = (⌊‘((𝑥↑2) / 𝑚)))
135134oveq2d 7436 . . . . . . . . . . . . 13 (𝑦 = ((𝑥↑2) / 𝑚) → (1...(⌊‘𝑦)) = (1...(⌊‘((𝑥↑2) / 𝑚))))
136135sumeq1d 15867 . . . . . . . . . . . 12 (𝑦 = ((𝑥↑2) / 𝑚) → Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)))
137 fveq2 6885 . . . . . . . . . . . . 13 (𝑦 = ((𝑥↑2) / 𝑚) → (√‘𝑦) = (√‘((𝑥↑2) / 𝑚)))
138137oveq2d 7436 . . . . . . . . . . . 12 (𝑦 = ((𝑥↑2) / 𝑚) → (2 · (√‘𝑦)) = (2 · (√‘((𝑥↑2) / 𝑚))))
139136, 138oveq12d 7438 . . . . . . . . . . 11 (𝑦 = ((𝑥↑2) / 𝑚) → (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
140 dchrisum0lem2.h . . . . . . . . . . 11 𝐻 = (𝑦 ∈ ℝ+ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))))
141 ovex 7453 . . . . . . . . . . 11 (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))) ∈ V
142139, 140, 141fvmpt3i 6999 . . . . . . . . . 10 (((𝑥↑2) / 𝑚) ∈ ℝ+ → (𝐻‘((𝑥↑2) / 𝑚)) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
143121, 142syl 18 . . . . . . . . 9 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐻‘((𝑥↑2) / 𝑚)) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚)))))
144143oveq2d 7436 . . . . . . . 8 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑)) − (2 · (√‘((𝑥↑2) / 𝑚))))))
145103, 108, 109divrecd 12096 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) = (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
146145sumeq2dv 15869 . . . . . . . . . 10 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
14798, 102, 131fsummulc2 15950 . . . . . . . . . 10 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) = Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (1 / (√‘𝑑))))
148146, 147eqtr4d 2798 . . . . . . . . 9 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) = (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))))
149148oveq1d 7435 . . . . . . . 8 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))) = ((((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(1 / (√‘𝑑))) − (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
150133, 144, 1493eqtr4d 2805 . . . . . . 7 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
151150sumeq2dv 15869 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = Σ𝑚 ∈ (1...(⌊‘𝑥))(Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
152 mulcl 11284 . . . . . . . . . 10 ((2 ∈ ℂ ∧ 𝑥 ∈ ℂ) → (2 · 𝑥) ∈ ℂ)
15327, 3, 152sylancr 599 . . . . . . . . 9 ((𝜑 ∧ 𝑥 ∈ ℝ+) → (2 · 𝑥) ∈ ℂ)
1544, 153, 23fsummulc2 15950 . . . . . . . 8 ((𝜑 ∧ 𝑥 ∈ ℝ+) → ((2 · 𝑥) · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)) = Σ𝑚 ∈ (1...(⌊‘𝑥))((2 · 𝑥) · ((𝑋‘(𝐿‘𝑚)) / 𝑚)))
1551, 3, 24mulassd 11332 . . . . . . . 8 ((𝜑 ∧ 𝑥 ∈ ℝ+) → ((2 · 𝑥) · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)) = (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))))
156153adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · 𝑥) ∈ ℂ)
157156, 102, 100, 101div12d 12129 . . . . . . . . . 10 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑚))) = (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((2 · 𝑥) / (√‘𝑚))))
15899rpcnne0d 13173 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0))
159 divdiv1 12028 . . . . . . . . . . . . 13 (((𝑋‘(𝐿‘𝑚)) ∈ ℂ ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0) ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0)) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑚)) = ((𝑋‘(𝐿‘𝑚)) / ((√‘𝑚) · (√‘𝑚))))
16017, 158, 158, 159syl3anc 1398 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑚)) = ((𝑋‘(𝐿‘𝑚)) / ((√‘𝑚) · (√‘𝑚))))
16120rprege0d 13171 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑚 ∈ ℝ ∧ 0 ≤ 𝑚))
162 remsqsqrt 15423 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℝ ∧ 0 ≤ 𝑚) → ((√‘𝑚) · (√‘𝑚)) = 𝑚)
163161, 162syl 18 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) · (√‘𝑚)) = 𝑚)
164163oveq2d 7436 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿‘𝑚)) / ((√‘𝑚) · (√‘𝑚))) = ((𝑋‘(𝐿‘𝑚)) / 𝑚))
165160, 164eqtr2d 2796 . . . . . . . . . . 11 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿‘𝑚)) / 𝑚) = (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑚)))
166165oveq2d 7436 . . . . . . . . . 10 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · ((𝑋‘(𝐿‘𝑚)) / 𝑚)) = ((2 · 𝑥) · (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑚))))
167119adantr 486 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑥↑2) ∈ ℝ+)
168167rprege0d 13171 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) ∈ ℝ ∧ 0 ≤ (𝑥↑2)))
169 sqrtdiv 15432 . . . . . . . . . . . . . . 15 ((((𝑥↑2) ∈ ℝ ∧ 0 ≤ (𝑥↑2)) ∧ 𝑚 ∈ ℝ+) → (√‘((𝑥↑2) / 𝑚)) = ((√‘(𝑥↑2)) / (√‘𝑚)))
170168, 20, 169syl2anc 596 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) = ((√‘(𝑥↑2)) / (√‘𝑚)))
17138ad2antlr 740 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
172 sqrtsq 15436 . . . . . . . . . . . . . . . 16 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (√‘(𝑥↑2)) = 𝑥)
173171, 172syl 18 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘(𝑥↑2)) = 𝑥)
174173oveq1d 7435 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘(𝑥↑2)) / (√‘𝑚)) = (𝑥 / (√‘𝑚)))
175170, 174eqtrd 2795 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) = (𝑥 / (√‘𝑚)))
176175oveq2d 7436 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) = (2 · (𝑥 / (√‘𝑚))))
177 2cnd 12421 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 2 ∈ ℂ)
1783adantr 486 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℂ)
179 divass 11992 . . . . . . . . . . . . 13 ((2 ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0)) → ((2 · 𝑥) / (√‘𝑚)) = (2 · (𝑥 / (√‘𝑚))))
180177, 178, 158, 179syl3anc 1398 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) / (√‘𝑚)) = (2 · (𝑥 / (√‘𝑚))))
181176, 180eqtr4d 2798 . . . . . . . . . . 11 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (2 · (√‘((𝑥↑2) / 𝑚))) = ((2 · 𝑥) / (√‘𝑚)))
182181oveq2d 7436 . . . . . . . . . 10 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))) = (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((2 · 𝑥) / (√‘𝑚))))
183157, 166, 1823eqtr4d 2805 . . . . . . . . 9 (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((2 · 𝑥) · ((𝑋‘(𝐿‘𝑚)) / 𝑚)) = (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
184183sumeq2dv 15869 . . . . . . . 8 ((𝜑 ∧ 𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))((2 · 𝑥) · ((𝑋‘(𝐿‘𝑚)) / 𝑚)) = Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
185154, 155, 1843eqtr3d 2803 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ ℝ+) → (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))) = Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚)))))
186185oveq2d 7436 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ ℝ+) → (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) − Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (2 · (√‘((𝑥↑2) / 𝑚))))))
187128, 151, 1863eqtr4d 2805 . . . . 5 ((𝜑 ∧ 𝑥 ∈ ℝ+) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚)))))
188187mpteq2dva 5197 . . . 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 27844 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚)))) ∈ 𝑂(1))
195188, 194eqeltrrd 2861 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑑 ∈ (1...(⌊‘((𝑥↑2) / 𝑚)))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) / (√‘𝑑)) − (2 · (𝑥 · Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / 𝑚))))) ∈ 𝑂(1))
196112, 114, 195o1dif 15797 . 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 401   = wceq 1569   ∈ wcel 2144   ≠ wne 2955  ∀wral 3076  {crab 3412   ⊆ wss 3895   ∖ cdif 4045  {csn 4583   class class class wbr 5102   ↦ cmpt 5185  ‘cfv 6538  (class class class)co 7420  ℂcc 11198  ℝcr 11199  0cc0 11200  1c1 11201   + caddc 11203   · cmul 11205  +∞cpnf 11340   < clt 11343   ≤ cle 11344   − cmin 11541   / cdiv 11973  ℕcn 12335  2c2 12397  ℤcz 12693  ℤ≥cuz 12965  ℝ+crp 13120  [,)cico 13478  ...cfz 13639  ⌊cfl 13930  seqcseq 14144  ↑cexp 14204  √csqrt 15400  abscabs 15401   ⇝ cli 15651   ⇝𝑟 crli 15652  𝑂(1)co1 15653  Σcsu 15853  Basecbs 17387  0gc0g 17610  ℤRHomczrh 21805  ℤ/nℤczn 21808  DChrcdchr 27559
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751  ax-inf2 9642  ax-cnex 11256  ax-resscn 11257  ax-1cn 11258  ax-icn 11259  ax-addcl 11260  ax-addrcl 11261  ax-mulcl 11262  ax-mulrcl 11263  ax-mulcom 11264  ax-addass 11265  ax-mulass 11266  ax-distr 11267  ax-i2m1 11268  ax-1ne0 11269  ax-1rid 11270  ax-rnegex 11271  ax-rrecex 11272  ax-cnre 11273  ax-pre-lttri 11274  ax-pre-lttrn 11275  ax-pre-ltadd 11276  ax-pre-mulgt0 11277  ax-pre-sup 11278  ax-addf 11279  ax-mulf 11280
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-ss 3896  df-pss 4014  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-tp 4588  df-op 4590  df-uni 4867  df-int 4907  df-iun 4952  df-iin 4953  df-disj 5070  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5545  df-eprel 5550  df-po 5558  df-so 5559  df-fr 5603  df-se 5604  df-we 5605  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-of 7693  df-om 7878  df-1st 8001  df-2nd 8002  df-supp 8178  df-tpos 8243  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418  df-1o 8476  df-2o 8477  df-oadd 8480  df-omul 8481  df-er 8717  df-ec 8719  df-qs 8723  df-map 8849  df-pm 8850  df-ixp 8926  df-en 8974  df-dom 8975  df-sdom 8976  df-fin 8977  df-fsupp 9354  df-fi 9403  df-sup 9434  df-inf 9435  df-oi 9504  df-card 10020  df-acn 10023  df-pnf 11345  df-mnf 11346  df-xr 11347  df-ltxr 11348  df-le 11349  df-sub 11543  df-neg 11544  df-div 11974  df-nn 12336  df-2 12405  df-3 12406  df-4 12407  df-5 12408  df-6 12409  df-7 12410  df-8 12411  df-9 12412  df-n0 12607  df-z 12694  df-dec 12815  df-uz 12966  df-q 13076  df-rp 13121  df-xneg 13241  df-xadd 13242  df-xmul 13243  df-ioo 13480  df-ioc 13481  df-ico 13482  df-icc 13483  df-fz 13640  df-fzo 13789  df-fl 13932  df-mod 14010  df-seq 14145  df-exp 14205  df-fac 14418  df-bc 14447  df-hash 14475  df-shft 15220  df-cj 15266  df-re 15267  df-im 15268  df-sqrt 15402  df-abs 15403  df-limsup 15638  df-clim 15655  df-rlim 15656  df-o1 15657  df-lo1 15658  df-sum 15854  df-ef 16233  df-sin 16235  df-cos 16236  df-pi 16238  df-dvds 16423  df-struct 17325  df-sets 17342  df-slot 17360  df-ndx 17372  df-base 17388  df-ress 17409  df-plusg 17441  df-mulr 17442  df-starv 17443  df-sca 17444  df-vsca 17445  df-ip 17446  df-tset 17447  df-ple 17448  df-ds 17450  df-unif 17451  df-hom 17452  df-cco 17453  df-rest 17593  df-topn 17594  df-0g 17612  df-gsum 17613  df-topgen 17614  df-pt 17615  df-prds 17618  df-xrs 17674  df-qtop 17679  df-imas 17680  df-qus 17681  df-xps 17682  df-mre 17756  df-mrc 17757  df-acs 17759  df-mgm 18816  df-sgrp 18908  df-mnd 18924  df-mhm 18978  df-submnd 18979  df-grp 19147  df-minusg 19148  df-sbg 19149  df-mulg 19278  df-subg 19333  df-nsg 19334  df-eqg 19335  df-ghm 19428  df-cntz 19531  df-od 19742  df-cmn 19996  df-abl 19997  df-mgp 20361  df-rng 20375  df-ur 20408  df-ring 20461  df-cring 20462  df-oppr 20567  df-dvdsr 20587  df-unit 20588  df-invr 20618  df-dvr 20631  df-rhm 20702  df-subrng 20798  df-subrg 20822  df-drng 20982  df-lmod 21137  df-lss 21207  df-lsp 21247  df-sra 21448  df-rgmod 21449  df-lidl 21486  df-rsp 21487  df-2idl 21543  df-psmet 21670  df-xmet 21671  df-met 21672  df-bl 21673  df-mopn 21674  df-fbas 21675  df-fg 21676  df-cnfld 21679  df-zring 21753  df-zrh 21809  df-zn 21812  df-top 23212  df-topon 23229  df-topsp 23251  df-bases 23264  df-cld 23337  df-ntr 23338  df-cls 23339  df-nei 23416  df-lp 23454  df-perf 23455  df-cn 23545  df-cnp 23546  df-haus 23633  df-cmp 23705  df-tx 23881  df-hmeo 24074  df-fil 24165  df-fm 24257  df-flim 24258  df-flf 24259  df-xms 24639  df-ms 24640  df-tms 24641  df-cncf 25199  df-limc 26186  df-dv 26187  df-log 26884  df-cxp 26885  df-dchr 27560
This theorem is used by:  dchrisum0lem3  27846
  Copyright terms: Public domain W3C validator