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

Theorem dchrvmasumiflem1 26229
Description: Lemma for dchrvmasumif 26231. (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 13425 . . 3 ((𝜑𝑚 ∈ ℝ+) → (1...(⌊‘𝑚)) ∈ Fin)
10 simpl 486 . . . . 5 ((𝜑𝑚 ∈ ℝ+) → 𝜑)
11 elfznn 13020 . . . . 5 (𝑘 ∈ (1...(⌊‘𝑚)) → 𝑘 ∈ ℕ)
127adantr 484 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → 𝑋𝐷)
13 nnz 12078 . . . . . . 7 (𝑘 ∈ ℕ → 𝑘 ∈ ℤ)
1413adantl 485 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℤ)
154, 1, 5, 2, 12, 14dchrzrhcl 25973 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (𝑋‘(𝐿𝑘)) ∈ ℂ)
1610, 11, 15syl2an 599 . . . 4 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝑋‘(𝐿𝑘)) ∈ ℂ)
17 simpr 488 . . . . . . . 8 ((𝜑𝑚 ∈ ℝ+) → 𝑚 ∈ ℝ+)
1811nnrpd 12505 . . . . . . . 8 (𝑘 ∈ (1...(⌊‘𝑚)) → 𝑘 ∈ ℝ+)
19 ifcl 4456 . . . . . . . 8 ((𝑚 ∈ ℝ+𝑘 ∈ ℝ+) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ+)
2017, 18, 19syl2an 599 . . . . . . 7 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ+)
2120relogcld 25358 . . . . . 6 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ)
2211adantl 485 . . . . . 6 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ∈ ℕ)
2321, 22nndivred 11763 . . . . 5 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℝ)
2423recnd 10740 . . . 4 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℂ)
2516, 24mulcld 10732 . . 3 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
269, 25fsumcl 15176 . 2 ((𝜑𝑚 ∈ ℝ+) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
27 fveq2 6668 . . . 4 (𝑚 = (𝑥 / 𝑑) → (⌊‘𝑚) = (⌊‘(𝑥 / 𝑑)))
2827oveq2d 7180 . . 3 (𝑚 = (𝑥 / 𝑑) → (1...(⌊‘𝑚)) = (1...(⌊‘(𝑥 / 𝑑))))
29 ifeq1 4415 . . . . . . 7 (𝑚 = (𝑥 / 𝑑) → if(𝑆 = 0, 𝑚, 𝑘) = if(𝑆 = 0, (𝑥 / 𝑑), 𝑘))
3029fveq2d 6672 . . . . . 6 (𝑚 = (𝑥 / 𝑑) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) = (log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)))
3130oveq1d 7179 . . . . 5 (𝑚 = (𝑥 / 𝑑) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘))
3231oveq2d 7180 . . . 4 (𝑚 = (𝑥 / 𝑑) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)))
3332adantr 484 . . 3 ((𝑚 = (𝑥 / 𝑑) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑑)))) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)))
3428, 33sumeq12rdv 15150 . 2 (𝑚 = (𝑥 / 𝑑) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑑)))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)))
35 dchrvmasumif.c . . 3 (𝜑𝐶 ∈ (0[,)+∞))
36 dchrvmasumif.e . . 3 (𝜑𝐸 ∈ (0[,)+∞))
3735, 36ifcld 4457 . 2 (𝜑 → if(𝑆 = 0, 𝐶, 𝐸) ∈ (0[,)+∞))
38 0cn 10704 . . 3 0 ∈ ℂ
39 dchrvmasumif.t . . . 4 (𝜑 → seq1( + , 𝐾) ⇝ 𝑇)
40 climcl 14939 . . . 4 (seq1( + , 𝐾) ⇝ 𝑇𝑇 ∈ ℂ)
4139, 40syl 17 . . 3 (𝜑𝑇 ∈ ℂ)
42 ifcl 4456 . . 3 ((0 ∈ ℂ ∧ 𝑇 ∈ ℂ) → if(𝑆 = 0, 0, 𝑇) ∈ ℂ)
4338, 41, 42sylancr 590 . 2 (𝜑 → if(𝑆 = 0, 0, 𝑇) ∈ ℂ)
44 nnuz 12356 . . . . . . . . 9 ℕ = (ℤ‘1)
45 1zzd 12087 . . . . . . . . 9 (𝜑 → 1 ∈ ℤ)
46 nncn 11717 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
4746adantl 485 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℂ)
48 nnne0 11743 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ≠ 0)
4948adantl 485 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → 𝑘 ≠ 0)
5015, 47, 49divcld 11487 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((𝑋‘(𝐿𝑘)) / 𝑘) ∈ ℂ)
51 dchrvmasumif.f . . . . . . . . . . . 12 𝐹 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) / 𝑎))
52 2fveq3 6673 . . . . . . . . . . . . . 14 (𝑎 = 𝑘 → (𝑋‘(𝐿𝑎)) = (𝑋‘(𝐿𝑘)))
53 id 22 . . . . . . . . . . . . . 14 (𝑎 = 𝑘𝑎 = 𝑘)
5452, 53oveq12d 7182 . . . . . . . . . . . . 13 (𝑎 = 𝑘 → ((𝑋‘(𝐿𝑎)) / 𝑎) = ((𝑋‘(𝐿𝑘)) / 𝑘))
5554cbvmptv 5130 . . . . . . . . . . . 12 (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) / 𝑎)) = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿𝑘)) / 𝑘))
5651, 55eqtri 2761 . . . . . . . . . . 11 𝐹 = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿𝑘)) / 𝑘))
5750, 56fmptd 6882 . . . . . . . . . 10 (𝜑𝐹:ℕ⟶ℂ)
58 ffvelrn 6853 . . . . . . . . . 10 ((𝐹:ℕ⟶ℂ ∧ 𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℂ)
5957, 58sylan 583 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℂ)
6044, 45, 59serf 13483 . . . . . . . 8 (𝜑 → seq1( + , 𝐹):ℕ⟶ℂ)
6160ad2antrr 726 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → seq1( + , 𝐹):ℕ⟶ℂ)
62 3re 11789 . . . . . . . . . . 11 3 ∈ ℝ
63 elicopnf 12912 . . . . . . . . . . 11 (3 ∈ ℝ → (𝑚 ∈ (3[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 3 ≤ 𝑚)))
6462, 63mp1i 13 . . . . . . . . . 10 (𝜑 → (𝑚 ∈ (3[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 3 ≤ 𝑚)))
6564simprbda 502 . . . . . . . . 9 ((𝜑𝑚 ∈ (3[,)+∞)) → 𝑚 ∈ ℝ)
66 1red 10713 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 1 ∈ ℝ)
6762a1i 11 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 3 ∈ ℝ)
68 1le3 11921 . . . . . . . . . . 11 1 ≤ 3
6968a1i 11 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 1 ≤ 3)
7064simplbda 503 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 3 ≤ 𝑚)
7166, 67, 65, 69, 70letrd 10868 . . . . . . . . 9 ((𝜑𝑚 ∈ (3[,)+∞)) → 1 ≤ 𝑚)
72 flge1nn 13275 . . . . . . . . 9 ((𝑚 ∈ ℝ ∧ 1 ≤ 𝑚) → (⌊‘𝑚) ∈ ℕ)
7365, 71, 72syl2anc 587 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → (⌊‘𝑚) ∈ ℕ)
7473adantr 484 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (⌊‘𝑚) ∈ ℕ)
7561, 74ffvelrnd 6856 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (seq1( + , 𝐹)‘(⌊‘𝑚)) ∈ ℂ)
7675abscld 14879 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ∈ ℝ)
77 simpl 486 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → 𝜑)
78 0red 10715 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 0 ∈ ℝ)
79 3pos 11814 . . . . . . . . . . 11 0 < 3
8079a1i 11 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → 0 < 3)
8178, 67, 65, 80, 70ltletrd 10871 . . . . . . . . 9 ((𝜑𝑚 ∈ (3[,)+∞)) → 0 < 𝑚)
8265, 81elrpd 12504 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → 𝑚 ∈ ℝ+)
8377, 82jca 515 . . . . . . 7 ((𝜑𝑚 ∈ (3[,)+∞)) → (𝜑𝑚 ∈ ℝ+))
84 elrege0 12921 . . . . . . . . . 10 (𝐶 ∈ (0[,)+∞) ↔ (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
8584simplbi 501 . . . . . . . . 9 (𝐶 ∈ (0[,)+∞) → 𝐶 ∈ ℝ)
8635, 85syl 17 . . . . . . . 8 (𝜑𝐶 ∈ ℝ)
87 rerpdivcl 12495 . . . . . . . 8 ((𝐶 ∈ ℝ ∧ 𝑚 ∈ ℝ+) → (𝐶 / 𝑚) ∈ ℝ)
8886, 87sylan 583 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → (𝐶 / 𝑚) ∈ ℝ)
8983, 88syl 17 . . . . . 6 ((𝜑𝑚 ∈ (3[,)+∞)) → (𝐶 / 𝑚) ∈ ℝ)
9089adantr 484 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (𝐶 / 𝑚) ∈ ℝ)
9182relogcld 25358 . . . . . . 7 ((𝜑𝑚 ∈ (3[,)+∞)) → (log‘𝑚) ∈ ℝ)
9265, 71logge0d 25365 . . . . . . 7 ((𝜑𝑚 ∈ (3[,)+∞)) → 0 ≤ (log‘𝑚))
9391, 92jca 515 . . . . . 6 ((𝜑𝑚 ∈ (3[,)+∞)) → ((log‘𝑚) ∈ ℝ ∧ 0 ≤ (log‘𝑚)))
9493adantr 484 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((log‘𝑚) ∈ ℝ ∧ 0 ≤ (log‘𝑚)))
95 oveq2 7172 . . . . . . . 8 (𝑆 = 0 → ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆) = ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 0))
9660adantr 484 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → seq1( + , 𝐹):ℕ⟶ℂ)
9796, 73ffvelrnd 6856 . . . . . . . . 9 ((𝜑𝑚 ∈ (3[,)+∞)) → (seq1( + , 𝐹)‘(⌊‘𝑚)) ∈ ℂ)
9897subid1d 11057 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 0) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
9995, 98sylan9eqr 2795 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
10099fveq2d 6672 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) = (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))))
101 2fveq3 6673 . . . . . . . . . 10 (𝑦 = 𝑚 → (seq1( + , 𝐹)‘(⌊‘𝑦)) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
102101fvoveq1d 7186 . . . . . . . . 9 (𝑦 = 𝑚 → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) = (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)))
103 oveq2 7172 . . . . . . . . 9 (𝑦 = 𝑚 → (𝐶 / 𝑦) = (𝐶 / 𝑚))
104102, 103breq12d 5040 . . . . . . . 8 (𝑦 = 𝑚 → ((abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / 𝑦) ↔ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) ≤ (𝐶 / 𝑚)))
105 dchrvmasumif.1 . . . . . . . . 9 (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / 𝑦))
106105adantr 484 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / 𝑦))
107 1re 10712 . . . . . . . . . 10 1 ∈ ℝ
108 elicopnf 12912 . . . . . . . . . 10 (1 ∈ ℝ → (𝑚 ∈ (1[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚)))
109107, 108ax-mp 5 . . . . . . . . 9 (𝑚 ∈ (1[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚))
11065, 71, 109sylanbrc 586 . . . . . . . 8 ((𝜑𝑚 ∈ (3[,)+∞)) → 𝑚 ∈ (1[,)+∞))
111104, 106, 110rspcdva 3526 . . . . . . 7 ((𝜑𝑚 ∈ (3[,)+∞)) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) ≤ (𝐶 / 𝑚))
112111adantr 484 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) ≤ (𝐶 / 𝑚))
113100, 112eqbrtrrd 5051 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ≤ (𝐶 / 𝑚))
114 lemul2a 11566 . . . . 5 ((((abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ∈ ℝ ∧ (𝐶 / 𝑚) ∈ ℝ ∧ ((log‘𝑚) ∈ ℝ ∧ 0 ≤ (log‘𝑚))) ∧ (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ≤ (𝐶 / 𝑚)) → ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) ≤ ((log‘𝑚) · (𝐶 / 𝑚)))
11576, 90, 94, 113, 114syl31anc 1374 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) ≤ ((log‘𝑚) · (𝐶 / 𝑚)))
116 iftrue 4417 . . . . . . . . . . . . . . 15 (𝑆 = 0 → if(𝑆 = 0, 𝑚, 𝑘) = 𝑚)
117116fveq2d 6672 . . . . . . . . . . . . . 14 (𝑆 = 0 → (log‘if(𝑆 = 0, 𝑚, 𝑘)) = (log‘𝑚))
118117oveq1d 7179 . . . . . . . . . . . . 13 (𝑆 = 0 → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘𝑚) / 𝑘))
119118ad2antlr 727 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘𝑚) / 𝑘))
120119oveq2d 7180 . . . . . . . . . . 11 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑚) / 𝑘)))
12116adantlr 715 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝑋‘(𝐿𝑘)) ∈ ℂ)
122 relogcl 25311 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℝ+ → (log‘𝑚) ∈ ℝ)
123122adantl 485 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ ℝ+) → (log‘𝑚) ∈ ℝ)
124123recnd 10740 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ ℝ+) → (log‘𝑚) ∈ ℂ)
125124ad2antrr 726 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (log‘𝑚) ∈ ℂ)
12611adantl 485 . . . . . . . . . . . . 13 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ∈ ℕ)
127126nncnd 11725 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ∈ ℂ)
128126nnne0d 11759 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ≠ 0)
129121, 125, 127, 128div12d 11523 . . . . . . . . . . 11 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) · ((log‘𝑚) / 𝑘)) = ((log‘𝑚) · ((𝑋‘(𝐿𝑘)) / 𝑘)))
130120, 129eqtrd 2773 . . . . . . . . . 10 ((((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((log‘𝑚) · ((𝑋‘(𝐿𝑘)) / 𝑘)))
131130sumeq2dv 15146 . . . . . . . . 9 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((log‘𝑚) · ((𝑋‘(𝐿𝑘)) / 𝑘)))
132 iftrue 4417 . . . . . . . . . . 11 (𝑆 = 0 → if(𝑆 = 0, 0, 𝑇) = 0)
133132oveq2d 7180 . . . . . . . . . 10 (𝑆 = 0 → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − 0))
13426subid1d 11057 . . . . . . . . . 10 ((𝜑𝑚 ∈ ℝ+) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − 0) = Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
135133, 134sylan9eqr 2795 . . . . . . . . 9 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
136 ovex 7197 . . . . . . . . . . . . . 14 ((𝑋‘(𝐿𝑘)) / 𝑘) ∈ V
13754, 51, 136fvmpt 6769 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (𝐹𝑘) = ((𝑋‘(𝐿𝑘)) / 𝑘))
13822, 137syl 17 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐹𝑘) = ((𝑋‘(𝐿𝑘)) / 𝑘))
13957adantr 484 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ ℝ+) → 𝐹:ℕ⟶ℂ)
140139, 11, 58syl2an 599 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐹𝑘) ∈ ℂ)
141138, 140eqeltrrd 2834 . . . . . . . . . . 11 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) / 𝑘) ∈ ℂ)
1429, 124, 141fsummulc2 15225 . . . . . . . . . 10 ((𝜑𝑚 ∈ ℝ+) → ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((log‘𝑚) · ((𝑋‘(𝐿𝑘)) / 𝑘)))
143142adantr 484 . . . . . . . . 9 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((log‘𝑚) · ((𝑋‘(𝐿𝑘)) / 𝑘)))
144131, 135, 1433eqtr4d 2783 . . . . . . . 8 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘)))
14583, 144sylan 583 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘)))
14683, 138sylan 583 . . . . . . . . . 10 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐹𝑘) = ((𝑋‘(𝐿𝑘)) / 𝑘))
14773, 44eleqtrdi 2843 . . . . . . . . . 10 ((𝜑𝑚 ∈ (3[,)+∞)) → (⌊‘𝑚) ∈ (ℤ‘1))
14877, 11, 50syl2an 599 . . . . . . . . . 10 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) / 𝑘) ∈ ℂ)
149146, 147, 148fsumser 15173 . . . . . . . . 9 ((𝜑𝑚 ∈ (3[,)+∞)) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
150149adantr 484 . . . . . . . 8 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
151150oveq2d 7180 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) / 𝑘)) = ((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚))))
152145, 151eqtrd 2773 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚))))
153152fveq2d 6672 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) = (abs‘((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚)))))
154122ad2antlr 727 . . . . . . . 8 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (log‘𝑚) ∈ ℝ)
155154recnd 10740 . . . . . . 7 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (log‘𝑚) ∈ ℂ)
15683, 155sylan 583 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (log‘𝑚) ∈ ℂ)
157156, 75absmuld 14897 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚)))) = ((abs‘(log‘𝑚)) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
15891, 92absidd 14865 . . . . . . 7 ((𝜑𝑚 ∈ (3[,)+∞)) → (abs‘(log‘𝑚)) = (log‘𝑚))
159158oveq1d 7179 . . . . . 6 ((𝜑𝑚 ∈ (3[,)+∞)) → ((abs‘(log‘𝑚)) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) = ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
160159adantr 484 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((abs‘(log‘𝑚)) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) = ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
161153, 157, 1603eqtrd 2777 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) = ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
162 iftrue 4417 . . . . . . . 8 (𝑆 = 0 → if(𝑆 = 0, 𝐶, 𝐸) = 𝐶)
163162adantl 485 . . . . . . 7 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → if(𝑆 = 0, 𝐶, 𝐸) = 𝐶)
164163oveq1d 7179 . . . . . 6 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = (𝐶 · ((log‘𝑚) / 𝑚)))
16586recnd 10740 . . . . . . . 8 (𝜑𝐶 ∈ ℂ)
166165ad2antrr 726 . . . . . . 7 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → 𝐶 ∈ ℂ)
167 rpcnne0 12483 . . . . . . . 8 (𝑚 ∈ ℝ+ → (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0))
168167ad2antlr 727 . . . . . . 7 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0))
169 div12 11391 . . . . . . 7 ((𝐶 ∈ ℂ ∧ (log‘𝑚) ∈ ℂ ∧ (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0)) → (𝐶 · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
170166, 155, 168, 169syl3anc 1372 . . . . . 6 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (𝐶 · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
171164, 170eqtrd 2773 . . . . 5 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑆 = 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
17283, 171sylan 583 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
173115, 161, 1723brtr4d 5059 . . 3 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)))
174 dchrvmasumif.2 . . . . . 6 (𝜑 → ∀𝑦 ∈ (3[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 · ((log‘𝑦) / 𝑦)))
175 2fveq3 6673 . . . . . . . . 9 (𝑦 = 𝑚 → (seq1( + , 𝐾)‘(⌊‘𝑦)) = (seq1( + , 𝐾)‘(⌊‘𝑚)))
176175fvoveq1d 7186 . . . . . . . 8 (𝑦 = 𝑚 → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)))
177 fveq2 6668 . . . . . . . . . 10 (𝑦 = 𝑚 → (log‘𝑦) = (log‘𝑚))
178 id 22 . . . . . . . . . 10 (𝑦 = 𝑚𝑦 = 𝑚)
179177, 178oveq12d 7182 . . . . . . . . 9 (𝑦 = 𝑚 → ((log‘𝑦) / 𝑦) = ((log‘𝑚) / 𝑚))
180179oveq2d 7180 . . . . . . . 8 (𝑦 = 𝑚 → (𝐸 · ((log‘𝑦) / 𝑦)) = (𝐸 · ((log‘𝑚) / 𝑚)))
181176, 180breq12d 5040 . . . . . . 7 (𝑦 = 𝑚 → ((abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 · ((log‘𝑦) / 𝑦)) ↔ (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚))))
182181rspccva 3523 . . . . . 6 ((∀𝑦 ∈ (3[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 · ((log‘𝑦) / 𝑦)) ∧ 𝑚 ∈ (3[,)+∞)) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚)))
183174, 182sylan 583 . . . . 5 ((𝜑𝑚 ∈ (3[,)+∞)) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚)))
184183adantr 484 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚)))
185 fveq2 6668 . . . . . . . . . . . 12 (𝑎 = 𝑘 → (log‘𝑎) = (log‘𝑘))
186185, 53oveq12d 7182 . . . . . . . . . . 11 (𝑎 = 𝑘 → ((log‘𝑎) / 𝑎) = ((log‘𝑘) / 𝑘))
18752, 186oveq12d 7182 . . . . . . . . . 10 (𝑎 = 𝑘 → ((𝑋‘(𝐿𝑎)) · ((log‘𝑎) / 𝑎)) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
188 dchrvmasumif.g . . . . . . . . . 10 𝐾 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) · ((log‘𝑎) / 𝑎)))
189 ovex 7197 . . . . . . . . . 10 ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)) ∈ V
190187, 188, 189fvmpt 6769 . . . . . . . . 9 (𝑘 ∈ ℕ → (𝐾𝑘) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
19111, 190syl 17 . . . . . . . 8 (𝑘 ∈ (1...(⌊‘𝑚)) → (𝐾𝑘) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
192 ifnefalse 4423 . . . . . . . . . . . . 13 (𝑆 ≠ 0 → if(𝑆 = 0, 𝑚, 𝑘) = 𝑘)
193192fveq2d 6672 . . . . . . . . . . . 12 (𝑆 ≠ 0 → (log‘if(𝑆 = 0, 𝑚, 𝑘)) = (log‘𝑘))
194193oveq1d 7179 . . . . . . . . . . 11 (𝑆 ≠ 0 → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘𝑘) / 𝑘))
195194oveq2d 7180 . . . . . . . . . 10 (𝑆 ≠ 0 → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
196195adantl 485 . . . . . . . . 9 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
197196eqcomd 2744 . . . . . . . 8 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)) = ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
198191, 197sylan9eqr 2795 . . . . . . 7 ((((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐾𝑘) = ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
199147adantr 484 . . . . . . 7 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (⌊‘𝑚) ∈ (ℤ‘1))
200 nnrp 12476 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ+)
201200adantl 485 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℝ+)
202201relogcld 25358 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (log‘𝑘) ∈ ℝ)
203202recnd 10740 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (log‘𝑘) ∈ ℂ)
204203, 47, 49divcld 11487 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → ((log‘𝑘) / 𝑘) ∈ ℂ)
20515, 204mulcld 10732 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)) ∈ ℂ)
206187cbvmptv 5130 . . . . . . . . . . . 12 (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿𝑎)) · ((log‘𝑎) / 𝑎))) = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
207188, 206eqtri 2761 . . . . . . . . . . 11 𝐾 = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿𝑘)) · ((log‘𝑘) / 𝑘)))
208205, 207fmptd 6882 . . . . . . . . . 10 (𝜑𝐾:ℕ⟶ℂ)
209208ad2antrr 726 . . . . . . . . 9 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → 𝐾:ℕ⟶ℂ)
210 ffvelrn 6853 . . . . . . . . 9 ((𝐾:ℕ⟶ℂ ∧ 𝑘 ∈ ℕ) → (𝐾𝑘) ∈ ℂ)
211209, 11, 210syl2an 599 . . . . . . . 8 ((((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐾𝑘) ∈ ℂ)
212198, 211eqeltrrd 2834 . . . . . . 7 ((((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
213198, 199, 212fsumser 15173 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = (seq1( + , 𝐾)‘(⌊‘𝑚)))
214 ifnefalse 4423 . . . . . . 7 (𝑆 ≠ 0 → if(𝑆 = 0, 0, 𝑇) = 𝑇)
215214adantl 485 . . . . . 6 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → if(𝑆 = 0, 0, 𝑇) = 𝑇)
216213, 215oveq12d 7182 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇))
217216fveq2d 6672 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)))
218 ifnefalse 4423 . . . . . 6 (𝑆 ≠ 0 → if(𝑆 = 0, 𝐶, 𝐸) = 𝐸)
219218adantl 485 . . . . 5 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → if(𝑆 = 0, 𝐶, 𝐸) = 𝐸)
220219oveq1d 7179 . . . 4 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = (𝐸 · ((log‘𝑚) / 𝑚)))
221184, 217, 2203brtr4d 5059 . . 3 (((𝜑𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)))
222173, 221pm2.61dane 3021 . 2 ((𝜑𝑚 ∈ (3[,)+∞)) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)))
223 fzfid 13425 . . . 4 (𝜑 → (1...2) ∈ Fin)
2247adantr 484 . . . . . . 7 ((𝜑𝑘 ∈ (1...2)) → 𝑋𝐷)
225 elfzelz 12991 . . . . . . . 8 (𝑘 ∈ (1...2) → 𝑘 ∈ ℤ)
226225adantl 485 . . . . . . 7 ((𝜑𝑘 ∈ (1...2)) → 𝑘 ∈ ℤ)
2274, 1, 5, 2, 224, 226dchrzrhcl 25973 . . . . . 6 ((𝜑𝑘 ∈ (1...2)) → (𝑋‘(𝐿𝑘)) ∈ ℂ)
228227abscld 14879 . . . . 5 ((𝜑𝑘 ∈ (1...2)) → (abs‘(𝑋‘(𝐿𝑘))) ∈ ℝ)
229 3rp 12471 . . . . . . 7 3 ∈ ℝ+
230 relogcl 25311 . . . . . . 7 (3 ∈ ℝ+ → (log‘3) ∈ ℝ)
231229, 230ax-mp 5 . . . . . 6 (log‘3) ∈ ℝ
232 elfznn 13020 . . . . . . 7 (𝑘 ∈ (1...2) → 𝑘 ∈ ℕ)
233232adantl 485 . . . . . 6 ((𝜑𝑘 ∈ (1...2)) → 𝑘 ∈ ℕ)
234 nndivre 11750 . . . . . 6 (((log‘3) ∈ ℝ ∧ 𝑘 ∈ ℕ) → ((log‘3) / 𝑘) ∈ ℝ)
235231, 233, 234sylancr 590 . . . . 5 ((𝜑𝑘 ∈ (1...2)) → ((log‘3) / 𝑘) ∈ ℝ)
236228, 235remulcld 10742 . . . 4 ((𝜑𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
237223, 236fsumrecl 15177 . . 3 (𝜑 → Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
23843abscld 14879 . . 3 (𝜑 → (abs‘if(𝑆 = 0, 0, 𝑇)) ∈ ℝ)
239237, 238readdcld 10741 . 2 (𝜑 → (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
240 simpl 486 . . . . . . 7 ((𝜑𝑚 ∈ (1[,)3)) → 𝜑)
24162rexri 10770 . . . . . . . . . . 11 3 ∈ ℝ*
242 elico2 12878 . . . . . . . . . . 11 ((1 ∈ ℝ ∧ 3 ∈ ℝ*) → (𝑚 ∈ (1[,)3) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚𝑚 < 3)))
243107, 241, 242mp2an 692 . . . . . . . . . 10 (𝑚 ∈ (1[,)3) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚𝑚 < 3))
244243simp1bi 1146 . . . . . . . . 9 (𝑚 ∈ (1[,)3) → 𝑚 ∈ ℝ)
245244adantl 485 . . . . . . . 8 ((𝜑𝑚 ∈ (1[,)3)) → 𝑚 ∈ ℝ)
246 0red 10715 . . . . . . . . 9 ((𝜑𝑚 ∈ (1[,)3)) → 0 ∈ ℝ)
247 1red 10713 . . . . . . . . 9 ((𝜑𝑚 ∈ (1[,)3)) → 1 ∈ ℝ)
248 0lt1 11233 . . . . . . . . . 10 0 < 1
249248a1i 11 . . . . . . . . 9 ((𝜑𝑚 ∈ (1[,)3)) → 0 < 1)
250243simp2bi 1147 . . . . . . . . . 10 (𝑚 ∈ (1[,)3) → 1 ≤ 𝑚)
251250adantl 485 . . . . . . . . 9 ((𝜑𝑚 ∈ (1[,)3)) → 1 ≤ 𝑚)
252246, 247, 245, 249, 251ltletrd 10871 . . . . . . . 8 ((𝜑𝑚 ∈ (1[,)3)) → 0 < 𝑚)
253245, 252elrpd 12504 . . . . . . 7 ((𝜑𝑚 ∈ (1[,)3)) → 𝑚 ∈ ℝ+)
254240, 253jca 515 . . . . . 6 ((𝜑𝑚 ∈ (1[,)3)) → (𝜑𝑚 ∈ ℝ+))
25543adantr 484 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → if(𝑆 = 0, 0, 𝑇) ∈ ℂ)
25626, 255subcld 11068 . . . . . 6 ((𝜑𝑚 ∈ ℝ+) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) ∈ ℂ)
257254, 256syl 17 . . . . 5 ((𝜑𝑚 ∈ (1[,)3)) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) ∈ ℂ)
258257abscld 14879 . . . 4 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
259254, 26syl 17 . . . . . 6 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
260259abscld 14879 . . . . 5 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
261238adantr 484 . . . . 5 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘if(𝑆 = 0, 0, 𝑇)) ∈ ℝ)
262260, 261readdcld 10741 . . . 4 ((𝜑𝑚 ∈ (1[,)3)) → ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) + (abs‘if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
263237adantr 484 . . . . 5 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
264263, 261readdcld 10741 . . . 4 ((𝜑𝑚 ∈ (1[,)3)) → (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
26526, 255abs2dif2d 14901 . . . . 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 14879 . . . . . . . 8 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
2689, 267fsumrecl 15177 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
269254, 268syl 17 . . . . . 6 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
2709, 25fsumabs 15242 . . . . . . 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 13425 . . . . . . . . 9 ((𝜑𝑚 ∈ ℝ+) → (1...2) ∈ Fin)
273227adantlr 715 . . . . . . . . . . 11 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (𝑋‘(𝐿𝑘)) ∈ ℂ)
27417adantr 484 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑚 ∈ ℝ+)
275232adantl 485 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑘 ∈ ℕ)
276275nnrpd 12505 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑘 ∈ ℝ+)
277274, 276ifcld 4457 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ+)
278277relogcld 25358 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ)
279278, 275nndivred 11763 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℝ)
280279recnd 10740 . . . . . . . . . . 11 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℂ)
281273, 280mulcld 10732 . . . . . . . . . 10 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
282281abscld 14879 . . . . . . . . 9 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
283272, 282fsumrecl 15177 . . . . . . . 8 ((𝜑𝑚 ∈ ℝ+) → Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
284254, 283syl 17 . . . . . . 7 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
285 fzfid 13425 . . . . . . . 8 ((𝜑𝑚 ∈ (1[,)3)) → (1...2) ∈ Fin)
286254, 281sylan 583 . . . . . . . . 9 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
287286abscld 14879 . . . . . . . 8 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
288286absge0d 14887 . . . . . . . 8 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 0 ≤ (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
289245flcld 13252 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1[,)3)) → (⌊‘𝑚) ∈ ℤ)
290 2z 12088 . . . . . . . . . . 11 2 ∈ ℤ
291290a1i 11 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1[,)3)) → 2 ∈ ℤ)
292243simp3bi 1148 . . . . . . . . . . . . . 14 (𝑚 ∈ (1[,)3) → 𝑚 < 3)
293292adantl 485 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ (1[,)3)) → 𝑚 < 3)
294 3z 12089 . . . . . . . . . . . . . 14 3 ∈ ℤ
295 fllt 13260 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℝ ∧ 3 ∈ ℤ) → (𝑚 < 3 ↔ (⌊‘𝑚) < 3))
296245, 294, 295sylancl 589 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ (1[,)3)) → (𝑚 < 3 ↔ (⌊‘𝑚) < 3))
297293, 296mpbid 235 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (1[,)3)) → (⌊‘𝑚) < 3)
298 df-3 11773 . . . . . . . . . . . 12 3 = (2 + 1)
299297, 298breqtrdi 5068 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (1[,)3)) → (⌊‘𝑚) < (2 + 1))
300 rpre 12473 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℝ+𝑚 ∈ ℝ)
301300adantl 485 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ ℝ+) → 𝑚 ∈ ℝ)
302301flcld 13252 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ ℝ+) → (⌊‘𝑚) ∈ ℤ)
303 zleltp1 12107 . . . . . . . . . . . . 13 (((⌊‘𝑚) ∈ ℤ ∧ 2 ∈ ℤ) → ((⌊‘𝑚) ≤ 2 ↔ (⌊‘𝑚) < (2 + 1)))
304302, 290, 303sylancl 589 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ ℝ+) → ((⌊‘𝑚) ≤ 2 ↔ (⌊‘𝑚) < (2 + 1)))
305254, 304syl 17 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (1[,)3)) → ((⌊‘𝑚) ≤ 2 ↔ (⌊‘𝑚) < (2 + 1)))
306299, 305mpbird 260 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1[,)3)) → (⌊‘𝑚) ≤ 2)
307 eluz2 12323 . . . . . . . . . 10 (2 ∈ (ℤ‘(⌊‘𝑚)) ↔ ((⌊‘𝑚) ∈ ℤ ∧ 2 ∈ ℤ ∧ (⌊‘𝑚) ≤ 2))
308289, 291, 306, 307syl3anbrc 1344 . . . . . . . . 9 ((𝜑𝑚 ∈ (1[,)3)) → 2 ∈ (ℤ‘(⌊‘𝑚)))
309 fzss2 13031 . . . . . . . . 9 (2 ∈ (ℤ‘(⌊‘𝑚)) → (1...(⌊‘𝑚)) ⊆ (1...2))
310308, 309syl 17 . . . . . . . 8 ((𝜑𝑚 ∈ (1[,)3)) → (1...(⌊‘𝑚)) ⊆ (1...2))
311285, 287, 288, 310fsumless 15237 . . . . . . 7 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
312236adantlr 715 . . . . . . . 8 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
313273, 280absmuld 14897 . . . . . . . . . 10 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) = ((abs‘(𝑋‘(𝐿𝑘))) · (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
314254, 313sylan 583 . . . . . . . . 9 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) = ((abs‘(𝑋‘(𝐿𝑘))) · (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
315254, 279sylan 583 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℝ)
316254, 278sylan 583 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ)
317 log1 25321 . . . . . . . . . . . . . 14 (log‘1) = 0
318 elfzle1 12994 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (1...2) → 1 ≤ 𝑘)
319 breq2 5031 . . . . . . . . . . . . . . . . 17 (𝑚 = if(𝑆 = 0, 𝑚, 𝑘) → (1 ≤ 𝑚 ↔ 1 ≤ if(𝑆 = 0, 𝑚, 𝑘)))
320 breq2 5031 . . . . . . . . . . . . . . . . 17 (𝑘 = if(𝑆 = 0, 𝑚, 𝑘) → (1 ≤ 𝑘 ↔ 1 ≤ if(𝑆 = 0, 𝑚, 𝑘)))
321319, 320ifboth 4450 . . . . . . . . . . . . . . . 16 ((1 ≤ 𝑚 ∧ 1 ≤ 𝑘) → 1 ≤ if(𝑆 = 0, 𝑚, 𝑘))
322251, 318, 321syl2an 599 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 1 ≤ if(𝑆 = 0, 𝑚, 𝑘))
323 1rp 12469 . . . . . . . . . . . . . . . . 17 1 ∈ ℝ+
324 logleb 25338 . . . . . . . . . . . . . . . . 17 ((1 ∈ ℝ+ ∧ if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ+) → (1 ≤ if(𝑆 = 0, 𝑚, 𝑘) ↔ (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))))
325323, 277, 324sylancr 590 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (1 ≤ if(𝑆 = 0, 𝑚, 𝑘) ↔ (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))))
326254, 325sylan 583 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (1 ≤ if(𝑆 = 0, 𝑚, 𝑘) ↔ (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))))
327322, 326mpbid 235 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘)))
328317, 327eqbrtrrid 5063 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 0 ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘)))
329276rpregt0d 12513 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (𝑘 ∈ ℝ ∧ 0 < 𝑘))
330254, 329sylan 583 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (𝑘 ∈ ℝ ∧ 0 < 𝑘))
331 divge0 11580 . . . . . . . . . . . . 13 ((((log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ ∧ 0 ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))) ∧ (𝑘 ∈ ℝ ∧ 0 < 𝑘)) → 0 ≤ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))
332316, 328, 330, 331syl21anc 837 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 0 ≤ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))
333315, 332absidd 14865 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))
334333, 315eqeltrd 2833 . . . . . . . . . 10 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℝ)
335235adantlr 715 . . . . . . . . . 10 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘3) / 𝑘) ∈ ℝ)
336228adantlr 715 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (abs‘(𝑋‘(𝐿𝑘))) ∈ ℝ)
337273absge0d 14887 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 0 ≤ (abs‘(𝑋‘(𝐿𝑘))))
338336, 337jca 515 . . . . . . . . . . 11 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿𝑘))) ∈ ℝ ∧ 0 ≤ (abs‘(𝑋‘(𝐿𝑘)))))
339254, 338sylan 583 . . . . . . . . . 10 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿𝑘))) ∈ ℝ ∧ 0 ≤ (abs‘(𝑋‘(𝐿𝑘)))))
340292ad2antlr 727 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 𝑚 < 3)
341275nnred 11724 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑘 ∈ ℝ)
342 2re 11783 . . . . . . . . . . . . . . . . . 18 2 ∈ ℝ
343342a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 2 ∈ ℝ)
34462a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 3 ∈ ℝ)
345 elfzle2 12995 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (1...2) → 𝑘 ≤ 2)
346345adantl 485 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑘 ≤ 2)
347 2lt3 11881 . . . . . . . . . . . . . . . . . 18 2 < 3
348347a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 2 < 3)
349341, 343, 344, 346, 348lelttrd 10869 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → 𝑘 < 3)
350254, 349sylan 583 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 𝑘 < 3)
351 breq1 5030 . . . . . . . . . . . . . . . 16 (𝑚 = if(𝑆 = 0, 𝑚, 𝑘) → (𝑚 < 3 ↔ if(𝑆 = 0, 𝑚, 𝑘) < 3))
352 breq1 5030 . . . . . . . . . . . . . . . 16 (𝑘 = if(𝑆 = 0, 𝑚, 𝑘) → (𝑘 < 3 ↔ if(𝑆 = 0, 𝑚, 𝑘) < 3))
353351, 352ifboth 4450 . . . . . . . . . . . . . . 15 ((𝑚 < 3 ∧ 𝑘 < 3) → if(𝑆 = 0, 𝑚, 𝑘) < 3)
354340, 350, 353syl2anc 587 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) < 3)
355277rpred 12507 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ)
356 ltle 10800 . . . . . . . . . . . . . . . 16 ((if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ ∧ 3 ∈ ℝ) → (if(𝑆 = 0, 𝑚, 𝑘) < 3 → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3))
357355, 62, 356sylancl 589 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) < 3 → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3))
358254, 357sylan 583 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) < 3 → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3))
359354, 358mpd 15 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3)
360 logleb 25338 . . . . . . . . . . . . . . 15 ((if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ+ ∧ 3 ∈ ℝ+) → (if(𝑆 = 0, 𝑚, 𝑘) ≤ 3 ↔ (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3)))
361277, 229, 360sylancl 589 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) ≤ 3 ↔ (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3)))
362254, 361sylan 583 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) ≤ 3 ↔ (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3)))
363359, 362mpbid 235 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3))
364231a1i 11 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → (log‘3) ∈ ℝ)
365278, 364, 276lediv1d 12553 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ ℝ+) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3) ↔ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ≤ ((log‘3) / 𝑘)))
366254, 365sylan 583 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3) ↔ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ≤ ((log‘3) / 𝑘)))
367363, 366mpbid 235 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ≤ ((log‘3) / 𝑘))
368333, 367eqbrtrd 5049 . . . . . . . . . 10 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ≤ ((log‘3) / 𝑘))
369 lemul2a 11566 . . . . . . . . . 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 1374 . . . . . . . . 9 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿𝑘))) · (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ ((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)))
371314, 370eqbrtrd 5049 . . . . . . . 8 (((𝜑𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ ((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)))
372285, 287, 312, 371fsumle 15240 . . . . . . 7 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)))
373269, 284, 263, 311, 372letrd 10868 . . . . . 6 ((𝜑𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)))
374260, 269, 263, 271, 373letrd 10868 . . . . 5 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)))
37526abscld 14879 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
376237adantr 484 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
377255abscld 14879 . . . . . . 7 ((𝜑𝑚 ∈ ℝ+) → (abs‘if(𝑆 = 0, 0, 𝑇)) ∈ ℝ)
378375, 376, 377leadd1d 11305 . . . . . 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 235 . . . 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 10868 . . 3 ((𝜑𝑚 ∈ (1[,)3)) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))))
382381ralrimiva 3096 . 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 26227 1 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑑 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿𝑑)) · ((μ‘𝑑) / 𝑑)) · (Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑑)))((𝑋‘(𝐿𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 399  w3a 1088   = wceq 1542  wcel 2113  wne 2934  wral 3053  wss 3841  ifcif 4411   class class class wbr 5027  cmpt 5107  wf 6329  cfv 6333  (class class class)co 7164  cc 10606  cr 10607  0cc0 10608  1c1 10609   + caddc 10611   · cmul 10613  +∞cpnf 10743  *cxr 10745   < clt 10746  cle 10747  cmin 10941   / cdiv 11368  cn 11709  2c2 11764  3c3 11765  cz 12055  cuz 12317  +crp 12465  [,)cico 12816  ...cfz 12974  cfl 13244  seqcseq 13453  abscabs 14676  cli 14924  𝑂(1)co1 14926  Σcsu 15128  Basecbs 16579  0gc0g 16809  ℤRHomczrh 20313  ℤ/nczn 20316  logclog 25290  μcmu 25824  DChrcdchr 25960
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1916  ax-6 1974  ax-7 2019  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2161  ax-12 2178  ax-ext 2710  ax-rep 5151  ax-sep 5164  ax-nul 5171  ax-pow 5229  ax-pr 5293  ax-un 7473  ax-inf2 9170  ax-cnex 10664  ax-resscn 10665  ax-1cn 10666  ax-icn 10667  ax-addcl 10668  ax-addrcl 10669  ax-mulcl 10670  ax-mulrcl 10671  ax-mulcom 10672  ax-addass 10673  ax-mulass 10674  ax-distr 10675  ax-i2m1 10676  ax-1ne0 10677  ax-1rid 10678  ax-rnegex 10679  ax-rrecex 10680  ax-cnre 10681  ax-pre-lttri 10682  ax-pre-lttrn 10683  ax-pre-ltadd 10684  ax-pre-mulgt0 10685  ax-pre-sup 10686  ax-addf 10687  ax-mulf 10688
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2540  df-eu 2570  df-clab 2717  df-cleq 2730  df-clel 2811  df-nfc 2881  df-ne 2935  df-nel 3039  df-ral 3058  df-rex 3059  df-reu 3060  df-rmo 3061  df-rab 3062  df-v 3399  df-sbc 3680  df-csb 3789  df-dif 3844  df-un 3846  df-in 3848  df-ss 3858  df-pss 3860  df-nul 4210  df-if 4412  df-pw 4487  df-sn 4514  df-pr 4516  df-tp 4518  df-op 4520  df-uni 4794  df-int 4834  df-iun 4880  df-iin 4881  df-disj 4993  df-br 5028  df-opab 5090  df-mpt 5108  df-tr 5134  df-id 5425  df-eprel 5430  df-po 5438  df-so 5439  df-fr 5478  df-se 5479  df-we 5480  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-ima 5532  df-pred 6123  df-ord 6169  df-on 6170  df-lim 6171  df-suc 6172  df-iota 6291  df-fun 6335  df-fn 6336  df-f 6337  df-f1 6338  df-fo 6339  df-f1o 6340  df-fv 6341  df-isom 6342  df-riota 7121  df-ov 7167  df-oprab 7168  df-mpo 7169  df-of 7419  df-om 7594  df-1st 7707  df-2nd 7708  df-supp 7850  df-tpos 7914  df-wrecs 7969  df-recs 8030  df-rdg 8068  df-1o 8124  df-2o 8125  df-oadd 8128  df-omul 8129  df-er 8313  df-ec 8315  df-qs 8319  df-map 8432  df-pm 8433  df-ixp 8501  df-en 8549  df-dom 8550  df-sdom 8551  df-fin 8552  df-fsupp 8900  df-fi 8941  df-sup 8972  df-inf 8973  df-oi 9040  df-card 9434  df-acn 9437  df-pnf 10748  df-mnf 10749  df-xr 10750  df-ltxr 10751  df-le 10752  df-sub 10943  df-neg 10944  df-div 11369  df-nn 11710  df-2 11772  df-3 11773  df-4 11774  df-5 11775  df-6 11776  df-7 11777  df-8 11778  df-9 11779  df-n0 11970  df-xnn0 12042  df-z 12056  df-dec 12173  df-uz 12318  df-q 12424  df-rp 12466  df-xneg 12583  df-xadd 12584  df-xmul 12585  df-ioo 12818  df-ioc 12819  df-ico 12820  df-icc 12821  df-fz 12975  df-fzo 13118  df-fl 13246  df-mod 13322  df-seq 13454  df-exp 13515  df-fac 13719  df-bc 13748  df-hash 13776  df-shft 14509  df-cj 14541  df-re 14542  df-im 14543  df-sqrt 14677  df-abs 14678  df-limsup 14911  df-clim 14928  df-rlim 14929  df-o1 14930  df-lo1 14931  df-sum 15129  df-ef 15506  df-e 15507  df-sin 15508  df-cos 15509  df-tan 15510  df-pi 15511  df-dvds 15693  df-prm 16106  df-struct 16581  df-ndx 16582  df-slot 16583  df-base 16585  df-sets 16586  df-ress 16587  df-plusg 16674  df-mulr 16675  df-starv 16676  df-sca 16677  df-vsca 16678  df-ip 16679  df-tset 16680  df-ple 16681  df-ds 16683  df-unif 16684  df-hom 16685  df-cco 16686  df-rest 16792  df-topn 16793  df-0g 16811  df-gsum 16812  df-topgen 16813  df-pt 16814  df-prds 16817  df-xrs 16871  df-qtop 16876  df-imas 16877  df-qus 16878  df-xps 16879  df-mre 16953  df-mrc 16954  df-acs 16956  df-mgm 17961  df-sgrp 18010  df-mnd 18021  df-mhm 18065  df-submnd 18066  df-grp 18215  df-minusg 18216  df-sbg 18217  df-mulg 18336  df-subg 18387  df-nsg 18388  df-eqg 18389  df-ghm 18467  df-cntz 18558  df-od 18767  df-cmn 19019  df-abl 19020  df-mgp 19352  df-ur 19364  df-ring 19411  df-cring 19412  df-oppr 19488  df-dvdsr 19506  df-unit 19507  df-invr 19537  df-dvr 19548  df-rnghom 19582  df-drng 19616  df-subrg 19645  df-lmod 19748  df-lss 19816  df-lsp 19856  df-sra 20056  df-rgmod 20057  df-lidl 20058  df-rsp 20059  df-2idl 20117  df-psmet 20202  df-xmet 20203  df-met 20204  df-bl 20205  df-mopn 20206  df-fbas 20207  df-fg 20208  df-cnfld 20211  df-zring 20283  df-zrh 20317  df-zn 20320  df-top 21638  df-topon 21655  df-topsp 21677  df-bases 21690  df-cld 21763  df-ntr 21764  df-cls 21765  df-nei 21842  df-lp 21880  df-perf 21881  df-cn 21971  df-cnp 21972  df-haus 22059  df-cmp 22131  df-tx 22306  df-hmeo 22499  df-fil 22590  df-fm 22682  df-flim 22683  df-flf 22684  df-xms 23066  df-ms 23067  df-tms 23068  df-cncf 23623  df-limc 24610  df-dv 24611  df-ulm 25116  df-log 25292  df-cxp 25293  df-atan 25597  df-em 25722  df-mu 25830  df-dchr 25961
This theorem is referenced by:  dchrvmasumiflem2  26230
  Copyright terms: Public domain W3C validator