dchrvmasumiflem1 - Metamath Proof Explorer

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

Theorem dchrvmasumiflem1 27419

Description: Lemma for dchrvmasumif 27421. (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 = (0_g‘𝐺)
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.

Step	Hyp	Ref	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 = (0_g‘𝐺)
7		dchrisum.b	. 2 ⊢ (𝜑 → 𝑋 ∈ 𝐷)
8		dchrisum.n1	. 2 ⊢ (𝜑 → 𝑋 ≠ 1 )
9		fzfid 13945	. . 3 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (1...(⌊‘𝑚)) ∈ Fin)
10		simpl 482	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → 𝜑)
11		elfznn 13521	. . . . 5 ⊢ (𝑘 ∈ (1...(⌊‘𝑚)) → 𝑘 ∈ ℕ)
12	7	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑋 ∈ 𝐷)
13		nnz 12557	. . . . . . 7 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℤ)
14	13	adantl 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℤ)
15	4, 1, 5, 2, 12, 14	dchrzrhcl 27163	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑋‘(𝐿‘𝑘)) ∈ ℂ)
16	10, 11, 15	syl2an 596	. . . 4 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝑋‘(𝐿‘𝑘)) ∈ ℂ)
17		simpr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → 𝑚 ∈ ℝ⁺)
18	11	nnrpd 13000	. . . . . . . 8 ⊢ (𝑘 ∈ (1...(⌊‘𝑚)) → 𝑘 ∈ ℝ⁺)
19		ifcl 4537	. . . . . . . 8 ⊢ ((𝑚 ∈ ℝ⁺ ∧ 𝑘 ∈ ℝ⁺) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ⁺)
20	17, 18, 19	syl2an 596	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ⁺)
21	20	relogcld 26539	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ)
22	11	adantl 481	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ∈ ℕ)
23	21, 22	nndivred 12247	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℝ)
24	23	recnd 11209	. . . 4 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℂ)
25	16, 24	mulcld 11201	. . 3 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
26	9, 25	fsumcl 15706	. 2 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
27		fveq2 6861	. . . 4 ⊢ (𝑚 = (𝑥 / 𝑑) → (⌊‘𝑚) = (⌊‘(𝑥 / 𝑑)))
28	27	oveq2d 7406	. . 3 ⊢ (𝑚 = (𝑥 / 𝑑) → (1...(⌊‘𝑚)) = (1...(⌊‘(𝑥 / 𝑑))))
29		ifeq1 4495	. . . . . . 7 ⊢ (𝑚 = (𝑥 / 𝑑) → if(𝑆 = 0, 𝑚, 𝑘) = if(𝑆 = 0, (𝑥 / 𝑑), 𝑘))
30	29	fveq2d 6865	. . . . . 6 ⊢ (𝑚 = (𝑥 / 𝑑) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) = (log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)))
31	30	oveq1d 7405	. . . . 5 ⊢ (𝑚 = (𝑥 / 𝑑) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘))
32	31	oveq2d 7406	. . . 4 ⊢ (𝑚 = (𝑥 / 𝑑) → ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)))
33	32	adantr 480	. . 3 ⊢ ((𝑚 = (𝑥 / 𝑑) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑑)))) → ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)))
34	28, 33	sumeq12rdv 15680	. 2 ⊢ (𝑚 = (𝑥 / 𝑑) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑑)))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)))
35		dchrvmasumif.c	. . 3 ⊢ (𝜑 → 𝐶 ∈ (0[,)+∞))
36		dchrvmasumif.e	. . 3 ⊢ (𝜑 → 𝐸 ∈ (0[,)+∞))
37	35, 36	ifcld 4538	. 2 ⊢ (𝜑 → if(𝑆 = 0, 𝐶, 𝐸) ∈ (0[,)+∞))
38		0cn 11173	. . 3 ⊢ 0 ∈ ℂ
39		dchrvmasumif.t	. . . 4 ⊢ (𝜑 → seq1( + , 𝐾) ⇝ 𝑇)
40		climcl 15472	. . . 4 ⊢ (seq1( + , 𝐾) ⇝ 𝑇 → 𝑇 ∈ ℂ)
41	39, 40	syl 17	. . 3 ⊢ (𝜑 → 𝑇 ∈ ℂ)
42		ifcl 4537	. . 3 ⊢ ((0 ∈ ℂ ∧ 𝑇 ∈ ℂ) → if(𝑆 = 0, 0, 𝑇) ∈ ℂ)
43	38, 41, 42	sylancr 587	. 2 ⊢ (𝜑 → if(𝑆 = 0, 0, 𝑇) ∈ ℂ)
44		nnuz 12843	. . . . . . . . 9 ⊢ ℕ = (ℤ_≥‘1)
45		1zzd 12571	. . . . . . . . 9 ⊢ (𝜑 → 1 ∈ ℤ)
46		nncn 12201	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
47	46	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℂ)
48		nnne0 12227	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ → 𝑘 ≠ 0)
49	48	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑘 ≠ 0)
50	15, 47, 49	divcld 11965	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝑋‘(𝐿‘𝑘)) / 𝑘) ∈ ℂ)
51		dchrvmasumif.f	. . . . . . . . . . . 12 ⊢ 𝐹 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) / 𝑎))
52		2fveq3 6866	. . . . . . . . . . . . . 14 ⊢ (𝑎 = 𝑘 → (𝑋‘(𝐿‘𝑎)) = (𝑋‘(𝐿‘𝑘)))
53		id 22	. . . . . . . . . . . . . 14 ⊢ (𝑎 = 𝑘 → 𝑎 = 𝑘)
54	52, 53	oveq12d 7408	. . . . . . . . . . . . 13 ⊢ (𝑎 = 𝑘 → ((𝑋‘(𝐿‘𝑎)) / 𝑎) = ((𝑋‘(𝐿‘𝑘)) / 𝑘))
55	54	cbvmptv 5214	. . . . . . . . . . . 12 ⊢ (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) / 𝑎)) = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑘)) / 𝑘))
56	51, 55	eqtri 2753	. . . . . . . . . . 11 ⊢ 𝐹 = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑘)) / 𝑘))
57	50, 56	fmptd 7089	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹:ℕ⟶ℂ)
58		ffvelcdm 7056	. . . . . . . . . 10 ⊢ ((𝐹:ℕ⟶ℂ ∧ 𝑘 ∈ ℕ) → (𝐹‘𝑘) ∈ ℂ)
59	57, 58	sylan 580	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘𝑘) ∈ ℂ)
60	44, 45, 59	serf 14002	. . . . . . . 8 ⊢ (𝜑 → seq1( + , 𝐹):ℕ⟶ℂ)
61	60	ad2antrr 726	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → seq1( + , 𝐹):ℕ⟶ℂ)
62		3re 12273	. . . . . . . . . . 11 ⊢ 3 ∈ ℝ
63		elicopnf 13413	. . . . . . . . . . 11 ⊢ (3 ∈ ℝ → (𝑚 ∈ (3[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 3 ≤ 𝑚)))
64	62, 63	mp1i 13	. . . . . . . . . 10 ⊢ (𝜑 → (𝑚 ∈ (3[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 3 ≤ 𝑚)))
65	64	simprbda 498	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 𝑚 ∈ ℝ)
66		1red 11182	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 1 ∈ ℝ)
67	62	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 3 ∈ ℝ)
68		1le3 12400	. . . . . . . . . . 11 ⊢ 1 ≤ 3
69	68	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 1 ≤ 3)
70	64	simplbda 499	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 3 ≤ 𝑚)
71	66, 67, 65, 69, 70	letrd 11338	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 1 ≤ 𝑚)
72		flge1nn 13790	. . . . . . . . 9 ⊢ ((𝑚 ∈ ℝ ∧ 1 ≤ 𝑚) → (⌊‘𝑚) ∈ ℕ)
73	65, 71, 72	syl2anc 584	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → (⌊‘𝑚) ∈ ℕ)
74	73	adantr 480	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (⌊‘𝑚) ∈ ℕ)
75	61, 74	ffvelcdmd 7060	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (seq1( + , 𝐹)‘(⌊‘𝑚)) ∈ ℂ)
76	75	abscld 15412	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ∈ ℝ)
77		simpl 482	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 𝜑)
78		0red 11184	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 0 ∈ ℝ)
79		3pos 12298	. . . . . . . . . . 11 ⊢ 0 < 3
80	79	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 0 < 3)
81	78, 67, 65, 80, 70	ltletrd 11341	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 0 < 𝑚)
82	65, 81	elrpd 12999	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 𝑚 ∈ ℝ⁺)
83	77, 82	jca 511	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → (𝜑 ∧ 𝑚 ∈ ℝ⁺))
84		elrege0 13422	. . . . . . . . . 10 ⊢ (𝐶 ∈ (0[,)+∞) ↔ (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
85	84	simplbi 497	. . . . . . . . 9 ⊢ (𝐶 ∈ (0[,)+∞) → 𝐶 ∈ ℝ)
86	35, 85	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐶 ∈ ℝ)
87		rerpdivcl 12990	. . . . . . . 8 ⊢ ((𝐶 ∈ ℝ ∧ 𝑚 ∈ ℝ⁺) → (𝐶 / 𝑚) ∈ ℝ)
88	86, 87	sylan 580	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (𝐶 / 𝑚) ∈ ℝ)
89	83, 88	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → (𝐶 / 𝑚) ∈ ℝ)
90	89	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (𝐶 / 𝑚) ∈ ℝ)
91	82	relogcld 26539	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → (log‘𝑚) ∈ ℝ)
92	65, 71	logge0d 26546	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 0 ≤ (log‘𝑚))
93	91, 92	jca 511	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → ((log‘𝑚) ∈ ℝ ∧ 0 ≤ (log‘𝑚)))
94	93	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((log‘𝑚) ∈ ℝ ∧ 0 ≤ (log‘𝑚)))
95		oveq2 7398	. . . . . . . 8 ⊢ (𝑆 = 0 → ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆) = ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 0))
96	60	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → seq1( + , 𝐹):ℕ⟶ℂ)
97	96, 73	ffvelcdmd 7060	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → (seq1( + , 𝐹)‘(⌊‘𝑚)) ∈ ℂ)
98	97	subid1d 11529	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 0) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
99	95, 98	sylan9eqr 2787	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
100	99	fveq2d 6865	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) = (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))))
101		2fveq3 6866	. . . . . . . . . 10 ⊢ (𝑦 = 𝑚 → (seq1( + , 𝐹)‘(⌊‘𝑦)) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
102	101	fvoveq1d 7412	. . . . . . . . 9 ⊢ (𝑦 = 𝑚 → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) = (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)))
103		oveq2 7398	. . . . . . . . 9 ⊢ (𝑦 = 𝑚 → (𝐶 / 𝑦) = (𝐶 / 𝑚))
104	102, 103	breq12d 5123	. . . . . . . 8 ⊢ (𝑦 = 𝑚 → ((abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / 𝑦) ↔ (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) ≤ (𝐶 / 𝑚)))
105		dchrvmasumif.1	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / 𝑦))
106	105	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / 𝑦))
107		1re 11181	. . . . . . . . . 10 ⊢ 1 ∈ ℝ
108		elicopnf 13413	. . . . . . . . . 10 ⊢ (1 ∈ ℝ → (𝑚 ∈ (1[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚)))
109	107, 108	ax-mp 5	. . . . . . . . 9 ⊢ (𝑚 ∈ (1[,)+∞) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚))
110	65, 71, 109	sylanbrc 583	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → 𝑚 ∈ (1[,)+∞))
111	104, 106, 110	rspcdva 3592	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) ≤ (𝐶 / 𝑚))
112	111	adantr 480	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘((seq1( + , 𝐹)‘(⌊‘𝑚)) − 𝑆)) ≤ (𝐶 / 𝑚))
113	100, 112	eqbrtrrd 5134	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ≤ (𝐶 / 𝑚))
114		lemul2a 12044	. . . . 5 ⊢ ((((abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ∈ ℝ ∧ (𝐶 / 𝑚) ∈ ℝ ∧ ((log‘𝑚) ∈ ℝ ∧ 0 ≤ (log‘𝑚))) ∧ (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚))) ≤ (𝐶 / 𝑚)) → ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) ≤ ((log‘𝑚) · (𝐶 / 𝑚)))
115	76, 90, 94, 113, 114	syl31anc 1375	. . . 4 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) ≤ ((log‘𝑚) · (𝐶 / 𝑚)))
116		iftrue 4497	. . . . . . . . . . . . . . 15 ⊢ (𝑆 = 0 → if(𝑆 = 0, 𝑚, 𝑘) = 𝑚)
117	116	fveq2d 6865	. . . . . . . . . . . . . 14 ⊢ (𝑆 = 0 → (log‘if(𝑆 = 0, 𝑚, 𝑘)) = (log‘𝑚))
118	117	oveq1d 7405	. . . . . . . . . . . . 13 ⊢ (𝑆 = 0 → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘𝑚) / 𝑘))
119	118	ad2antlr 727	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘𝑚) / 𝑘))
120	119	oveq2d 7406	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑚) / 𝑘)))
121	16	adantlr 715	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝑋‘(𝐿‘𝑘)) ∈ ℂ)
122		relogcl 26491	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ ℝ⁺ → (log‘𝑚) ∈ ℝ)
123	122	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (log‘𝑚) ∈ ℝ)
124	123	recnd 11209	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (log‘𝑚) ∈ ℂ)
125	124	ad2antrr 726	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (log‘𝑚) ∈ ℂ)
126	11	adantl 481	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ∈ ℕ)
127	126	nncnd 12209	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ∈ ℂ)
128	126	nnne0d 12243	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → 𝑘 ≠ 0)
129	121, 125, 127, 128	div12d 12001	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑚) / 𝑘)) = ((log‘𝑚) · ((𝑋‘(𝐿‘𝑘)) / 𝑘)))
130	120, 129	eqtrd 2765	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((log‘𝑚) · ((𝑋‘(𝐿‘𝑘)) / 𝑘)))
131	130	sumeq2dv 15675	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((log‘𝑚) · ((𝑋‘(𝐿‘𝑘)) / 𝑘)))
132		iftrue 4497	. . . . . . . . . . 11 ⊢ (𝑆 = 0 → if(𝑆 = 0, 0, 𝑇) = 0)
133	132	oveq2d 7406	. . . . . . . . . 10 ⊢ (𝑆 = 0 → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − 0))
134	26	subid1d 11529	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − 0) = Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
135	133, 134	sylan9eqr 2787	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
136		ovex 7423	. . . . . . . . . . . . . 14 ⊢ ((𝑋‘(𝐿‘𝑘)) / 𝑘) ∈ V
137	54, 51, 136	fvmpt 6971	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ → (𝐹‘𝑘) = ((𝑋‘(𝐿‘𝑘)) / 𝑘))
138	22, 137	syl 17	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐹‘𝑘) = ((𝑋‘(𝐿‘𝑘)) / 𝑘))
139	57	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → 𝐹:ℕ⟶ℂ)
140	139, 11, 58	syl2an 596	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐹‘𝑘) ∈ ℂ)
141	138, 140	eqeltrrd 2830	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿‘𝑘)) / 𝑘) ∈ ℂ)
142	9, 124, 141	fsummulc2 15757	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((log‘𝑚) · ((𝑋‘(𝐿‘𝑘)) / 𝑘)))
143	142	adantr 480	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) / 𝑘)) = Σ𝑘 ∈ (1...(⌊‘𝑚))((log‘𝑚) · ((𝑋‘(𝐿‘𝑘)) / 𝑘)))
144	131, 135, 143	3eqtr4d 2775	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) / 𝑘)))
145	83, 144	sylan 580	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) / 𝑘)))
146	83, 138	sylan 580	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐹‘𝑘) = ((𝑋‘(𝐿‘𝑘)) / 𝑘))
147	73, 44	eleqtrdi 2839	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → (⌊‘𝑚) ∈ (ℤ_≥‘1))
148	77, 11, 50	syl2an 596	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿‘𝑘)) / 𝑘) ∈ ℂ)
149	146, 147, 148	fsumser 15703	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) / 𝑘) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
150	149	adantr 480	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) / 𝑘) = (seq1( + , 𝐹)‘(⌊‘𝑚)))
151	150	oveq2d 7406	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((log‘𝑚) · Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) / 𝑘)) = ((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚))))
152	145, 151	eqtrd 2765	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚))))
153	152	fveq2d 6865	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) = (abs‘((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚)))))
154	122	ad2antlr 727	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → (log‘𝑚) ∈ ℝ)
155	154	recnd 11209	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → (log‘𝑚) ∈ ℂ)
156	83, 155	sylan 580	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (log‘𝑚) ∈ ℂ)
157	156, 75	absmuld 15430	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘((log‘𝑚) · (seq1( + , 𝐹)‘(⌊‘𝑚)))) = ((abs‘(log‘𝑚)) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
158	91, 92	absidd 15396	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → (abs‘(log‘𝑚)) = (log‘𝑚))
159	158	oveq1d 7405	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → ((abs‘(log‘𝑚)) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) = ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
160	159	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → ((abs‘(log‘𝑚)) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))) = ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
161	153, 157, 160	3eqtrd 2769	. . . 4 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) = ((log‘𝑚) · (abs‘(seq1( + , 𝐹)‘(⌊‘𝑚)))))
162		iftrue 4497	. . . . . . . 8 ⊢ (𝑆 = 0 → if(𝑆 = 0, 𝐶, 𝐸) = 𝐶)
163	162	adantl 481	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → if(𝑆 = 0, 𝐶, 𝐸) = 𝐶)
164	163	oveq1d 7405	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = (𝐶 · ((log‘𝑚) / 𝑚)))
165	86	recnd 11209	. . . . . . . 8 ⊢ (𝜑 → 𝐶 ∈ ℂ)
166	165	ad2antrr 726	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → 𝐶 ∈ ℂ)
167		rpcnne0 12977	. . . . . . . 8 ⊢ (𝑚 ∈ ℝ⁺ → (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0))
168	167	ad2antlr 727	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0))
169		div12 11866	. . . . . . 7 ⊢ ((𝐶 ∈ ℂ ∧ (log‘𝑚) ∈ ℂ ∧ (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0)) → (𝐶 · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
170	166, 155, 168, 169	syl3anc 1373	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → (𝐶 · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
171	164, 170	eqtrd 2765	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑆 = 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
172	83, 171	sylan 580	. . . 4 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = ((log‘𝑚) · (𝐶 / 𝑚)))
173	115, 161, 172	3brtr4d 5142	. . 3 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 = 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)))
174		dchrvmasumif.2	. . . . . 6 ⊢ (𝜑 → ∀𝑦 ∈ (3[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 · ((log‘𝑦) / 𝑦)))
175		2fveq3 6866	. . . . . . . . 9 ⊢ (𝑦 = 𝑚 → (seq1( + , 𝐾)‘(⌊‘𝑦)) = (seq1( + , 𝐾)‘(⌊‘𝑚)))
176	175	fvoveq1d 7412	. . . . . . . 8 ⊢ (𝑦 = 𝑚 → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)))
177		fveq2 6861	. . . . . . . . . 10 ⊢ (𝑦 = 𝑚 → (log‘𝑦) = (log‘𝑚))
178		id 22	. . . . . . . . . 10 ⊢ (𝑦 = 𝑚 → 𝑦 = 𝑚)
179	177, 178	oveq12d 7408	. . . . . . . . 9 ⊢ (𝑦 = 𝑚 → ((log‘𝑦) / 𝑦) = ((log‘𝑚) / 𝑚))
180	179	oveq2d 7406	. . . . . . . 8 ⊢ (𝑦 = 𝑚 → (𝐸 · ((log‘𝑦) / 𝑦)) = (𝐸 · ((log‘𝑚) / 𝑚)))
181	176, 180	breq12d 5123	. . . . . . 7 ⊢ (𝑦 = 𝑚 → ((abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 · ((log‘𝑦) / 𝑦)) ↔ (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚))))
182	181	rspccva 3590	. . . . . 6 ⊢ ((∀𝑦 ∈ (3[,)+∞)(abs‘((seq1( + , 𝐾)‘(⌊‘𝑦)) − 𝑇)) ≤ (𝐸 · ((log‘𝑦) / 𝑦)) ∧ 𝑚 ∈ (3[,)+∞)) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚)))
183	174, 182	sylan 580	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚)))
184	183	adantr 480	. . . 4 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)) ≤ (𝐸 · ((log‘𝑚) / 𝑚)))
185		fveq2 6861	. . . . . . . . . . . 12 ⊢ (𝑎 = 𝑘 → (log‘𝑎) = (log‘𝑘))
186	185, 53	oveq12d 7408	. . . . . . . . . . 11 ⊢ (𝑎 = 𝑘 → ((log‘𝑎) / 𝑎) = ((log‘𝑘) / 𝑘))
187	52, 186	oveq12d 7408	. . . . . . . . . 10 ⊢ (𝑎 = 𝑘 → ((𝑋‘(𝐿‘𝑎)) · ((log‘𝑎) / 𝑎)) = ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑘) / 𝑘)))
188		dchrvmasumif.g	. . . . . . . . . 10 ⊢ 𝐾 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) · ((log‘𝑎) / 𝑎)))
189		ovex 7423	. . . . . . . . . 10 ⊢ ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑘) / 𝑘)) ∈ V
190	187, 188, 189	fvmpt 6971	. . . . . . . . 9 ⊢ (𝑘 ∈ ℕ → (𝐾‘𝑘) = ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑘) / 𝑘)))
191	11, 190	syl 17	. . . . . . . 8 ⊢ (𝑘 ∈ (1...(⌊‘𝑚)) → (𝐾‘𝑘) = ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑘) / 𝑘)))
192		ifnefalse 4503	. . . . . . . . . . . . 13 ⊢ (𝑆 ≠ 0 → if(𝑆 = 0, 𝑚, 𝑘) = 𝑘)
193	192	fveq2d 6865	. . . . . . . . . . . 12 ⊢ (𝑆 ≠ 0 → (log‘if(𝑆 = 0, 𝑚, 𝑘)) = (log‘𝑘))
194	193	oveq1d 7405	. . . . . . . . . . 11 ⊢ (𝑆 ≠ 0 → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) = ((log‘𝑘) / 𝑘))
195	194	oveq2d 7406	. . . . . . . . . 10 ⊢ (𝑆 ≠ 0 → ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑘) / 𝑘)))
196	195	adantl 481	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑘) / 𝑘)))
197	196	eqcomd 2736	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑘) / 𝑘)) = ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
198	191, 197	sylan9eqr 2787	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐾‘𝑘) = ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)))
199	147	adantr 480	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (⌊‘𝑚) ∈ (ℤ_≥‘1))
200		nnrp 12970	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℝ⁺)
201	200	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℝ⁺)
202	201	relogcld 26539	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (log‘𝑘) ∈ ℝ)
203	202	recnd 11209	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (log‘𝑘) ∈ ℂ)
204	203, 47, 49	divcld 11965	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((log‘𝑘) / 𝑘) ∈ ℂ)
205	15, 204	mulcld 11201	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑘) / 𝑘)) ∈ ℂ)
206	187	cbvmptv 5214	. . . . . . . . . . . 12 ⊢ (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) · ((log‘𝑎) / 𝑎))) = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑘) / 𝑘)))
207	188, 206	eqtri 2753	. . . . . . . . . . 11 ⊢ 𝐾 = (𝑘 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑘)) · ((log‘𝑘) / 𝑘)))
208	205, 207	fmptd 7089	. . . . . . . . . 10 ⊢ (𝜑 → 𝐾:ℕ⟶ℂ)
209	208	ad2antrr 726	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → 𝐾:ℕ⟶ℂ)
210		ffvelcdm 7056	. . . . . . . . 9 ⊢ ((𝐾:ℕ⟶ℂ ∧ 𝑘 ∈ ℕ) → (𝐾‘𝑘) ∈ ℂ)
211	209, 11, 210	syl2an 596	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (𝐾‘𝑘) ∈ ℂ)
212	198, 211	eqeltrrd 2830	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
213	198, 199, 212	fsumser 15703	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = (seq1( + , 𝐾)‘(⌊‘𝑚)))
214		ifnefalse 4503	. . . . . . 7 ⊢ (𝑆 ≠ 0 → if(𝑆 = 0, 0, 𝑇) = 𝑇)
215	214	adantl 481	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → if(𝑆 = 0, 0, 𝑇) = 𝑇)
216	213, 215	oveq12d 7408	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) = ((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇))
217	216	fveq2d 6865	. . . 4 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) = (abs‘((seq1( + , 𝐾)‘(⌊‘𝑚)) − 𝑇)))
218		ifnefalse 4503	. . . . . 6 ⊢ (𝑆 ≠ 0 → if(𝑆 = 0, 𝐶, 𝐸) = 𝐸)
219	218	adantl 481	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → if(𝑆 = 0, 𝐶, 𝐸) = 𝐸)
220	219	oveq1d 7405	. . . 4 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)) = (𝐸 · ((log‘𝑚) / 𝑚)))
221	184, 217, 220	3brtr4d 5142	. . 3 ⊢ (((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) ∧ 𝑆 ≠ 0) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)))
222	173, 221	pm2.61dane 3013	. 2 ⊢ ((𝜑 ∧ 𝑚 ∈ (3[,)+∞)) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (if(𝑆 = 0, 𝐶, 𝐸) · ((log‘𝑚) / 𝑚)))
223		fzfid 13945	. . . 4 ⊢ (𝜑 → (1...2) ∈ Fin)
224	7	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...2)) → 𝑋 ∈ 𝐷)
225		elfzelz 13492	. . . . . . . 8 ⊢ (𝑘 ∈ (1...2) → 𝑘 ∈ ℤ)
226	225	adantl 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...2)) → 𝑘 ∈ ℤ)
227	4, 1, 5, 2, 224, 226	dchrzrhcl 27163	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...2)) → (𝑋‘(𝐿‘𝑘)) ∈ ℂ)
228	227	abscld 15412	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...2)) → (abs‘(𝑋‘(𝐿‘𝑘))) ∈ ℝ)
229		3rp 12964	. . . . . . 7 ⊢ 3 ∈ ℝ⁺
230		relogcl 26491	. . . . . . 7 ⊢ (3 ∈ ℝ⁺ → (log‘3) ∈ ℝ)
231	229, 230	ax-mp 5	. . . . . 6 ⊢ (log‘3) ∈ ℝ
232		elfznn 13521	. . . . . . 7 ⊢ (𝑘 ∈ (1...2) → 𝑘 ∈ ℕ)
233	232	adantl 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...2)) → 𝑘 ∈ ℕ)
234		nndivre 12234	. . . . . 6 ⊢ (((log‘3) ∈ ℝ ∧ 𝑘 ∈ ℕ) → ((log‘3) / 𝑘) ∈ ℝ)
235	231, 233, 234	sylancr 587	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...2)) → ((log‘3) / 𝑘) ∈ ℝ)
236	228, 235	remulcld 11211	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
237	223, 236	fsumrecl 15707	. . 3 ⊢ (𝜑 → Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
238	43	abscld 15412	. . 3 ⊢ (𝜑 → (abs‘if(𝑆 = 0, 0, 𝑇)) ∈ ℝ)
239	237, 238	readdcld 11210	. 2 ⊢ (𝜑 → (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
240		simpl 482	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → 𝜑)
241	62	rexri 11239	. . . . . . . . . . 11 ⊢ 3 ∈ ℝ^*
242		elico2 13378	. . . . . . . . . . 11 ⊢ ((1 ∈ ℝ ∧ 3 ∈ ℝ^*) → (𝑚 ∈ (1[,)3) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚 ∧ 𝑚 < 3)))
243	107, 241, 242	mp2an 692	. . . . . . . . . 10 ⊢ (𝑚 ∈ (1[,)3) ↔ (𝑚 ∈ ℝ ∧ 1 ≤ 𝑚 ∧ 𝑚 < 3))
244	243	simp1bi 1145	. . . . . . . . 9 ⊢ (𝑚 ∈ (1[,)3) → 𝑚 ∈ ℝ)
245	244	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → 𝑚 ∈ ℝ)
246		0red 11184	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → 0 ∈ ℝ)
247		1red 11182	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → 1 ∈ ℝ)
248		0lt1 11707	. . . . . . . . . 10 ⊢ 0 < 1
249	248	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → 0 < 1)
250	243	simp2bi 1146	. . . . . . . . . 10 ⊢ (𝑚 ∈ (1[,)3) → 1 ≤ 𝑚)
251	250	adantl 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → 1 ≤ 𝑚)
252	246, 247, 245, 249, 251	ltletrd 11341	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → 0 < 𝑚)
253	245, 252	elrpd 12999	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → 𝑚 ∈ ℝ⁺)
254	240, 253	jca 511	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (𝜑 ∧ 𝑚 ∈ ℝ⁺))
255	43	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → if(𝑆 = 0, 0, 𝑇) ∈ ℂ)
256	26, 255	subcld 11540	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) ∈ ℂ)
257	254, 256	syl 17	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)) ∈ ℂ)
258	257	abscld 15412	. . . 4 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
259	254, 26	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
260	259	abscld 15412	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
261	238	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (abs‘if(𝑆 = 0, 0, 𝑇)) ∈ ℝ)
262	260, 261	readdcld 11210	. . . 4 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) + (abs‘if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
263	237	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
264	263, 261	readdcld 11210	. . . 4 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))) ∈ ℝ)
265	26, 255	abs2dif2d 15434	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) + (abs‘if(𝑆 = 0, 0, 𝑇))))
266	254, 265	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) + (abs‘if(𝑆 = 0, 0, 𝑇))))
267	25	abscld 15412	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...(⌊‘𝑚))) → (abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
268	9, 267	fsumrecl 15707	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
269	254, 268	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
270	9, 25	fsumabs 15774	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
271	254, 270	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
272		fzfid 13945	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (1...2) ∈ Fin)
273	227	adantlr 715	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → (𝑋‘(𝐿‘𝑘)) ∈ ℂ)
274	17	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → 𝑚 ∈ ℝ⁺)
275	232	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → 𝑘 ∈ ℕ)
276	275	nnrpd 13000	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → 𝑘 ∈ ℝ⁺)
277	274, 276	ifcld 4538	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ⁺)
278	277	relogcld 26539	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ)
279	278, 275	nndivred 12247	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℝ)
280	279	recnd 11209	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℂ)
281	273, 280	mulcld 11201	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
282	281	abscld 15412	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
283	272, 282	fsumrecl 15707	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
284	254, 283	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
285		fzfid 13945	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (1...2) ∈ Fin)
286	254, 281	sylan 580	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℂ)
287	286	abscld 15412	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
288	286	absge0d 15420	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 0 ≤ (abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
289	245	flcld 13767	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (⌊‘𝑚) ∈ ℤ)
290		2z 12572	. . . . . . . . . . 11 ⊢ 2 ∈ ℤ
291	290	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → 2 ∈ ℤ)
292	243	simp3bi 1147	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ (1[,)3) → 𝑚 < 3)
293	292	adantl 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → 𝑚 < 3)
294		3z 12573	. . . . . . . . . . . . . 14 ⊢ 3 ∈ ℤ
295		fllt 13775	. . . . . . . . . . . . . 14 ⊢ ((𝑚 ∈ ℝ ∧ 3 ∈ ℤ) → (𝑚 < 3 ↔ (⌊‘𝑚) < 3))
296	245, 294, 295	sylancl 586	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (𝑚 < 3 ↔ (⌊‘𝑚) < 3))
297	293, 296	mpbid 232	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (⌊‘𝑚) < 3)
298		df-3 12257	. . . . . . . . . . . 12 ⊢ 3 = (2 + 1)
299	297, 298	breqtrdi 5151	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (⌊‘𝑚) < (2 + 1))
300		rpre 12967	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ ℝ⁺ → 𝑚 ∈ ℝ)
301	300	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → 𝑚 ∈ ℝ)
302	301	flcld 13767	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (⌊‘𝑚) ∈ ℤ)
303		zleltp1 12591	. . . . . . . . . . . . 13 ⊢ (((⌊‘𝑚) ∈ ℤ ∧ 2 ∈ ℤ) → ((⌊‘𝑚) ≤ 2 ↔ (⌊‘𝑚) < (2 + 1)))
304	302, 290, 303	sylancl 586	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → ((⌊‘𝑚) ≤ 2 ↔ (⌊‘𝑚) < (2 + 1)))
305	254, 304	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → ((⌊‘𝑚) ≤ 2 ↔ (⌊‘𝑚) < (2 + 1)))
306	299, 305	mpbird 257	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (⌊‘𝑚) ≤ 2)
307		eluz2 12806	. . . . . . . . . 10 ⊢ (2 ∈ (ℤ_≥‘(⌊‘𝑚)) ↔ ((⌊‘𝑚) ∈ ℤ ∧ 2 ∈ ℤ ∧ (⌊‘𝑚) ≤ 2))
308	289, 291, 306, 307	syl3anbrc 1344	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → 2 ∈ (ℤ_≥‘(⌊‘𝑚)))
309		fzss2 13532	. . . . . . . . 9 ⊢ (2 ∈ (ℤ_≥‘(⌊‘𝑚)) → (1...(⌊‘𝑚)) ⊆ (1...2))
310	308, 309	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (1...(⌊‘𝑚)) ⊆ (1...2))
311	285, 287, 288, 310	fsumless 15769	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
312	236	adantlr 715	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
313	273, 280	absmuld 15430	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) = ((abs‘(𝑋‘(𝐿‘𝑘))) · (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
314	254, 313	sylan 580	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) = ((abs‘(𝑋‘(𝐿‘𝑘))) · (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))))
315	254, 279	sylan 580	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ∈ ℝ)
316	254, 278	sylan 580	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ)
317		log1 26501	. . . . . . . . . . . . . 14 ⊢ (log‘1) = 0
318		elfzle1 13495	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ (1...2) → 1 ≤ 𝑘)
319		breq2 5114	. . . . . . . . . . . . . . . . 17 ⊢ (𝑚 = if(𝑆 = 0, 𝑚, 𝑘) → (1 ≤ 𝑚 ↔ 1 ≤ if(𝑆 = 0, 𝑚, 𝑘)))
320		breq2 5114	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = if(𝑆 = 0, 𝑚, 𝑘) → (1 ≤ 𝑘 ↔ 1 ≤ if(𝑆 = 0, 𝑚, 𝑘)))
321	319, 320	ifboth 4531	. . . . . . . . . . . . . . . 16 ⊢ ((1 ≤ 𝑚 ∧ 1 ≤ 𝑘) → 1 ≤ if(𝑆 = 0, 𝑚, 𝑘))
322	251, 318, 321	syl2an 596	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 1 ≤ if(𝑆 = 0, 𝑚, 𝑘))
323		1rp 12962	. . . . . . . . . . . . . . . . 17 ⊢ 1 ∈ ℝ⁺
324		logleb 26519	. . . . . . . . . . . . . . . . 17 ⊢ ((1 ∈ ℝ⁺ ∧ if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ⁺) → (1 ≤ if(𝑆 = 0, 𝑚, 𝑘) ↔ (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))))
325	323, 277, 324	sylancr 587	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → (1 ≤ if(𝑆 = 0, 𝑚, 𝑘) ↔ (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))))
326	254, 325	sylan 580	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (1 ≤ if(𝑆 = 0, 𝑚, 𝑘) ↔ (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))))
327	322, 326	mpbid 232	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (log‘1) ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘)))
328	317, 327	eqbrtrrid 5146	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 0 ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘)))
329	276	rpregt0d 13008	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → (𝑘 ∈ ℝ ∧ 0 < 𝑘))
330	254, 329	sylan 580	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (𝑘 ∈ ℝ ∧ 0 < 𝑘))
331		divge0 12059	. . . . . . . . . . . . 13 ⊢ ((((log‘if(𝑆 = 0, 𝑚, 𝑘)) ∈ ℝ ∧ 0 ≤ (log‘if(𝑆 = 0, 𝑚, 𝑘))) ∧ (𝑘 ∈ ℝ ∧ 0 < 𝑘)) → 0 ≤ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))
332	316, 328, 330, 331	syl21anc 837	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 0 ≤ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))
333	315, 332	absidd 15396	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) = ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))
334	333, 315	eqeltrd 2829	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℝ)
335	235	adantlr 715	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘3) / 𝑘) ∈ ℝ)
336	228	adantlr 715	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → (abs‘(𝑋‘(𝐿‘𝑘))) ∈ ℝ)
337	273	absge0d 15420	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → 0 ≤ (abs‘(𝑋‘(𝐿‘𝑘))))
338	336, 337	jca 511	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿‘𝑘))) ∈ ℝ ∧ 0 ≤ (abs‘(𝑋‘(𝐿‘𝑘)))))
339	254, 338	sylan 580	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿‘𝑘))) ∈ ℝ ∧ 0 ≤ (abs‘(𝑋‘(𝐿‘𝑘)))))
340	292	ad2antlr 727	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 𝑚 < 3)
341	275	nnred 12208	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → 𝑘 ∈ ℝ)
342		2re 12267	. . . . . . . . . . . . . . . . . 18 ⊢ 2 ∈ ℝ
343	342	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → 2 ∈ ℝ)
344	62	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → 3 ∈ ℝ)
345		elfzle2 13496	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ (1...2) → 𝑘 ≤ 2)
346	345	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → 𝑘 ≤ 2)
347		2lt3 12360	. . . . . . . . . . . . . . . . . 18 ⊢ 2 < 3
348	347	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → 2 < 3)
349	341, 343, 344, 346, 348	lelttrd 11339	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → 𝑘 < 3)
350	254, 349	sylan 580	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → 𝑘 < 3)
351		breq1 5113	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 = if(𝑆 = 0, 𝑚, 𝑘) → (𝑚 < 3 ↔ if(𝑆 = 0, 𝑚, 𝑘) < 3))
352		breq1 5113	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = if(𝑆 = 0, 𝑚, 𝑘) → (𝑘 < 3 ↔ if(𝑆 = 0, 𝑚, 𝑘) < 3))
353	351, 352	ifboth 4531	. . . . . . . . . . . . . . 15 ⊢ ((𝑚 < 3 ∧ 𝑘 < 3) → if(𝑆 = 0, 𝑚, 𝑘) < 3)
354	340, 350, 353	syl2anc 584	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) < 3)
355	277	rpred 13002	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ)
356		ltle 11269	. . . . . . . . . . . . . . . 16 ⊢ ((if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ ∧ 3 ∈ ℝ) → (if(𝑆 = 0, 𝑚, 𝑘) < 3 → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3))
357	355, 62, 356	sylancl 586	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) < 3 → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3))
358	254, 357	sylan 580	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) < 3 → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3))
359	354, 358	mpd 15	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → if(𝑆 = 0, 𝑚, 𝑘) ≤ 3)
360		logleb 26519	. . . . . . . . . . . . . . 15 ⊢ ((if(𝑆 = 0, 𝑚, 𝑘) ∈ ℝ⁺ ∧ 3 ∈ ℝ⁺) → (if(𝑆 = 0, 𝑚, 𝑘) ≤ 3 ↔ (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3)))
361	277, 229, 360	sylancl 586	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) ≤ 3 ↔ (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3)))
362	254, 361	sylan 580	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (if(𝑆 = 0, 𝑚, 𝑘) ≤ 3 ↔ (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3)))
363	359, 362	mpbid 232	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3))
364	231	a1i 11	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → (log‘3) ∈ ℝ)
365	278, 364, 276	lediv1d 13048	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑚 ∈ ℝ⁺) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3) ↔ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ≤ ((log‘3) / 𝑘)))
366	254, 365	sylan 580	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) ≤ (log‘3) ↔ ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ≤ ((log‘3) / 𝑘)))
367	363, 366	mpbid 232	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘) ≤ ((log‘3) / 𝑘))
368	333, 367	eqbrtrd 5132	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ≤ ((log‘3) / 𝑘))
369		lemul2a 12044	. . . . . . . . . 10 ⊢ ((((abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ∈ ℝ ∧ ((log‘3) / 𝑘) ∈ ℝ ∧ ((abs‘(𝑋‘(𝐿‘𝑘))) ∈ ℝ ∧ 0 ≤ (abs‘(𝑋‘(𝐿‘𝑘))))) ∧ (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) ≤ ((log‘3) / 𝑘)) → ((abs‘(𝑋‘(𝐿‘𝑘))) · (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ ((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)))
370	334, 335, 339, 368, 369	syl31anc 1375	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → ((abs‘(𝑋‘(𝐿‘𝑘))) · (abs‘((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ ((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)))
371	314, 370	eqbrtrd 5132	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ (1[,)3)) ∧ 𝑘 ∈ (1...2)) → (abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ ((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)))
372	285, 287, 312, 371	fsumle 15772	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...2)(abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)))
373	269, 284, 263, 311, 372	letrd 11338	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → Σ𝑘 ∈ (1...(⌊‘𝑚))(abs‘((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)))
374	260, 269, 263, 271, 373	letrd 11338	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ≤ Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)))
375	26	abscld 15412	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) ∈ ℝ)
376	237	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)) ∈ ℝ)
377	255	abscld 15412	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℝ⁺) → (abs‘if(𝑆 = 0, 0, 𝑇)) ∈ ℝ)
378	375, 376, 377	leadd1d 11779	. . . . . 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, 𝑇)))))
379	254, 378	syl 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, 𝑇)))))
380	374, 379	mpbid 232	. . . 4 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → ((abs‘Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘))) + (abs‘if(𝑆 = 0, 0, 𝑇))) ≤ (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))))
381	258, 262, 264, 266, 380	letrd 11338	. . 3 ⊢ ((𝜑 ∧ 𝑚 ∈ (1[,)3)) → (abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))))
382	381	ralrimiva 3126	. 2 ⊢ (𝜑 → ∀𝑚 ∈ (1[,)3)(abs‘(Σ𝑘 ∈ (1...(⌊‘𝑚))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, 𝑚, 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇))) ≤ (Σ𝑘 ∈ (1...2)((abs‘(𝑋‘(𝐿‘𝑘))) · ((log‘3) / 𝑘)) + (abs‘if(𝑆 = 0, 0, 𝑇))))
383	1, 2, 3, 4, 5, 6, 7, 8, 26, 34, 37, 43, 222, 239, 382	dchrvmasumlem3 27417	1 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ Σ𝑑 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑑)) · ((μ‘𝑑) / 𝑑)) · (Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑑)))((𝑋‘(𝐿‘𝑘)) · ((log‘if(𝑆 = 0, (𝑥 / 𝑑), 𝑘)) / 𝑘)) − if(𝑆 = 0, 0, 𝑇)))) ∈ 𝑂(1))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1086 = wceq 1540 ∈ wcel 2109 ≠ wne 2926 ∀wral 3045 ⊆ wss 3917 ifcif 4491 class class class wbr 5110 ↦ cmpt 5191 ⟶wf 6510 ‘cfv 6514 (class class class)co 7390 ℂcc 11073 ℝcr 11074 0cc0 11075 1c1 11076 + caddc 11078 · cmul 11080 +∞cpnf 11212 ℝ^*cxr 11214 < clt 11215 ≤ cle 11216 − cmin 11412 / cdiv 11842 ℕcn 12193 2c2 12248 3c3 12249 ℤcz 12536 ℤ_≥cuz 12800 ℝ⁺crp 12958 [,)cico 13315 ...cfz 13475 ⌊cfl 13759 seqcseq 13973 abscabs 15207 ⇝ cli 15457 𝑂(1)co1 15459 Σcsu 15659 Basecbs 17186 0_gc0g 17409 ℤRHomczrh 21416 ℤ/nℤczn 21419 logclog 26470 μcmu 27012 DChrcdchr 27150

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2702 ax-rep 5237 ax-sep 5254 ax-nul 5264 ax-pow 5323 ax-pr 5390 ax-un 7714 ax-inf2 9601 ax-cnex 11131 ax-resscn 11132 ax-1cn 11133 ax-icn 11134 ax-addcl 11135 ax-addrcl 11136 ax-mulcl 11137 ax-mulrcl 11138 ax-mulcom 11139 ax-addass 11140 ax-mulass 11141 ax-distr 11142 ax-i2m1 11143 ax-1ne0 11144 ax-1rid 11145 ax-rnegex 11146 ax-rrecex 11147 ax-cnre 11148 ax-pre-lttri 11149 ax-pre-lttrn 11150 ax-pre-ltadd 11151 ax-pre-mulgt0 11152 ax-pre-sup 11153 ax-addf 11154 ax-mulf 11155

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2534 df-eu 2563 df-clab 2709 df-cleq 2722 df-clel 2804 df-nfc 2879 df-ne 2927 df-nel 3031 df-ral 3046 df-rex 3055 df-rmo 3356 df-reu 3357 df-rab 3409 df-v 3452 df-sbc 3757 df-csb 3866 df-dif 3920 df-un 3922 df-in 3924 df-ss 3934 df-pss 3937 df-nul 4300 df-if 4492 df-pw 4568 df-sn 4593 df-pr 4595 df-tp 4597 df-op 4599 df-uni 4875 df-int 4914 df-iun 4960 df-iin 4961 df-disj 5078 df-br 5111 df-opab 5173 df-mpt 5192 df-tr 5218 df-id 5536 df-eprel 5541 df-po 5549 df-so 5550 df-fr 5594 df-se 5595 df-we 5596 df-xp 5647 df-rel 5648 df-cnv 5649 df-co 5650 df-dm 5651 df-rn 5652 df-res 5653 df-ima 5654 df-pred 6277 df-ord 6338 df-on 6339 df-lim 6340 df-suc 6341 df-iota 6467 df-fun 6516 df-fn 6517 df-f 6518 df-f1 6519 df-fo 6520 df-f1o 6521 df-fv 6522 df-isom 6523 df-riota 7347 df-ov 7393 df-oprab 7394 df-mpo 7395 df-of 7656 df-om 7846 df-1st 7971 df-2nd 7972 df-supp 8143 df-tpos 8208 df-frecs 8263 df-wrecs 8294 df-recs 8343 df-rdg 8381 df-1o 8437 df-2o 8438 df-oadd 8441 df-omul 8442 df-er 8674 df-ec 8676 df-qs 8680 df-map 8804 df-pm 8805 df-ixp 8874 df-en 8922 df-dom 8923 df-sdom 8924 df-fin 8925 df-fsupp 9320 df-fi 9369 df-sup 9400 df-inf 9401 df-oi 9470 df-card 9899 df-acn 9902 df-pnf 11217 df-mnf 11218 df-xr 11219 df-ltxr 11220 df-le 11221 df-sub 11414 df-neg 11415 df-div 11843 df-nn 12194 df-2 12256 df-3 12257 df-4 12258 df-5 12259 df-6 12260 df-7 12261 df-8 12262 df-9 12263 df-n0 12450 df-xnn0 12523 df-z 12537 df-dec 12657 df-uz 12801 df-q 12915 df-rp 12959 df-xneg 13079 df-xadd 13080 df-xmul 13081 df-ioo 13317 df-ioc 13318 df-ico 13319 df-icc 13320 df-fz 13476 df-fzo 13623 df-fl 13761 df-mod 13839 df-seq 13974 df-exp 14034 df-fac 14246 df-bc 14275 df-hash 14303 df-shft 15040 df-cj 15072 df-re 15073 df-im 15074 df-sqrt 15208 df-abs 15209 df-limsup 15444 df-clim 15461 df-rlim 15462 df-o1 15463 df-lo1 15464 df-sum 15660 df-ef 16040 df-e 16041 df-sin 16042 df-cos 16043 df-tan 16044 df-pi 16045 df-dvds 16230 df-prm 16649 df-struct 17124 df-sets 17141 df-slot 17159 df-ndx 17171 df-base 17187 df-ress 17208 df-plusg 17240 df-mulr 17241 df-starv 17242 df-sca 17243 df-vsca 17244 df-ip 17245 df-tset 17246 df-ple 17247 df-ds 17249 df-unif 17250 df-hom 17251 df-cco 17252 df-rest 17392 df-topn 17393 df-0g 17411 df-gsum 17412 df-topgen 17413 df-pt 17414 df-prds 17417 df-xrs 17472 df-qtop 17477 df-imas 17478 df-qus 17479 df-xps 17480 df-mre 17554 df-mrc 17555 df-acs 17557 df-mgm 18574 df-sgrp 18653 df-mnd 18669 df-mhm 18717 df-submnd 18718 df-grp 18875 df-minusg 18876 df-sbg 18877 df-mulg 19007 df-subg 19062 df-nsg 19063 df-eqg 19064 df-ghm 19152 df-cntz 19256 df-od 19465 df-cmn 19719 df-abl 19720 df-mgp 20057 df-rng 20069 df-ur 20098 df-ring 20151 df-cring 20152 df-oppr 20253 df-dvdsr 20273 df-unit 20274 df-invr 20304 df-dvr 20317 df-rhm 20388 df-subrng 20462 df-subrg 20486 df-drng 20647 df-lmod 20775 df-lss 20845 df-lsp 20885 df-sra 21087 df-rgmod 21088 df-lidl 21125 df-rsp 21126 df-2idl 21167 df-psmet 21263 df-xmet 21264 df-met 21265 df-bl 21266 df-mopn 21267 df-fbas 21268 df-fg 21269 df-cnfld 21272 df-zring 21364 df-zrh 21420 df-zn 21423 df-top 22788 df-topon 22805 df-topsp 22827 df-bases 22840 df-cld 22913 df-ntr 22914 df-cls 22915 df-nei 22992 df-lp 23030 df-perf 23031 df-cn 23121 df-cnp 23122 df-haus 23209 df-cmp 23281 df-tx 23456 df-hmeo 23649 df-fil 23740 df-fm 23832 df-flim 23833 df-flf 23834 df-xms 24215 df-ms 24216 df-tms 24217 df-cncf 24778 df-limc 25774 df-dv 25775 df-ulm 26293 df-log 26472 df-cxp 26473 df-atan 26784 df-em 26910 df-mu 27018 df-dchr 27151

This theorem is referenced by: dchrvmasumiflem2 27420

W3C validator