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

Theorem dchrvmasumiflem1 26069
Description: Lemma for dchrvmasumif 26071. (Contributed by Mario Carneiro, 5-May-2016.)
Hypotheses
Ref Expression
rpvmasum.z 𝑍 = (ℤ/nℤ‘𝑁)
rpvmasum.l 𝐿 = (ℤRHom‘𝑍)
rpvmasum.a (𝜑𝑁 ∈ ℕ)
rpvmasum.g 𝐺 = (DChr‘𝑁)
rpvmasum.d 𝐷 = (Base‘𝐺)
rpvmasum.1 1 = (0g𝐺)
dchrisum.b (𝜑𝑋𝐷)
dchrisum.n1 (𝜑𝑋1 )
dchrvmasumif.f 𝐹 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) / 𝑎))
dchrvmasumif.c (𝜑𝐶 ∈ (0[,)+∞))
dchrvmasumif.s (𝜑 → seq1( + , 𝐹) ⇝ 𝑆)
dchrvmasumif.1 (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / 𝑦))
dchrvmasumif.g 𝐾 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) · ((log‘𝑎) / 𝑎)))
dchrvmasumif.e (𝜑𝐸 ∈ (0[,)+∞))
dchrvmasumif.t (𝜑 → seq1( + , 𝐾) ⇝ 𝑇)
dchrvmasumif.2 (𝜑 → ∀𝑦 ∈ (3[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 · ((log‘𝑦) / 𝑦)))
Assertion
Ref Expression
dchrvmasumiflem1 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑑 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑑)) · ((μ‘𝑑) / 𝑑)) · (Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑑)))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)))) ∈ 𝑂(1))
Distinct variable groups:   𝑥,𝑘,𝑦, 1   𝑥,𝑑,𝑦,𝐶   𝑘,𝑑,𝐹,𝑥,𝑦   𝑎,𝑑,𝑘,𝑥,𝑦   𝐸,𝑑,𝑥,𝑦   𝑘,𝐾,𝑦   𝑘,𝑁,𝑥,𝑦   𝜑,𝑑,𝑘,𝑥   𝑇,𝑑,𝑥,𝑦   𝑆,𝑑,𝑘,𝑥,𝑦   𝑘,𝑍,𝑥,𝑦   𝐷,𝑘,𝑥,𝑦   𝐿,𝑎,𝑑,𝑘,𝑥,𝑦   𝑋,𝑎,𝑑,𝑘,𝑥,𝑦
Allowed substitution hints:   𝜑(𝑦,𝑎)   𝐶(𝑘,𝑎)   𝐷(𝑎,𝑑)   𝑆(𝑎)   𝑇(𝑘,𝑎)   1 (𝑎,𝑑)   𝐸(𝑘,𝑎)   𝐹(𝑎)   𝐺(𝑥,𝑦,𝑘,𝑎,𝑑)   𝐾(𝑥,𝑎,𝑑)   𝑁(𝑎,𝑑)   𝑍(𝑎,𝑑)

Proof of Theorem dchrvmasumiflem1
Dummy variable 𝑚 is distinct from all other variables.
StepHypRef Expression
1 rpvmasum.z . 2 𝑍 = (ℤ/nℤ‘𝑁)
2 rpvmasum.l . 2 𝐿 = (ℤRHom‘𝑍)
3 rpvmasum.a . 2 (𝜑𝑁 ∈ ℕ)
4 rpvmasum.g . 2 𝐺 = (DChr‘𝑁)
5 rpvmasum.d . 2 𝐷 = (Base‘𝐺)
6 rpvmasum.1 . 2 1 = (0g𝐺)
7 dchrisum.b . 2 (𝜑𝑋𝐷)
8 dchrisum.n1 . 2 (𝜑𝑋1 )
9 fzfid 13333 . . 3 ((𝜑𝑚 ∈ ℝ+) → (1...(⌊‘𝑚)) ∈ Fin)
10 simpl 485 . . . . 5 ((𝜑𝑚 ∈ ℝ+) → 𝜑)
11 elfznn 12928 . . . . 5 (𝑘 ∈ (1...(⌊‘𝑚)) → 𝑘 ∈ ℕ)
127adantr 483 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → 𝑋𝐷)
13 nnz 11996 . . . . . . 7 (𝑘 ∈ ℕ → 𝑘 ∈ ℤ)
1413adantl 484 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℤ)
154, 1, 5, 2, 12, 14dchrzrhcl 25813 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (𝑋‘(𝐿𝑘)) ∈ ℂ)
1610, 11, 15syl2an 597 . . . 4 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝑋‘(𝐿𝑘)) ∈ ℂ)
17 simpr 487 . . . . . . . 8 ((𝜑𝑚 ∈ ℝ+) → 𝑚 ∈ ℝ+)
1811nnrpd 12421 . . . . . . . 8 (𝑘 ∈ (1...(⌊‘𝑚)) → 𝑘 ∈ ℝ+)
19 ifcl 4509 . . . . . . . 8 ((𝑚 ∈ ℝ+𝑘 ∈ ℝ+) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ+)
2017, 18, 19syl2an 597 . . . . . . 7 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ+)
2120relogcld 25198 . . . . . 6 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ)
2211adantl 484 . . . . . 6 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ∈ ℕ)
2321, 22nndivred 11683 . . . . 5 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℝ)
2423recnd 10661 . . . 4 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℂ)
2516, 24mulcld 10653 . . 3 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
269, 25fsumcl 15082 . 2 ((𝜑𝑚 ∈ ℝ+) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
27 fveq2 6663 . . . 4 (𝑚 = (𝑥 / 𝑑) → (⌊‘𝑚) = (⌊‘(𝑥 / 𝑑)))
2827oveq2d 7164 . . 3 (𝑚 = (𝑥 / 𝑑) → (1...(⌊‘𝑚)) = (1...(⌊‘(𝑥 / 𝑑))))
29 ifeq1 4469 . . . . . . 7 (𝑚 = (𝑥 / 𝑑) → if(𝑆 = 0, 𝑚, 𝑘) = if(𝑆 = 0, (𝑥 / 𝑑), 𝑘))
3029fveq2d 6667 . . . . . 6 (𝑚 = (𝑥 / 𝑑) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) = (log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)))
3130oveq1d 7163 . . . . 5 (𝑚 = (𝑥 / 𝑑) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘))
3231oveq2d 7164 . . . 4 (𝑚 = (𝑥 / 𝑑) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)))
3332adantr 483 . . 3 ((𝑚 = (𝑥 / 𝑑) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑑)))) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)))
3428, 33sumeq12rdv 15056 . 2 (𝑚 = (𝑥 / 𝑑) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑑)))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)))
35 dchrvmasumif.c . . 3 (𝜑𝐶 ∈ (0[,)+∞))
36 dchrvmasumif.e . . 3 (𝜑𝐸 ∈ (0[,)+∞))
3735, 36ifcld 4510 . 2 (𝜑 → if(𝑆 = 0, 𝐶, 𝐸) ∈ (0[,)+∞))
38 0cn 10625 . . 3 0 ∈ ℂ
39 dchrvmasumif.t . . . 4 (𝜑 → seq1( + , 𝐾) ⇝ 𝑇)
40 climcl 14848 . . . 4 (seq1( + , 𝐾) ⇝ 𝑇𝑇 ∈ ℂ)
4139, 40syl 17 . . 3 (𝜑𝑇 ∈ ℂ)
42 ifcl 4509 . . 3 ((0 ∈ ℂ ∧ 𝑇 ∈ ℂ) → if(𝑆 = 0, 0, 𝑇) ∈ ℂ)
4338, 41, 42sylancr 589 . 2 (𝜑 → if(𝑆 = 0, 0, 𝑇) ∈ ℂ)
44 nnuz 12273 . . . . . . . . 9 ℕ = (ℤ‘1)
45 1zzd 12005 . . . . . . . . 9 (𝜑 → 1 ∈ ℤ)
46 nncn 11638 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
4746adantl 484 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℂ)
48 nnne0 11663 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ≠ 0)
4948adantl 484 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → 𝑘 ≠ 0)
5015, 47, 49divcld 11408 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((𝑋‘(𝐿𝑘)) / 𝑘) ∈ ℂ)
51 dchrvmasumif.f . . . . . . . . . . . 12 𝐹 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) / 𝑎))
52 2fveq3 6668 . . . . . . . . . . . . . 14 (𝑎 = 𝑘 → (𝑋‘(𝐿𝑎)) = (𝑋‘(𝐿𝑘)))
53 id 22 . . . . . . . . . . . . . 14 (𝑎 = 𝑘𝑎 = 𝑘)
5452, 53oveq12d 7166 . . . . . . . . . . . . 13 (𝑎 = 𝑘 → ((𝑋‘(𝐿𝑎)) / 𝑎) = ((𝑋‘(𝐿𝑘)) / 𝑘))
5554cbvmptv 5160 . . . . . . . . . . . 12 (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) / 𝑎)) = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿𝑘)) / 𝑘))
5651, 55eqtri 2842 . . . . . . . . . . 11 𝐹 = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿𝑘)) / 𝑘))
5750, 56fmptd 6871 . . . . . . . . . 10 (𝜑𝐹:ℕ⟶ℂ)
58 ffvelrn 6842 . . . . . . . . . 10 ((𝐹:ℕ⟶ℂ ∧ 𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℂ)
5957, 58sylan 582 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℂ)
6044, 45, 59serf 13390 . . . . . . . 8 (𝜑 → seq1( + , 𝐹):ℕ⟶ℂ)
6160ad2antrr 724 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → seq1( + , 𝐹):ℕ⟶ℂ)
62 3re 11709 . . . . . . . . . . 11 3 ∈ ℝ
63 elicopnf 12825 . . . . . . . . . . 11 (3 ∈ ℝ → (𝑚 ∈ (3[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 3 ≤ 𝑚)))
6462, 63mp1i 13 . . . . . . . . . 10 (𝜑 → (𝑚 ∈ (3[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 3 ≤ 𝑚)))
6564simprbda 501 . . . . . . . . 9 ((𝜑𝑚 ∈ (3[,)+∞)) → 𝑚 ∈ ℝ)
66 1red 10634 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 1 ∈ ℝ)
6762a1i 11 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 3 ∈ ℝ)
68 1le3 11841 . . . . . . . . . . 11 1 ≤ 3
6968a1i 11 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 1 ≤ 3)
7064simplbda 502 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 3 ≤ 𝑚)
7166, 67, 65, 69, 70letrd 10789 . . . . . . . . 9 ((𝜑𝑚 ∈ (3[,)+∞)) → 1 ≤ 𝑚)
72 flge1nn 13183 . . . . . . . . 9 ((𝑚 ∈ ℝ ∧ 1 ≤ 𝑚) → (⌊‘𝑚) ∈ ℕ)
7365, 71, 72syl2anc 586 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → (⌊‘𝑚) ∈ ℕ)
7473adantr 483 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (⌊‘𝑚) ∈ ℕ)
7561, 74ffvelrnd 6845 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (seq1( + , 𝐹)‘(⌊‘𝑚)) ∈ ℂ)
7675abscld 14788 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ∈ ℝ)
77 simpl 485 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → 𝜑)
78 0red 10636 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 0 ∈ ℝ)
79 3pos 11734 . . . . . . . . . . 11 0 < 3
8079a1i 11 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 0 < 3)
8178, 67, 65, 80, 70ltletrd 10792 . . . . . . . . 9 ((𝜑𝑚 ∈ (3[,)+∞)) → 0 < 𝑚)
8265, 81elrpd 12420 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → 𝑚 ∈ ℝ+)
8377, 82jca 514 . . . . . . 7 ((𝜑𝑚 ∈ (3[,)+∞)) → (𝜑𝑚 ∈ ℝ+))
84 elrege0 12834 . . . . . . . . . 10 (𝐶 ∈ (0[,)+∞) ↔ (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
8584simplbi 500 . . . . . . . . 9 (𝐶 ∈ (0[,)+∞) → 𝐶 ∈ ℝ)
8635, 85syl 17 . . . . . . . 8 (𝜑𝐶 ∈ ℝ)
87 rerpdivcl 12411 . . . . . . . 8 ((𝐶 ∈ ℝ ∧ 𝑚 ∈ ℝ+) → (𝐶 / 𝑚) ∈ ℝ)
8886, 87sylan 582 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → (𝐶 / 𝑚) ∈ ℝ)
8983, 88syl 17 . . . . . 6 ((𝜑𝑚 ∈ (3[,)+∞)) → (𝐶 / 𝑚) ∈ ℝ)
9089adantr 483 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (𝐶 / 𝑚) ∈ ℝ)
9182relogcld 25198 . . . . . . 7 ((𝜑𝑚 ∈ (3[,)+∞)) → (log‘𝑚) ∈ ℝ)
9265, 71logge0d 25205 . . . . . . 7 ((𝜑𝑚 ∈ (3[,)+∞)) → 0 ≤ (log‘𝑚))
9391, 92jca 514 . . . . . 6 ((𝜑𝑚 ∈ (3[,)+∞)) → ((log‘𝑚) ∈ ℝ ∧ 0 ≤ (log‘𝑚)))
9493adantr 483 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((log‘𝑚) ∈ ℝ ∧ 0 ≤ (log‘𝑚)))
95 oveq2 7156 . . . . . . . 8 (𝑆 = 0 → ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆) = ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 0))
9660adantr 483 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → seq1( + , 𝐹):ℕ⟶ℂ)
9796, 73ffvelrnd 6845 . . . . . . . . 9 ((𝜑𝑚 ∈ (3[,)+∞)) → (seq1( + , 𝐹)‘(⌊‘𝑚)) ∈ ℂ)
9897subid1d 10978 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 0) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
9995, 98sylan9eqr 2876 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
10099fveq2d 6667 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) = (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))))
101 2fveq3 6668 . . . . . . . . . 10 (𝑦 = 𝑚 → (seq1( + , 𝐹)‘(⌊‘𝑦)) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
102101fvoveq1d 7170 . . . . . . . . 9 (𝑦 = 𝑚 → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) = (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)))
103 oveq2 7156 . . . . . . . . 9 (𝑦 = 𝑚 → (𝐶 / 𝑦) = (𝐶 / 𝑚))
104102, 103breq12d 5070 . . . . . . . 8 (𝑦 = 𝑚 → ((abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / 𝑦) ↔ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) ≤ (𝐶 / 𝑚)))
105 dchrvmasumif.1 . . . . . . . . 9 (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / 𝑦))
106105adantr 483 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / 𝑦))
107 1re 10633 . . . . . . . . . 10 1 ∈ ℝ
108 elicopnf 12825 . . . . . . . . . 10 (1 ∈ ℝ → (𝑚 ∈ (1[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚)))
109107, 108ax-mp 5 . . . . . . . . 9 (𝑚 ∈ (1[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚))
11065, 71, 109sylanbrc 585 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → 𝑚 ∈ (1[,)+∞))
111104, 106, 110rspcdva 3623 . . . . . . 7 ((𝜑𝑚 ∈ (3[,)+∞)) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) ≤ (𝐶 / 𝑚))
112111adantr 483 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) ≤ (𝐶 / 𝑚))
113100, 112eqbrtrrd 5081 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ≤ (𝐶 / 𝑚))
114 lemul2a 11487 . . . . 5 ((((abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ∈ ℝ ∧ (𝐶 / 𝑚) ∈ ℝ ∧ ((log‘𝑚) ∈ ℝ ∧ 0 ≤ (log‘𝑚))) ∧ (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ≤ (𝐶 / 𝑚)) → ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) ≤ ((log‘𝑚) · (𝐶 / 𝑚)))
11576, 90, 94, 113, 114syl31anc 1367 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) ≤ ((log‘𝑚) · (𝐶 / 𝑚)))
116 iftrue 4471 . . . . . . . . . . . . . . 15 (𝑆 = 0 → if(𝑆 = 0, 𝑚, 𝑘) = 𝑚)
117116fveq2d 6667 . . . . . . . . . . . . . 14 (𝑆 = 0 → (log‘if(𝑆 = 0, 𝑚, 𝑘)) = (log‘𝑚))
118117oveq1d 7163 . . . . . . . . . . . . 13 (𝑆 = 0 → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘𝑚) / 𝑘))
119118ad2antlr 725 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘𝑚) / 𝑘))
120119oveq2d 7164 . . . . . . . . . . 11 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑚) / 𝑘)))
12116adantlr 713 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝑋‘(𝐿𝑘)) ∈ ℂ)
122 relogcl 25151 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℝ+ → (log‘𝑚) ∈ ℝ)
123122adantl 484 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ ℝ+) → (log‘𝑚) ∈ ℝ)
124123recnd 10661 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ ℝ+) → (log‘𝑚) ∈ ℂ)
125124ad2antrr 724 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (log‘𝑚) ∈ ℂ)
12611adantl 484 . . . . . . . . . . . . 13 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ∈ ℕ)
127126nncnd 11646 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ∈ ℂ)
128126nnne0d 11679 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ≠ 0)
129121, 125, 127, 128div12d 11444 . . . . . . . . . . 11 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) · ((log‘𝑚) / 𝑘)) = ((log‘𝑚) · ((𝑋‘(𝐿𝑘)) / 𝑘)))
130120, 129eqtrd 2854 . . . . . . . . . 10 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((log‘𝑚) · ((𝑋‘(𝐿𝑘)) / 𝑘)))
131130sumeq2dv 15052 . . . . . . . . 9 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((log‘𝑚) · ((𝑋‘(𝐿𝑘)) / 𝑘)))
132 iftrue 4471 . . . . . . . . . . 11 (𝑆 = 0 → if(𝑆 = 0, 0, 𝑇) = 0)
133132oveq2d 7164 . . . . . . . . . 10 (𝑆 = 0 → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − 0))
13426subid1d 10978 . . . . . . . . . 10 ((𝜑𝑚 ∈ ℝ+) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − 0) = Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
135133, 134sylan9eqr 2876 . . . . . . . . 9 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
136 ovex 7181 . . . . . . . . . . . . . 14 ((𝑋‘(𝐿𝑘)) / 𝑘) ∈ V
13754, 51, 136fvmpt 6761 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (𝐹𝑘) = ((𝑋‘(𝐿𝑘)) / 𝑘))
13822, 137syl 17 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐹𝑘) = ((𝑋‘(𝐿𝑘)) / 𝑘))
13957adantr 483 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ ℝ+) → 𝐹:ℕ⟶ℂ)
140139, 11, 58syl2an 597 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐹𝑘) ∈ ℂ)
141138, 140eqeltrrd 2912 . . . . . . . . . . 11 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) / 𝑘) ∈ ℂ)
1429, 124, 141fsummulc2 15131 . . . . . . . . . 10 ((𝜑𝑚 ∈ ℝ+) → ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((log‘𝑚) · ((𝑋‘(𝐿𝑘)) / 𝑘)))
143142adantr 483 . . . . . . . . 9 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((log‘𝑚) · ((𝑋‘(𝐿𝑘)) / 𝑘)))
144131, 135, 1433eqtr4d 2864 . . . . . . . 8 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘)))
14583, 144sylan 582 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘)))
14683, 138sylan 582 . . . . . . . . . 10 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐹𝑘) = ((𝑋‘(𝐿𝑘)) / 𝑘))
14773, 44eleqtrdi 2921 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → (⌊‘𝑚) ∈ (ℤ‘1))
14877, 11, 50syl2an 597 . . . . . . . . . 10 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) / 𝑘) ∈ ℂ)
149146, 147, 148fsumser 15079 . . . . . . . . 9 ((𝜑𝑚 ∈ (3[,)+∞)) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
150149adantr 483 . . . . . . . 8 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
151150oveq2d 7164 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘)) = ((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚))))
152145, 151eqtrd 2854 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚))))
153152fveq2d 6667 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) = (abs‘((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚)))))
154122ad2antlr 725 . . . . . . . 8 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (log‘𝑚) ∈ ℝ)
155154recnd 10661 . . . . . . 7 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (log‘𝑚) ∈ ℂ)
15683, 155sylan 582 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (log‘𝑚) ∈ ℂ)
157156, 75absmuld 14806 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚)))) = ((abs‘(log‘𝑚)) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
15891, 92absidd 14774 . . . . . . 7 ((𝜑𝑚 ∈ (3[,)+∞)) → (abs‘(log‘𝑚)) = (log‘𝑚))
159158oveq1d 7163 . . . . . 6 ((𝜑𝑚 ∈ (3[,)+∞)) → ((abs‘(log‘𝑚)) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) = ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
160159adantr 483 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((abs‘(log‘𝑚)) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) = ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
161153, 157, 1603eqtrd 2858 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) = ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
162 iftrue 4471 . . . . . . . 8 (𝑆 = 0 → if(𝑆 = 0, 𝐶, 𝐸) = 𝐶)
163162adantl 484 . . . . . . 7 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → if(𝑆 = 0, 𝐶, 𝐸) = 𝐶)
164163oveq1d 7163 . . . . . 6 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = (𝐶 · ((log‘𝑚) / 𝑚)))
16586recnd 10661 . . . . . . . 8 (𝜑𝐶 ∈ ℂ)
166165ad2antrr 724 . . . . . . 7 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → 𝐶 ∈ ℂ)
167 rpcnne0 12399 . . . . . . . 8 (𝑚 ∈ ℝ+ → (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0))
168167ad2antlr 725 . . . . . . 7 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0))
169 div12 11312 . . . . . . 7 ((𝐶 ∈ ℂ ∧ (log‘𝑚) ∈ ℂ ∧ (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0)) → (𝐶 · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
170166, 155, 168, 169syl3anc 1365 . . . . . 6 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (𝐶 · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
171164, 170eqtrd 2854 . . . . 5 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
17283, 171sylan 582 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
173115, 161, 1723brtr4d 5089 . . 3 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)))
174 dchrvmasumif.2 . . . . . 6 (𝜑 → ∀𝑦 ∈ (3[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 · ((log‘𝑦) / 𝑦)))
175 2fveq3 6668 . . . . . . . . 9 (𝑦 = 𝑚 → (seq1( + , 𝐾)‘(⌊‘𝑦)) = (seq1( + , 𝐾)‘(⌊‘𝑚)))
176175fvoveq1d 7170 . . . . . . . 8 (𝑦 = 𝑚 → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)))
177 fveq2 6663 . . . . . . . . . 10 (𝑦 = 𝑚 → (log‘𝑦) = (log‘𝑚))
178 id 22 . . . . . . . . . 10 (𝑦 = 𝑚𝑦 = 𝑚)
179177, 178oveq12d 7166 . . . . . . . . 9 (𝑦 = 𝑚 → ((log‘𝑦) / 𝑦) = ((log‘𝑚) / 𝑚))
180179oveq2d 7164 . . . . . . . 8 (𝑦 = 𝑚 → (𝐸 · ((log‘𝑦) / 𝑦)) = (𝐸 · ((log‘𝑚) / 𝑚)))
181176, 180breq12d 5070 . . . . . . 7 (𝑦 = 𝑚 → ((abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 · ((log‘𝑦) / 𝑦)) ↔ (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚))))
182181rspccva 3620 . . . . . 6 ((∀𝑦 ∈ (3[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 · ((log‘𝑦) / 𝑦)) ∧ 𝑚 ∈ (3[,)+∞)) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚)))
183174, 182sylan 582 . . . . 5 ((𝜑𝑚 ∈ (3[,)+∞)) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚)))
184183adantr 483 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚)))
185 fveq2 6663 . . . . . . . . . . . 12 (𝑎 = 𝑘 → (log‘𝑎) = (log‘𝑘))
186185, 53oveq12d 7166 . . . . . . . . . . 11 (𝑎 = 𝑘 → ((log‘𝑎) / 𝑎) = ((log‘𝑘) / 𝑘))
18752, 186oveq12d 7166 . . . . . . . . . 10 (𝑎 = 𝑘 → ((𝑋‘(𝐿𝑎)) · ((log‘𝑎) / 𝑎)) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
188 dchrvmasumif.g . . . . . . . . . 10 𝐾 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) · ((log‘𝑎) / 𝑎)))
189 ovex 7181 . . . . . . . . . 10 ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)) ∈ V
190187, 188, 189fvmpt 6761 . . . . . . . . 9 (𝑘 ∈ ℕ → (𝐾𝑘) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
19111, 190syl 17 . . . . . . . 8 (𝑘 ∈ (1...(⌊‘𝑚)) → (𝐾𝑘) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
192 ifnefalse 4477 . . . . . . . . . . . . 13 (𝑆 ≠ 0 → if(𝑆 = 0, 𝑚, 𝑘) = 𝑘)
193192fveq2d 6667 . . . . . . . . . . . 12 (𝑆 ≠ 0 → (log‘if(𝑆 = 0, 𝑚, 𝑘)) = (log‘𝑘))
194193oveq1d 7163 . . . . . . . . . . 11 (𝑆 ≠ 0 → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘𝑘) / 𝑘))
195194oveq2d 7164 . . . . . . . . . 10 (𝑆 ≠ 0 → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
196195adantl 484 . . . . . . . . 9 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
197196eqcomd 2825 . . . . . . . 8 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
198191, 197sylan9eqr 2876 . . . . . . 7 ((((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐾𝑘) = ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
199147adantr 483 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (⌊‘𝑚) ∈ (ℤ‘1))
200 nnrp 12392 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ+)
201200adantl 484 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℝ+)
202201relogcld 25198 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (log‘𝑘) ∈ ℝ)
203202recnd 10661 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (log‘𝑘) ∈ ℂ)
204203, 47, 49divcld 11408 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → ((log‘𝑘) / 𝑘) ∈ ℂ)
20515, 204mulcld 10653 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)) ∈ ℂ)
206187cbvmptv 5160 . . . . . . . . . . . 12 (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) · ((log‘𝑎) / 𝑎))) = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
207188, 206eqtri 2842 . . . . . . . . . . 11 𝐾 = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
208205, 207fmptd 6871 . . . . . . . . . 10 (𝜑𝐾:ℕ⟶ℂ)
209208ad2antrr 724 . . . . . . . . 9 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → 𝐾:ℕ⟶ℂ)
210 ffvelrn 6842 . . . . . . . . 9 ((𝐾:ℕ⟶ℂ ∧ 𝑘 ∈ ℕ) → (𝐾𝑘) ∈ ℂ)
211209, 11, 210syl2an 597 . . . . . . . 8 ((((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐾𝑘) ∈ ℂ)
212198, 211eqeltrrd 2912 . . . . . . 7 ((((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
213198, 199, 212fsumser 15079 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = (seq1( + , 𝐾)‘(⌊‘𝑚)))
214 ifnefalse 4477 . . . . . . 7 (𝑆 ≠ 0 → if(𝑆 = 0, 0, 𝑇) = 𝑇)
215214adantl 484 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → if(𝑆 = 0, 0, 𝑇) = 𝑇)
216213, 215oveq12d 7166 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇))
217216fveq2d 6667 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)))
218 ifnefalse 4477 . . . . . 6 (𝑆 ≠ 0 → if(𝑆 = 0, 𝐶, 𝐸) = 𝐸)
219218adantl 484 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → if(𝑆 = 0, 𝐶, 𝐸) = 𝐸)
220219oveq1d 7163 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = (𝐸 · ((log‘𝑚) / 𝑚)))
221184, 217, 2203brtr4d 5089 . . 3 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)))
222173, 221pm2.61dane 3102 . 2 ((𝜑𝑚 ∈ (3[,)+∞)) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)))
223 fzfid 13333 . . . 4 (𝜑 → (1...2) ∈ Fin)
2247adantr 483 . . . . . . 7 ((𝜑𝑘 ∈ (1...2)) → 𝑋𝐷)
225 elfzelz 12900 . . . . . . . 8 (𝑘 ∈ (1...2) → 𝑘 ∈ ℤ)
226225adantl 484 . . . . . . 7 ((𝜑𝑘 ∈ (1...2)) → 𝑘 ∈ ℤ)
2274, 1, 5, 2, 224, 226dchrzrhcl 25813 . . . . . 6 ((𝜑𝑘 ∈ (1...2)) → (𝑋‘(𝐿𝑘)) ∈ ℂ)
228227abscld 14788 . . . . 5 ((𝜑𝑘 ∈ (1...2)) → (abs‘(𝑋‘(𝐿𝑘))) ∈ ℝ)
229 3rp 12387 . . . . . . 7 3 ∈ ℝ+
230 relogcl 25151 . . . . . . 7 (3 ∈ ℝ+ → (log‘3) ∈ ℝ)
231229, 230ax-mp 5 . . . . . 6 (log‘3) ∈ ℝ
232 elfznn 12928 . . . . . . 7 (𝑘 ∈ (1...2) → 𝑘 ∈ ℕ)
233232adantl 484 . . . . . 6 ((𝜑𝑘 ∈ (1...2)) → 𝑘 ∈ ℕ)
234 nndivre 11670 . . . . . 6 (((log‘3) ∈ ℝ ∧ 𝑘 ∈ ℕ) → ((log‘3) / 𝑘) ∈ ℝ)
235231, 233, 234sylancr 589 . . . . 5 ((𝜑𝑘 ∈ (1...2)) → ((log‘3) / 𝑘) ∈ ℝ)
236228, 235remulcld 10663 . . . 4 ((𝜑𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
237223, 236fsumrecl 15083 . . 3 (𝜑 → Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
23843abscld 14788 . . 3 (𝜑 → (abs‘if(𝑆 = 0, 0, 𝑇)) ∈ ℝ)
239237, 238readdcld 10662 . 2 (𝜑 → (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
240 simpl 485 . . . . . . 7 ((𝜑𝑚 ∈ (1[,)3)) → 𝜑)
24162rexri 10691 . . . . . . . . . . 11 3 ∈ ℝ*
242 elico2 12792 . . . . . . . . . . 11 ((1 ∈ ℝ ∧ 3 ∈ ℝ*) → (𝑚 ∈ (1[,)3) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚𝑚 < 3)))
243107, 241, 242mp2an 690 . . . . . . . . . 10 (𝑚 ∈ (1[,)3) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚𝑚 < 3))
244243simp1bi 1139 . . . . . . . . 9 (𝑚 ∈ (1[,)3) → 𝑚 ∈ ℝ)
245244adantl 484 . . . . . . . 8 ((𝜑𝑚 ∈ (1[,)3)) → 𝑚 ∈ ℝ)
246 0red 10636 . . . . . . . . 9 ((𝜑𝑚 ∈ (1[,)3)) → 0 ∈ ℝ)
247 1red 10634 . . . . . . . . 9 ((𝜑𝑚 ∈ (1[,)3)) → 1 ∈ ℝ)
248 0lt1 11154 . . . . . . . . . 10 0 < 1
249248a1i 11 . . . . . . . . 9 ((𝜑𝑚 ∈ (1[,)3)) → 0 < 1)
250243simp2bi 1140 . . . . . . . . . 10 (𝑚 ∈ (1[,)3) → 1 ≤ 𝑚)
251250adantl 484 . . . . . . . . 9 ((𝜑𝑚 ∈ (1[,)3)) → 1 ≤ 𝑚)
252246, 247, 245, 249, 251ltletrd 10792 . . . . . . . 8 ((𝜑𝑚 ∈ (1[,)3)) → 0 < 𝑚)
253245, 252elrpd 12420 . . . . . . 7 ((𝜑𝑚 ∈ (1[,)3)) → 𝑚 ∈ ℝ+)
254240, 253jca 514 . . . . . 6 ((𝜑𝑚 ∈ (1[,)3)) → (𝜑𝑚 ∈ ℝ+))
25543adantr 483 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → if(𝑆 = 0, 0, 𝑇) ∈ ℂ)
25626, 255subcld 10989 . . . . . 6 ((𝜑𝑚 ∈ ℝ+) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) ∈ ℂ)
257254, 256syl 17 . . . . 5 ((𝜑𝑚 ∈ (1[,)3)) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) ∈ ℂ)
258257abscld 14788 . . . 4 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
259254, 26syl 17 . . . . . 6 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
260259abscld 14788 . . . . 5 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
261238adantr 483 . . . . 5 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘if(𝑆 = 0, 0, 𝑇)) ∈ ℝ)
262260, 261readdcld 10662 . . . 4 ((𝜑𝑚 ∈ (1[,)3)) → ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) + (abs‘if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
263237adantr 483 . . . . 5 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
264263, 261readdcld 10662 . . . 4 ((𝜑𝑚 ∈ (1[,)3)) → (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
26526, 255abs2dif2d 14810 . . . . 5 ((𝜑𝑚 ∈ ℝ+) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) + (abs‘if(𝑆 = 0, 0, 𝑇))))
266254, 265syl 17 . . . 4 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) + (abs‘if(𝑆 = 0, 0, 𝑇))))
26725abscld 14788 . . . . . . . 8 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
2689, 267fsumrecl 15083 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
269254, 268syl 17 . . . . . 6 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
2709, 25fsumabs 15148 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
271254, 270syl 17 . . . . . 6 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
272 fzfid 13333 . . . . . . . . 9 ((𝜑𝑚 ∈ ℝ+) → (1...2) ∈ Fin)
273227adantlr 713 . . . . . . . . . . 11 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (𝑋‘(𝐿𝑘)) ∈ ℂ)
27417adantr 483 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑚 ∈ ℝ+)
275232adantl 484 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑘 ∈ ℕ)
276275nnrpd 12421 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑘 ∈ ℝ+)
277274, 276ifcld 4510 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ+)
278277relogcld 25198 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ)
279278, 275nndivred 11683 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℝ)
280279recnd 10661 . . . . . . . . . . 11 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℂ)
281273, 280mulcld 10653 . . . . . . . . . 10 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
282281abscld 14788 . . . . . . . . 9 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
283272, 282fsumrecl 15083 . . . . . . . 8 ((𝜑𝑚 ∈ ℝ+) → Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
284254, 283syl 17 . . . . . . 7 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
285 fzfid 13333 . . . . . . . 8 ((𝜑𝑚 ∈ (1[,)3)) → (1...2) ∈ Fin)
286254, 281sylan 582 . . . . . . . . 9 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
287286abscld 14788 . . . . . . . 8 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
288286absge0d 14796 . . . . . . . 8 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 0 ≤ (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
289245flcld 13160 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1[,)3)) → (⌊‘𝑚) ∈ ℤ)
290 2z 12006 . . . . . . . . . . 11 2 ∈ ℤ
291290a1i 11 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1[,)3)) → 2 ∈ ℤ)
292243simp3bi 1141 . . . . . . . . . . . . . 14 (𝑚 ∈ (1[,)3) → 𝑚 < 3)
293292adantl 484 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ (1[,)3)) → 𝑚 < 3)
294 3z 12007 . . . . . . . . . . . . . 14 3 ∈ ℤ
295 fllt 13168 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℝ ∧ 3 ∈ ℤ) → (𝑚 < 3 ↔ (⌊‘𝑚) < 3))
296245, 294, 295sylancl 588 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ (1[,)3)) → (𝑚 < 3 ↔ (⌊‘𝑚) < 3))
297293, 296mpbid 234 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (1[,)3)) → (⌊‘𝑚) < 3)
298 df-3 11693 . . . . . . . . . . . 12 3 = (2 + 1)
299297, 298breqtrdi 5098 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (1[,)3)) → (⌊‘𝑚) < (2 + 1))
300 rpre 12389 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℝ+𝑚 ∈ ℝ)
301300adantl 484 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ ℝ+) → 𝑚 ∈ ℝ)
302301flcld 13160 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ ℝ+) → (⌊‘𝑚) ∈ ℤ)
303 zleltp1 12025 . . . . . . . . . . . . 13 (((⌊‘𝑚) ∈ ℤ ∧ 2 ∈ ℤ) → ((⌊‘𝑚) ≤ 2 ↔ (⌊‘𝑚) < (2 + 1)))
304302, 290, 303sylancl 588 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ ℝ+) → ((⌊‘𝑚) ≤ 2 ↔ (⌊‘𝑚) < (2 + 1)))
305254, 304syl 17 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (1[,)3)) → ((⌊‘𝑚) ≤ 2 ↔ (⌊‘𝑚) < (2 + 1)))
306299, 305mpbird 259 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1[,)3)) → (⌊‘𝑚) ≤ 2)
307 eluz2 12241 . . . . . . . . . 10 (2 ∈ (ℤ‘(⌊‘𝑚)) ↔ ((⌊‘𝑚) ∈ ℤ ∧ 2 ∈ ℤ ∧ (⌊‘𝑚) ≤ 2))
308289, 291, 306, 307syl3anbrc 1337 . . . . . . . . 9 ((𝜑𝑚 ∈ (1[,)3)) → 2 ∈ (ℤ‘(⌊‘𝑚)))
309 fzss2 12939 . . . . . . . . 9 (2 ∈ (ℤ‘(⌊‘𝑚)) → (1...(⌊‘𝑚)) ⊆ (1...2))
310308, 309syl 17 . . . . . . . 8 ((𝜑𝑚 ∈ (1[,)3)) → (1...(⌊‘𝑚)) ⊆ (1...2))
311285, 287, 288, 310fsumless 15143 . . . . . . 7 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
312236adantlr 713 . . . . . . . 8 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
313273, 280absmuld 14806 . . . . . . . . . 10 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) = ((abs‘(𝑋‘(𝐿𝑘))) · (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
314254, 313sylan 582 . . . . . . . . 9 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) = ((abs‘(𝑋‘(𝐿𝑘))) · (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
315254, 279sylan 582 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℝ)
316254, 278sylan 582 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ)
317 log1 25161 . . . . . . . . . . . . . 14 (log‘1) = 0
318 elfzle1 12902 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (1...2) → 1 ≤ 𝑘)
319 breq2 5061 . . . . . . . . . . . . . . . . 17 (𝑚 = if(𝑆 = 0, 𝑚, 𝑘) → (1 ≤ 𝑚 ↔ 1 ≤ if(𝑆 = 0, 𝑚, 𝑘)))
320 breq2 5061 . . . . . . . . . . . . . . . . 17 (𝑘 = if(𝑆 = 0, 𝑚, 𝑘) → (1 ≤ 𝑘 ↔ 1 ≤ if(𝑆 = 0, 𝑚, 𝑘)))
321319, 320ifboth 4503 . . . . . . . . . . . . . . . 16 ((1 ≤ 𝑚 ∧ 1 ≤ 𝑘) → 1 ≤ if(𝑆 = 0, 𝑚, 𝑘))
322251, 318, 321syl2an 597 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 1 ≤ if(𝑆 = 0, 𝑚, 𝑘))
323 1rp 12385 . . . . . . . . . . . . . . . . 17 1 ∈ ℝ+
324 logleb 25178 . . . . . . . . . . . . . . . . 17 ((1 ∈ ℝ+ ∧ if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ+) → (1 ≤ if(𝑆 = 0, 𝑚, 𝑘) ↔ (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))))
325323, 277, 324sylancr 589 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (1 ≤ if(𝑆 = 0, 𝑚, 𝑘) ↔ (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))))
326254, 325sylan 582 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (1 ≤ if(𝑆 = 0, 𝑚, 𝑘) ↔ (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))))
327322, 326mpbid 234 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘)))
328317, 327eqbrtrrid 5093 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 0 ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘)))
329276rpregt0d 12429 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (𝑘 ∈ ℝ ∧ 0 < 𝑘))
330254, 329sylan 582 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (𝑘 ∈ ℝ ∧ 0 < 𝑘))
331 divge0 11501 . . . . . . . . . . . . 13 ((((log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ ∧ 0 ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))) ∧ (𝑘 ∈ ℝ ∧ 0 < 𝑘)) → 0 ≤ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))
332316, 328, 330, 331syl21anc 835 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 0 ≤ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))
333315, 332absidd 14774 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))
334333, 315eqeltrd 2911 . . . . . . . . . 10 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℝ)
335235adantlr 713 . . . . . . . . . 10 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘3) / 𝑘) ∈ ℝ)
336228adantlr 713 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (abs‘(𝑋‘(𝐿𝑘))) ∈ ℝ)
337273absge0d 14796 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 0 ≤ (abs‘(𝑋‘(𝐿𝑘))))
338336, 337jca 514 . . . . . . . . . . 11 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿𝑘))) ∈ ℝ ∧ 0 ≤ (abs‘(𝑋‘(𝐿𝑘)))))
339254, 338sylan 582 . . . . . . . . . 10 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿𝑘))) ∈ ℝ ∧ 0 ≤ (abs‘(𝑋‘(𝐿𝑘)))))
340292ad2antlr 725 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 𝑚 < 3)
341275nnred 11645 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑘 ∈ ℝ)
342 2re 11703 . . . . . . . . . . . . . . . . . 18 2 ∈ ℝ
343342a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 2 ∈ ℝ)
34462a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 3 ∈ ℝ)
345 elfzle2 12903 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (1...2) → 𝑘 ≤ 2)
346345adantl 484 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑘 ≤ 2)
347 2lt3 11801 . . . . . . . . . . . . . . . . . 18 2 < 3
348347a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 2 < 3)
349341, 343, 344, 346, 348lelttrd 10790 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑘 < 3)
350254, 349sylan 582 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 𝑘 < 3)
351 breq1 5060 . . . . . . . . . . . . . . . 16 (𝑚 = if(𝑆 = 0, 𝑚, 𝑘) → (𝑚 < 3 ↔ if(𝑆 = 0, 𝑚, 𝑘) < 3))
352 breq1 5060 . . . . . . . . . . . . . . . 16 (𝑘 = if(𝑆 = 0, 𝑚, 𝑘) → (𝑘 < 3 ↔ if(𝑆 = 0, 𝑚, 𝑘) < 3))
353351, 352ifboth 4503 . . . . . . . . . . . . . . 15 ((𝑚 < 3 ∧ 𝑘 < 3) → if(𝑆 = 0, 𝑚, 𝑘) < 3)
354340, 350, 353syl2anc 586 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) < 3)
355277rpred 12423 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ)
356 ltle 10721 . . . . . . . . . . . . . . . 16 ((if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ ∧ 3 ∈ ℝ) → (if(𝑆 = 0, 𝑚, 𝑘) < 3 → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3))
357355, 62, 356sylancl 588 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) < 3 → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3))
358254, 357sylan 582 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) < 3 → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3))
359354, 358mpd 15 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3)
360 logleb 25178 . . . . . . . . . . . . . . 15 ((if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ+ ∧ 3 ∈ ℝ+) → (if(𝑆 = 0, 𝑚, 𝑘) ≤ 3 ↔ (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3)))
361277, 229, 360sylancl 588 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) ≤ 3 ↔ (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3)))
362254, 361sylan 582 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) ≤ 3 ↔ (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3)))
363359, 362mpbid 234 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3))
364231a1i 11 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (log‘3) ∈ ℝ)
365278, 364, 276lediv1d 12469 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3) ↔ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ≤ ((log‘3) / 𝑘)))
366254, 365sylan 582 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3) ↔ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ≤ ((log‘3) / 𝑘)))
367363, 366mpbid 234 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ≤ ((log‘3) / 𝑘))
368333, 367eqbrtrd 5079 . . . . . . . . . 10 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ≤ ((log‘3) / 𝑘))
369 lemul2a 11487 . . . . . . . . . 10 ((((abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℝ ∧ ((log‘3) / 𝑘) ∈ ℝ ∧ ((abs‘(𝑋‘(𝐿𝑘))) ∈ ℝ ∧ 0 ≤ (abs‘(𝑋‘(𝐿𝑘))))) ∧ (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ≤ ((log‘3) / 𝑘)) → ((abs‘(𝑋‘(𝐿𝑘))) · (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ ((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)))
370334, 335, 339, 368, 369syl31anc 1367 . . . . . . . . 9 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿𝑘))) · (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ ((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)))
371314, 370eqbrtrd 5079 . . . . . . . 8 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ ((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)))
372285, 287, 312, 371fsumle 15146 . . . . . . 7 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)))
373269, 284, 263, 311, 372letrd 10789 . . . . . 6 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)))
374260, 269, 263, 271, 373letrd 10789 . . . . 5 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)))
37526abscld 14788 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
376237adantr 483 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
377255abscld 14788 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → (abs‘if(𝑆 = 0, 0, 𝑇)) ∈ ℝ)
378375, 376, 377leadd1d 11226 . . . . . 6 ((𝜑𝑚 ∈ ℝ+) → ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ↔ ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) + (abs‘if(𝑆 = 0, 0, 𝑇))) ≤ (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇)))))
379254, 378syl 17 . . . . 5 ((𝜑𝑚 ∈ (1[,)3)) → ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ↔ ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) + (abs‘if(𝑆 = 0, 0, 𝑇))) ≤ (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇)))))
380374, 379mpbid 234 . . . 4 ((𝜑𝑚 ∈ (1[,)3)) → ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) + (abs‘if(𝑆 = 0, 0, 𝑇))) ≤ (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))))
381258, 262, 264, 266, 380letrd 10789 . . 3 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))))
382381ralrimiva 3180 . 2 (𝜑 → ∀𝑚 ∈ (1[,)3)(abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))))
3831, 2, 3, 4, 5, 6, 7, 8, 26, 34, 37, 43, 222, 239, 382dchrvmasumlem3 26067 1 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑑 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑑)) · ((μ‘𝑑) / 𝑑)) · (Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑑)))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 398  w3a 1081   = wceq 1530  wcel 2107  wne 3014  wral 3136  wss 3934  ifcif 4465   class class class wbr 5057  cmpt 5137  wf 6344  cfv 6348  (class class class)co 7148  cc 10527  cr 10528  0cc0 10529  1c1 10530   + caddc 10532   · cmul 10534  +∞cpnf 10664  *cxr 10666   < clt 10667  cle 10668  cmin 10862   / cdiv 11289  cn 11630  2c2 11684  3c3 11685  cz 11973  cuz 12235  +crp 12381  [,)cico 12732  ...cfz 12884  cfl 13152  seqcseq 13361  abscabs 14585  cli 14833  𝑂(1)co1 14835  Σcsu 15034  Basecbs 16475  0gc0g 16705  ℤRHomczrh 20639  ℤ/nczn 20642  logclog 25130  μcmu 25664  DChrcdchr 25800
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1904  ax-6 1963  ax-7 2008  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2153  ax-12 2169  ax-ext 2791  ax-rep 5181  ax-sep 5194  ax-nul 5201  ax-pow 5257  ax-pr 5320  ax-un 7453  ax-inf2 9096  ax-cnex 10585  ax-resscn 10586  ax-1cn 10587  ax-icn 10588  ax-addcl 10589  ax-addrcl 10590  ax-mulcl 10591  ax-mulrcl 10592  ax-mulcom 10593  ax-addass 10594  ax-mulass 10595  ax-distr 10596  ax-i2m1 10597  ax-1ne0 10598  ax-1rid 10599  ax-rnegex 10600  ax-rrecex 10601  ax-cnre 10602  ax-pre-lttri 10603  ax-pre-lttrn 10604  ax-pre-ltadd 10605  ax-pre-mulgt0 10606  ax-pre-sup 10607  ax-addf 10608  ax-mulf 10609
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1082  df-3an 1083  df-tru 1533  df-fal 1543  df-ex 1774  df-nf 1778  df-sb 2063  df-mo 2616  df-eu 2648  df-clab 2798  df-cleq 2812  df-clel 2891  df-nfc 2961  df-ne 3015  df-nel 3122  df-ral 3141  df-rex 3142  df-reu 3143  df-rmo 3144  df-rab 3145  df-v 3495  df-sbc 3771  df-csb 3882  df-dif 3937  df-un 3939  df-in 3941  df-ss 3950  df-pss 3952  df-nul 4290  df-if 4466  df-pw 4539  df-sn 4560  df-pr 4562  df-tp 4564  df-op 4566  df-uni 4831  df-int 4868  df-iun 4912  df-iin 4913  df-disj 5023  df-br 5058  df-opab 5120  df-mpt 5138  df-tr 5164  df-id 5453  df-eprel 5458  df-po 5467  df-so 5468  df-fr 5507  df-se 5508  df-we 5509  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-res 5560  df-ima 5561  df-pred 6141  df-ord 6187  df-on 6188  df-lim 6189  df-suc 6190  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-fo 6354  df-f1o 6355  df-fv 6356  df-isom 6357  df-riota 7106  df-ov 7151  df-oprab 7152  df-mpo 7153  df-of 7401  df-om 7573  df-1st 7681  df-2nd 7682  df-supp 7823  df-tpos 7884  df-wrecs 7939  df-recs 8000  df-rdg 8038  df-1o 8094  df-2o 8095  df-oadd 8098  df-omul 8099  df-er 8281  df-ec 8283  df-qs 8287  df-map 8400  df-pm 8401  df-ixp 8454  df-en 8502  df-dom 8503  df-sdom 8504  df-fin 8505  df-fsupp 8826  df-fi 8867  df-sup 8898  df-inf 8899  df-oi 8966  df-card 9360  df-acn 9363  df-pnf 10669  df-mnf 10670  df-xr 10671  df-ltxr 10672  df-le 10673  df-sub 10864  df-neg 10865  df-div 11290  df-nn 11631  df-2 11692  df-3 11693  df-4 11694  df-5 11695  df-6 11696  df-7 11697  df-8 11698  df-9 11699  df-n0 11890  df-xnn0 11960  df-z 11974  df-dec 12091  df-uz 12236  df-q 12341  df-rp 12382  df-xneg 12499  df-xadd 12500  df-xmul 12501  df-ioo 12734  df-ioc 12735  df-ico 12736  df-icc 12737  df-fz 12885  df-fzo 13026  df-fl 13154  df-mod 13230  df-seq 13362  df-exp 13422  df-fac 13626  df-bc 13655  df-hash 13683  df-shft 14418  df-cj 14450  df-re 14451  df-im 14452  df-sqrt 14586  df-abs 14587  df-limsup 14820  df-clim 14837  df-rlim 14838  df-o1 14839  df-lo1 14840  df-sum 15035  df-ef 15413  df-e 15414  df-sin 15415  df-cos 15416  df-tan 15417  df-pi 15418  df-dvds 15600  df-prm 16008  df-struct 16477  df-ndx 16478  df-slot 16479  df-base 16481  df-sets 16482  df-ress 16483  df-plusg 16570  df-mulr 16571  df-starv 16572  df-sca 16573  df-vsca 16574  df-ip 16575  df-tset 16576  df-ple 16577  df-ds 16579  df-unif 16580  df-hom 16581  df-cco 16582  df-rest 16688  df-topn 16689  df-0g 16707  df-gsum 16708  df-topgen 16709  df-pt 16710  df-prds 16713  df-xrs 16767  df-qtop 16772  df-imas 16773  df-qus 16774  df-xps 16775  df-mre 16849  df-mrc 16850  df-acs 16852  df-mgm 17844  df-sgrp 17893  df-mnd 17904  df-mhm 17948  df-submnd 17949  df-grp 18098  df-minusg 18099  df-sbg 18100  df-mulg 18217  df-subg 18268  df-nsg 18269  df-eqg 18270  df-ghm 18348  df-cntz 18439  df-od 18648  df-cmn 18900  df-abl 18901  df-mgp 19232  df-ur 19244  df-ring 19291  df-cring 19292  df-oppr 19365  df-dvdsr 19383  df-unit 19384  df-invr 19414  df-dvr 19425  df-rnghom 19459  df-drng 19496  df-subrg 19525  df-lmod 19628  df-lss 19696  df-lsp 19736  df-sra 19936  df-rgmod 19937  df-lidl 19938  df-rsp 19939  df-2idl 19997  df-psmet 20529  df-xmet 20530  df-met 20531  df-bl 20532  df-mopn 20533  df-fbas 20534  df-fg 20535  df-cnfld 20538  df-zring 20610  df-zrh 20643  df-zn 20646  df-top 21494  df-topon 21511  df-topsp 21533  df-bases 21546  df-cld 21619  df-ntr 21620  df-cls 21621  df-nei 21698  df-lp 21736  df-perf 21737  df-cn 21827  df-cnp 21828  df-haus 21915  df-cmp 21987  df-tx 22162  df-hmeo 22355  df-fil 22446  df-fm 22538  df-flim 22539  df-flf 22540  df-xms 22922  df-ms 22923  df-tms 22924  df-cncf 23478  df-limc 24456  df-dv 24457  df-ulm 24957  df-log 25132  df-cxp 25133  df-atan 25437  df-em 25562  df-mu 25670  df-dchr 25801
This theorem is referenced by:  dchrvmasumiflem2  26070
  Copyright terms: Public domain W3C validator