dchrisum0lem2a - Metamath Proof Explorer

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

Theorem dchrisum0lem2a 27844

Description: Lemma for dchrisum0 27847. (Contributed by Mario Carneiro, 12-May-2016.)

**Hypotheses**
Ref	Expression
rpvmasum.z	⊢ 𝑍 = (ℤ/nℤ‘𝑁)
rpvmasum.l	⊢ 𝐿 = (ℤRHom‘𝑍)
rpvmasum.a	⊢ (𝜑 → 𝑁 ∈ ℕ)
rpvmasum2.g	⊢ 𝐺 = (DChr‘𝑁)
rpvmasum2.d	⊢ 𝐷 = (Base‘𝐺)
rpvmasum2.1	⊢ 1 = (0_g‘𝐺)
rpvmasum2.w	⊢ 𝑊 = {𝑦 ∈ (𝐷 ∖ { 1 }) ∣ Σ𝑚 ∈ ℕ ((𝑦‘(𝐿‘𝑚)) / 𝑚) = 0}
dchrisum0.b	⊢ (𝜑 → 𝑋 ∈ 𝑊)
dchrisum0lem1.f	⊢ 𝐹 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) / (√‘𝑎)))
dchrisum0.c	⊢ (𝜑 → 𝐶 ∈ (0[,)+∞))
dchrisum0.s	⊢ (𝜑 → seq1( + , 𝐹) ⇝ 𝑆)
dchrisum0.1	⊢ (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((seq1( + , 𝐹)‘(⌊‘𝑦)) − 𝑆)) ≤ (𝐶 / (√‘𝑦)))
dchrisum0lem2.h	⊢ 𝐻 = (𝑦 ∈ ℝ⁺ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))))
dchrisum0lem2.u	⊢ (𝜑 → 𝐻 ⇝_𝑟 𝑈)

**Assertion**
Ref	Expression
dchrisum0lem2a	⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚)))) ∈ 𝑂(1))

Distinct variable groups: 𝑥,𝑚,𝑦, 1 𝑚,𝑑,𝑥,𝑦,𝐶 𝐹,𝑑,𝑥,𝑦 𝑎,𝑑,𝑚,𝑥,𝑦 𝑚,𝑁,𝑥,𝑦 𝜑,𝑑,𝑚,𝑥 𝑆,𝑑,𝑚,𝑥,𝑦 𝑈,𝑚,𝑥 𝑥,𝑊 𝑚,𝑍,𝑥,𝑦 𝐷,𝑚,𝑥,𝑦 𝐿,𝑎,𝑑,𝑚,𝑥,𝑦 𝑋,𝑎,𝑑,𝑚,𝑥,𝑦 𝑚,𝐹 Allowed substitution hints: 𝜑(𝑦, 𝑎) 𝐶(𝑎) 𝐷(𝑎, 𝑑) 𝑆(𝑎) 𝑈(𝑦, 𝑎, 𝑑) 1 (𝑎, 𝑑) 𝐹(𝑎) 𝐺(𝑥, 𝑦, 𝑚, 𝑎, 𝑑) 𝐻(𝑥, 𝑦, 𝑚, 𝑎, 𝑑) 𝑁(𝑎, 𝑑) 𝑊(𝑦, 𝑚, 𝑎, 𝑑) 𝑍(𝑎, 𝑑)

Proof of Theorem dchrisum0lem2a Dummy variables 𝑤 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fzfid 14116	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (1...(⌊‘𝑥)) ∈ Fin)
2		simpl 488	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝜑)
3		elfznn 13687	. . . . 5 ⊢ (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℕ)
4		rpvmasum2.g	. . . . . . 7 ⊢ 𝐺 = (DChr‘𝑁)
5		rpvmasum.z	. . . . . . 7 ⊢ 𝑍 = (ℤ/nℤ‘𝑁)
6		rpvmasum2.d	. . . . . . 7 ⊢ 𝐷 = (Base‘𝐺)
7		rpvmasum.l	. . . . . . 7 ⊢ 𝐿 = (ℤRHom‘𝑍)
8		rpvmasum2.w	. . . . . . . . . . 11 ⊢ 𝑊 = {𝑦 ∈ (𝐷 ∖ { 1 }) ∣ Σ𝑚 ∈ ℕ ((𝑦‘(𝐿‘𝑚)) / 𝑚) = 0}
9	8	ssrab3 4007	. . . . . . . . . 10 ⊢ 𝑊 ⊆ (𝐷 ∖ { 1 })
10		dchrisum0.b	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ 𝑊)
11	9, 10	sselid 3906	. . . . . . . . 9 ⊢ (𝜑 → 𝑋 ∈ (𝐷 ∖ { 1 }))
12	11	eldifad 4051	. . . . . . . 8 ⊢ (𝜑 → 𝑋 ∈ 𝐷)
13	12	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → 𝑋 ∈ 𝐷)
14		nnz 12714	. . . . . . . 8 ⊢ (𝑚 ∈ ℕ → 𝑚 ∈ ℤ)
15	14	adantl 487	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℤ)
16	4, 5, 6, 7, 13, 15	dchrzrhcl 27572	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑋‘(𝐿‘𝑚)) ∈ ℂ)
17		nnrp 13132	. . . . . . . . 9 ⊢ (𝑚 ∈ ℕ → 𝑚 ∈ ℝ⁺)
18	17	adantl 487	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℝ⁺)
19	18	rpsqrtcld 15579	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (√‘𝑚) ∈ ℝ⁺)
20	19	rpcnd 13166	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (√‘𝑚) ∈ ℂ)
21	19	rpne0d 13169	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (√‘𝑚) ≠ 0)
22	16, 20, 21	divcld 12093	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
23	2, 3, 22	syl2an 608	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
24	1, 23	fsumcl 15899	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
25		dchrisum0lem2.u	. . . . 5 ⊢ (𝜑 → 𝐻 ⇝_𝑟 𝑈)
26		rlimcl 15670	. . . . 5 ⊢ (𝐻 ⇝_𝑟 𝑈 → 𝑈 ∈ ℂ)
27	25, 26	syl 18	. . . 4 ⊢ (𝜑 → 𝑈 ∈ ℂ)
28	27	adantr 486	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝑈 ∈ ℂ)
29		0xr 11356	. . . . . . . . 9 ⊢ 0 ∈ ℝ^*
30		0lt1 11838	. . . . . . . . 9 ⊢ 0 < 1
31		df-ioo 13480	. . . . . . . . . 10 ⊢ (,) = (𝑥 ∈ ℝ^, 𝑦 ∈ ℝ^ ↦ {𝑧 ∈ ℝ^* ∣ (𝑥 < 𝑧 ∧ 𝑧 < 𝑦)})
32		df-ico 13482	. . . . . . . . . 10 ⊢ [,) = (𝑥 ∈ ℝ^, 𝑦 ∈ ℝ^ ↦ {𝑧 ∈ ℝ^* ∣ (𝑥 ≤ 𝑧 ∧ 𝑧 < 𝑦)})
33		xrltletr 13286	. . . . . . . . . 10 ⊢ ((0 ∈ ℝ^* ∧ 1 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^*) → ((0 < 1 ∧ 1 ≤ 𝑤) → 0 < 𝑤))
34	31, 32, 33	ixxss1 13494	. . . . . . . . 9 ⊢ ((0 ∈ ℝ^* ∧ 0 < 1) → (1[,)+∞) ⊆ (0(,)+∞))
35	29, 30, 34	mp2an 705	. . . . . . . 8 ⊢ (1[,)+∞) ⊆ (0(,)+∞)
36		ioorp 13556	. . . . . . . 8 ⊢ (0(,)+∞) = ℝ⁺
37	35, 36	sseqtri 3956	. . . . . . 7 ⊢ (1[,)+∞) ⊆ ℝ⁺
38		resmpt 6028	. . . . . . 7 ⊢ ((1[,)+∞) ⊆ ℝ⁺ → ((𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ↾ (1[,)+∞)) = (𝑥 ∈ (1[,)+∞) ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))))
39	37, 38	ax-mp 5	. . . . . 6 ⊢ ((𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ↾ (1[,)+∞)) = (𝑥 ∈ (1[,)+∞) ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
40	37	sseli 3904	. . . . . . . . 9 ⊢ (𝑥 ∈ (1[,)+∞) → 𝑥 ∈ ℝ⁺)
41	3	adantl 487	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℕ)
42		2fveq3 6890	. . . . . . . . . . . 12 ⊢ (𝑎 = 𝑚 → (𝑋‘(𝐿‘𝑎)) = (𝑋‘(𝐿‘𝑚)))
43		fveq2 6885	. . . . . . . . . . . 12 ⊢ (𝑎 = 𝑚 → (√‘𝑎) = (√‘𝑚))
44	42, 43	oveq12d 7438	. . . . . . . . . . 11 ⊢ (𝑎 = 𝑚 → ((𝑋‘(𝐿‘𝑎)) / (√‘𝑎)) = ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
45		dchrisum0lem1.f	. . . . . . . . . . 11 ⊢ 𝐹 = (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) / (√‘𝑎)))
46		ovex 7453	. . . . . . . . . . 11 ⊢ ((𝑋‘(𝐿‘𝑎)) / (√‘𝑎)) ∈ V
47	44, 45, 46	fvmpt3i 6999	. . . . . . . . . 10 ⊢ (𝑚 ∈ ℕ → (𝐹‘𝑚) = ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
48	41, 47	syl 18	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐹‘𝑚) = ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
49	40, 48	sylanl2 694	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (1[,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐹‘𝑚) = ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
50		1re 11308	. . . . . . . . . . . 12 ⊢ 1 ∈ ℝ
51		elicopnf 13576	. . . . . . . . . . . 12 ⊢ (1 ∈ ℝ → (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥)))
52	50, 51	ax-mp 5	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (1[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 1 ≤ 𝑥))
53		flge1nn 13961	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ ℝ ∧ 1 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ)
54	52, 53	sylbi 220	. . . . . . . . . 10 ⊢ (𝑥 ∈ (1[,)+∞) → (⌊‘𝑥) ∈ ℕ)
55	54	adantl 487	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1[,)+∞)) → (⌊‘𝑥) ∈ ℕ)
56		nnuz 13004	. . . . . . . . 9 ⊢ ℕ = (ℤ_≥‘1)
57	55, 56	eleqtrdi 2870	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1[,)+∞)) → (⌊‘𝑥) ∈ (ℤ_≥‘1))
58	40, 23	sylanl2 694	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (1[,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) ∈ ℂ)
59	49, 57, 58	fsumser 15896	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1[,)+∞)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) = (seq1( + , 𝐹)‘(⌊‘𝑥)))
60	59	mpteq2dva 5197	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (1[,)+∞) ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) = (𝑥 ∈ (1[,)+∞) ↦ (seq1( + , 𝐹)‘(⌊‘𝑥))))
61	39, 60	eqtrid 2807	. . . . 5 ⊢ (𝜑 → ((𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ↾ (1[,)+∞)) = (𝑥 ∈ (1[,)+∞) ↦ (seq1( + , 𝐹)‘(⌊‘𝑥))))
62		fveq2 6885	. . . . . . 7 ⊢ (𝑚 = (⌊‘𝑥) → (seq1( + , 𝐹)‘𝑚) = (seq1( + , 𝐹)‘(⌊‘𝑥)))
63		rpssre 13128	. . . . . . . . 9 ⊢ ℝ⁺ ⊆ ℝ
64	63	a1i 11	. . . . . . . 8 ⊢ (𝜑 → ℝ⁺ ⊆ ℝ)
65	37, 64	sstrid 3919	. . . . . . 7 ⊢ (𝜑 → (1[,)+∞) ⊆ ℝ)
66		1zzd 12727	. . . . . . 7 ⊢ (𝜑 → 1 ∈ ℤ)
67	44	cbvmptv 5208	. . . . . . . . . . . . 13 ⊢ (𝑎 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑎)) / (√‘𝑎))) = (𝑚 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
68	45, 67	eqtri 2783	. . . . . . . . . . . 12 ⊢ 𝐹 = (𝑚 ∈ ℕ ↦ ((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)))
69	22, 68	fmptd 7114	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹:ℕ⟶ℂ)
70	69	ffvelcdmda 7084	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝐹‘𝑚) ∈ ℂ)
71	56, 66, 70	serf 14173	. . . . . . . . 9 ⊢ (𝜑 → seq1( + , 𝐹):ℕ⟶ℂ)
72	71	feqmptd 6953	. . . . . . . 8 ⊢ (𝜑 → seq1( + , 𝐹) = (𝑚 ∈ ℕ ↦ (seq1( + , 𝐹)‘𝑚)))
73		dchrisum0.s	. . . . . . . 8 ⊢ (𝜑 → seq1( + , 𝐹) ⇝ 𝑆)
74	72, 73	eqbrtrrd 5128	. . . . . . 7 ⊢ (𝜑 → (𝑚 ∈ ℕ ↦ (seq1( + , 𝐹)‘𝑚)) ⇝ 𝑆)
75	71	ffvelcdmda 7084	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (seq1( + , 𝐹)‘𝑚) ∈ ℂ)
76	52	simprbi 503	. . . . . . . 8 ⊢ (𝑥 ∈ (1[,)+∞) → 1 ≤ 𝑥)
77	76	adantl 487	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1[,)+∞)) → 1 ≤ 𝑥)
78	56, 62, 65, 66, 74, 75, 77	climrlim2 15714	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (1[,)+∞) ↦ (seq1( + , 𝐹)‘(⌊‘𝑥))) ⇝_𝑟 𝑆)
79		rlimo1 15784	. . . . . 6 ⊢ ((𝑥 ∈ (1[,)+∞) ↦ (seq1( + , 𝐹)‘(⌊‘𝑥))) ⇝_𝑟 𝑆 → (𝑥 ∈ (1[,)+∞) ↦ (seq1( + , 𝐹)‘(⌊‘𝑥))) ∈ 𝑂(1))
80	78, 79	syl 18	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (1[,)+∞) ↦ (seq1( + , 𝐹)‘(⌊‘𝑥))) ∈ 𝑂(1))
81	61, 80	eqeltrd 2860	. . . 4 ⊢ (𝜑 → ((𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ↾ (1[,)+∞)) ∈ 𝑂(1))
82	24	fmpttd 7115	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))):ℝ⁺⟶ℂ)
83		1red 11309	. . . . 5 ⊢ (𝜑 → 1 ∈ ℝ)
84	82, 64, 83	o1resb 15733	. . . 4 ⊢ (𝜑 → ((𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ∈ 𝑂(1) ↔ ((𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ↾ (1[,)+∞)) ∈ 𝑂(1)))
85	81, 84	mpbird 260	. . 3 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ∈ 𝑂(1))
86		o1const 15787	. . . 4 ⊢ ((ℝ⁺ ⊆ ℝ ∧ 𝑈 ∈ ℂ) → (𝑥 ∈ ℝ⁺ ↦ 𝑈) ∈ 𝑂(1))
87	63, 27, 86	sylancr 599	. . 3 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ 𝑈) ∈ 𝑂(1))
88	24, 28, 85, 87	o1mul2 15792	. 2 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈)) ∈ 𝑂(1))
89		simpr 490	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝑥 ∈ ℝ⁺)
90		2z 12728	. . . . . . . . 9 ⊢ 2 ∈ ℤ
91		rpexpcl 14223	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℝ⁺ ∧ 2 ∈ ℤ) → (𝑥↑2) ∈ ℝ⁺)
92	89, 90, 91	sylancl 598	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥↑2) ∈ ℝ⁺)
93	3	nnrpd 13162	. . . . . . . 8 ⊢ (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℝ⁺)
94		rpdivcl 13147	. . . . . . . 8 ⊢ (((𝑥↑2) ∈ ℝ⁺ ∧ 𝑚 ∈ ℝ⁺) → ((𝑥↑2) / 𝑚) ∈ ℝ⁺)
95	92, 93, 94	syl2an 608	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝑥↑2) / 𝑚) ∈ ℝ⁺)
96		dchrisum0lem2.h	. . . . . . . . 9 ⊢ 𝐻 = (𝑦 ∈ ℝ⁺ ↦ (Σ𝑑 ∈ (1...(⌊‘𝑦))(1 / (√‘𝑑)) − (2 · (√‘𝑦))))
97	96	divsqrsumf 27308	. . . . . . . 8 ⊢ 𝐻:ℝ⁺⟶ℝ
98	97	ffvelcdmi 7083	. . . . . . 7 ⊢ (((𝑥↑2) / 𝑚) ∈ ℝ⁺ → (𝐻‘((𝑥↑2) / 𝑚)) ∈ ℝ)
99	95, 98	syl 18	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐻‘((𝑥↑2) / 𝑚)) ∈ ℝ)
100	99	recnd 11337	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐻‘((𝑥↑2) / 𝑚)) ∈ ℂ)
101	23, 100	mulcld 11329	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) ∈ ℂ)
102	1, 101	fsumcl 15899	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) ∈ ℂ)
103	24, 28	mulcld 11329	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈) ∈ ℂ)
104	25	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝐻 ⇝_𝑟 𝑈)
105	104, 26	syl 18	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑈 ∈ ℂ)
106	23, 105	mulcld 11329	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈) ∈ ℂ)
107	1, 101, 106	fsumsub 15954	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))((((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) − (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈)) = (Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) − Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈)))
108	23, 100, 105	subdid 11772	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈)) = ((((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) − (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈)))
109	108	sumeq2dv 15869	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈)) = Σ𝑚 ∈ (1...(⌊‘𝑥))((((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) − (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈)))
110	1, 28, 23	fsummulc1 15951	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈) = Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈))
111	110	oveq2d 7436	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) − (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈)) = (Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) − Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈)))
112	107, 109, 111	3eqtr4d 2805	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈)) = (Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) − (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈)))
113	112	mpteq2dva 5197	. . . 4 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) = (𝑥 ∈ ℝ⁺ ↦ (Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) − (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈))))
114	100, 105	subcld 11669	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈) ∈ ℂ)
115	23, 114	mulcld 11329	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈)) ∈ ℂ)
116	1, 115	fsumcl 15899	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈)) ∈ ℂ)
117	116	abscld 15606	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ∈ ℝ)
118	115	abscld 15606	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ∈ ℝ)
119	1, 118	fsumrecl 15900	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))(abs‘(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ∈ ℝ)
120		1red 11309	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 1 ∈ ℝ)
121	1, 115	fsumabs 15968	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ≤ Σ𝑚 ∈ (1...(⌊‘𝑥))(abs‘(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))))
122		rprege0 13136	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ ℝ⁺ → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
123	122	adantl 487	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
124	123	simpld 500	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝑥 ∈ ℝ)
125		reflcl 13936	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℝ → (⌊‘𝑥) ∈ ℝ)
126	124, 125	syl 18	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (⌊‘𝑥) ∈ ℝ)
127	126, 89	rerpdivcld 13195	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((⌊‘𝑥) / 𝑥) ∈ ℝ)
128		simplr 781	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ⁺)
129	128	rprecred 13175	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1 / 𝑥) ∈ ℝ)
130	23	abscld 15606	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ∈ ℝ)
131	93	rpsqrtcld 15579	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ (1...(⌊‘𝑥)) → (√‘𝑚) ∈ ℝ⁺)
132	131	adantl 487	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ∈ ℝ⁺)
133	132	rprecred 13175	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1 / (√‘𝑚)) ∈ ℝ)
134	114	abscld 15606	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈)) ∈ ℝ)
135	132, 128	rpdivcld 13181	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) / 𝑥) ∈ ℝ⁺)
136	63, 135	sselid 3906	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) / 𝑥) ∈ ℝ)
137	23	absge0d 15614	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 0 ≤ (abs‘((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))))
138	114	absge0d 15614	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 0 ≤ (abs‘((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈)))
139	2, 3, 16	syl2an 608	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑋‘(𝐿‘𝑚)) ∈ ℂ)
140	132	rpcnd 13166	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ∈ ℂ)
141	132	rpne0d 13169	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘𝑚) ≠ 0)
142	139, 140, 141	absdivd 15625	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) = ((abs‘(𝑋‘(𝐿‘𝑚))) / (abs‘(√‘𝑚))))
143	132	rprege0d 13171	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) ∈ ℝ ∧ 0 ≤ (√‘𝑚)))
144		absid 15463	. . . . . . . . . . . . . . . 16 ⊢ (((√‘𝑚) ∈ ℝ ∧ 0 ≤ (√‘𝑚)) → (abs‘(√‘𝑚)) = (√‘𝑚))
145	143, 144	syl 18	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘(√‘𝑚)) = (√‘𝑚))
146	145	oveq2d 7436	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑋‘(𝐿‘𝑚))) / (abs‘(√‘𝑚))) = ((abs‘(𝑋‘(𝐿‘𝑚))) / (√‘𝑚)))
147	142, 146	eqtrd 2795	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) = ((abs‘(𝑋‘(𝐿‘𝑚))) / (√‘𝑚)))
148	139	abscld 15606	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑋‘(𝐿‘𝑚))) ∈ ℝ)
149		1red 11309	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℝ)
150		eqid 2760	. . . . . . . . . . . . . . 15 ⊢ (Base‘𝑍) = (Base‘𝑍)
151	12	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑋 ∈ 𝐷)
152		rpvmasum.a	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝑁 ∈ ℕ)
153	152	nnnn0d 12667	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
154	5, 150, 7	znzrhfo 21853	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 ∈ ℕ₀ → 𝐿:ℤ–onto→(Base‘𝑍))
155		fof 6796	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐿:ℤ–onto→(Base‘𝑍) → 𝐿:ℤ⟶(Base‘𝑍))
156	153, 154, 155	3syl 19	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐿:ℤ⟶(Base‘𝑍))
157	156	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝐿:ℤ⟶(Base‘𝑍))
158		elfzelz 13656	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℤ)
159		ffvelcdm 7081	. . . . . . . . . . . . . . . 16 ⊢ ((𝐿:ℤ⟶(Base‘𝑍) ∧ 𝑚 ∈ ℤ) → (𝐿‘𝑚) ∈ (Base‘𝑍))
160	157, 158, 159	syl2an 608	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝐿‘𝑚) ∈ (Base‘𝑍))
161	4, 6, 5, 150, 151, 160	dchrabs2 27589	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑋‘(𝐿‘𝑚))) ≤ 1)
162	148, 149, 132, 161	lediv1dd 13222	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑋‘(𝐿‘𝑚))) / (√‘𝑚)) ≤ (1 / (√‘𝑚)))
163	147, 162	eqbrtrd 5126	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) ≤ (1 / (√‘𝑚)))
164	96, 104	divsqrtsum2 27310	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ ((𝑥↑2) / 𝑚) ∈ ℝ⁺) → (abs‘((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈)) ≤ (1 / (√‘((𝑥↑2) / 𝑚))))
165	95, 164	mpdan 700	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈)) ≤ (1 / (√‘((𝑥↑2) / 𝑚))))
166	92	rprege0d 13171	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((𝑥↑2) ∈ ℝ ∧ 0 ≤ (𝑥↑2)))
167		sqrtdiv 15432	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑥↑2) ∈ ℝ ∧ 0 ≤ (𝑥↑2)) ∧ 𝑚 ∈ ℝ⁺) → (√‘((𝑥↑2) / 𝑚)) = ((√‘(𝑥↑2)) / (√‘𝑚)))
168	166, 93, 167	syl2an 608	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) = ((√‘(𝑥↑2)) / (√‘𝑚)))
169	122	ad2antlr 740	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
170		sqrtsq 15436	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (√‘(𝑥↑2)) = 𝑥)
171	169, 170	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘(𝑥↑2)) = 𝑥)
172	171	oveq1d 7435	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘(𝑥↑2)) / (√‘𝑚)) = (𝑥 / (√‘𝑚)))
173	168, 172	eqtrd 2795	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (√‘((𝑥↑2) / 𝑚)) = (𝑥 / (√‘𝑚)))
174	173	oveq2d 7436	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1 / (√‘((𝑥↑2) / 𝑚))) = (1 / (𝑥 / (√‘𝑚))))
175		rpcnne0 13139	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℝ⁺ → (𝑥 ∈ ℂ ∧ 𝑥 ≠ 0))
176	175	ad2antlr 740	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (𝑥 ∈ ℂ ∧ 𝑥 ≠ 0))
177	132	rpcnne0d 13173	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0))
178		recdiv 12023	. . . . . . . . . . . . . . 15 ⊢ (((𝑥 ∈ ℂ ∧ 𝑥 ≠ 0) ∧ ((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0)) → (1 / (𝑥 / (√‘𝑚))) = ((√‘𝑚) / 𝑥))
179	176, 177, 178	syl2anc 596	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1 / (𝑥 / (√‘𝑚))) = ((√‘𝑚) / 𝑥))
180	174, 179	eqtrd 2795	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1 / (√‘((𝑥↑2) / 𝑚))) = ((√‘𝑚) / 𝑥))
181	165, 180	breqtrd 5130	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈)) ≤ ((√‘𝑚) / 𝑥))
182	130, 133, 134, 136, 137, 138, 163, 181	lemul12ad 12259	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((abs‘((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) · (abs‘((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ≤ ((1 / (√‘𝑚)) · ((√‘𝑚) / 𝑥)))
183	23, 114	absmuld 15624	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) = ((abs‘((𝑋‘(𝐿‘𝑚)) / (√‘𝑚))) · (abs‘((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))))
184		1cnd 11302	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℂ)
185		dmdcan 12027	. . . . . . . . . . . . 13 ⊢ ((((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0) ∧ (𝑥 ∈ ℂ ∧ 𝑥 ≠ 0) ∧ 1 ∈ ℂ) → (((√‘𝑚) / 𝑥) · (1 / (√‘𝑚))) = (1 / 𝑥))
186	177, 176, 184, 185	syl3anc 1398	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((√‘𝑚) / 𝑥) · (1 / (√‘𝑚))) = (1 / 𝑥))
187	135	rpcnd 13166	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((√‘𝑚) / 𝑥) ∈ ℂ)
188		reccl 11981	. . . . . . . . . . . . . 14 ⊢ (((√‘𝑚) ∈ ℂ ∧ (√‘𝑚) ≠ 0) → (1 / (√‘𝑚)) ∈ ℂ)
189	177, 188	syl 18	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1 / (√‘𝑚)) ∈ ℂ)
190	187, 189	mulcomd 11330	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (((√‘𝑚) / 𝑥) · (1 / (√‘𝑚))) = ((1 / (√‘𝑚)) · ((√‘𝑚) / 𝑥)))
191	186, 190	eqtr3d 2797	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1 / 𝑥) = ((1 / (√‘𝑚)) · ((√‘𝑚) / 𝑥)))
192	182, 183, 191	3brtr4d 5136	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ⁺) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (abs‘(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ≤ (1 / 𝑥))
193	1, 118, 129, 192	fsumle 15966	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))(abs‘(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ≤ Σ𝑚 ∈ (1...(⌊‘𝑥))(1 / 𝑥))
194		flge0nn0 13960	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ₀)
195		hashfz1 14490	. . . . . . . . . . . 12 ⊢ ((⌊‘𝑥) ∈ ℕ₀ → (♯‘(1...(⌊‘𝑥))) = (⌊‘𝑥))
196	123, 194, 195	3syl 19	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (♯‘(1...(⌊‘𝑥))) = (⌊‘𝑥))
197	196	oveq1d 7435	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((♯‘(1...(⌊‘𝑥))) · (1 / 𝑥)) = ((⌊‘𝑥) · (1 / 𝑥)))
198	89	rpreccld 13174	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (1 / 𝑥) ∈ ℝ⁺)
199	198	rpcnd 13166	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (1 / 𝑥) ∈ ℂ)
200		fsumconst 15956	. . . . . . . . . . 11 ⊢ (((1...(⌊‘𝑥)) ∈ Fin ∧ (1 / 𝑥) ∈ ℂ) → Σ𝑚 ∈ (1...(⌊‘𝑥))(1 / 𝑥) = ((♯‘(1...(⌊‘𝑥))) · (1 / 𝑥)))
201	1, 199, 200	syl2anc 596	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))(1 / 𝑥) = ((♯‘(1...(⌊‘𝑥))) · (1 / 𝑥)))
202	126	recnd 11337	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (⌊‘𝑥) ∈ ℂ)
203	175	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥 ∈ ℂ ∧ 𝑥 ≠ 0))
204	203	simpld 500	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝑥 ∈ ℂ)
205	203	simprd 501	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝑥 ≠ 0)
206	202, 204, 205	divrecd 12096	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((⌊‘𝑥) / 𝑥) = ((⌊‘𝑥) · (1 / 𝑥)))
207	197, 201, 206	3eqtr4d 2805	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))(1 / 𝑥) = ((⌊‘𝑥) / 𝑥))
208	193, 207	breqtrd 5130	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))(abs‘(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ≤ ((⌊‘𝑥) / 𝑥))
209		flle 13939	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℝ → (⌊‘𝑥) ≤ 𝑥)
210	124, 209	syl 18	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (⌊‘𝑥) ≤ 𝑥)
211	124	recnd 11337	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → 𝑥 ∈ ℂ)
212	211	mulridd 11326	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥 · 1) = 𝑥)
213	210, 212	breqtrrd 5132	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (⌊‘𝑥) ≤ (𝑥 · 1))
214		rpregt0 13135	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℝ⁺ → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
215	214	adantl 487	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
216		ledivmul 12193	. . . . . . . . . 10 ⊢ (((⌊‘𝑥) ∈ ℝ ∧ 1 ∈ ℝ ∧ (𝑥 ∈ ℝ ∧ 0 < 𝑥)) → (((⌊‘𝑥) / 𝑥) ≤ 1 ↔ (⌊‘𝑥) ≤ (𝑥 · 1)))
217	126, 120, 215, 216	syl3anc 1398	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (((⌊‘𝑥) / 𝑥) ≤ 1 ↔ (⌊‘𝑥) ≤ (𝑥 · 1)))
218	213, 217	mpbird 260	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → ((⌊‘𝑥) / 𝑥) ≤ 1)
219	119, 127, 120, 208, 218	letrd 11467	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → Σ𝑚 ∈ (1...(⌊‘𝑥))(abs‘(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ≤ 1)
220	117, 119, 120, 121, 219	letrd 11467	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ⁺) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ≤ 1)
221	220	adantrr 730	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ ℝ⁺ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ≤ 1)
222	64, 116, 83, 83, 221	elo1d 15703	. . . 4 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · ((𝐻‘((𝑥↑2) / 𝑚)) − 𝑈))) ∈ 𝑂(1))
223	113, 222	eqeltrrd 2861	. . 3 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ (Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚))) − (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈))) ∈ 𝑂(1))
224	102, 103, 223	o1dif 15797	. 2 ⊢ (𝜑 → ((𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚)))) ∈ 𝑂(1) ↔ (𝑥 ∈ ℝ⁺ ↦ (Σ𝑚 ∈ (1...(⌊‘𝑥))((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · 𝑈)) ∈ 𝑂(1)))
225	88, 224	mpbird 260	1 ⊢ (𝜑 → (𝑥 ∈ ℝ⁺ ↦ Σ𝑚 ∈ (1...(⌊‘𝑥))(((𝑋‘(𝐿‘𝑚)) / (√‘𝑚)) · (𝐻‘((𝑥↑2) / 𝑚)))) ∈ 𝑂(1))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 = wceq 1569 ∈ wcel 2144 ≠ wne 2955 ∀wral 3076 {crab 3412 ⊆ wss 3895 ∖ cdif 4045 {csn 4583 class class class wbr 5102 ↦ cmpt 5185 ↾ cres 5652 ⟶wf 6534 –onto→wfo 6536 ‘cfv 6538 (class class class)co 7420 Fincfn 8973 ℂcc 11198 ℝcr 11199 0cc0 11200 1c1 11201 + caddc 11203 · cmul 11205 +∞cpnf 11340 ℝ^*cxr 11342 < clt 11343 ≤ cle 11344 − cmin 11541 / cdiv 11973 ℕcn 12335 2c2 12397 ℕ₀cn0 12606 ℤcz 12693 ℤ_≥cuz 12965 ℝ⁺crp 13120 (,)cioo 13476 [,)cico 13478 ...cfz 13639 ⌊cfl 13930 seqcseq 14144 ↑cexp 14204 ♯chash 14474 √csqrt 15400 abscabs 15401 ⇝ cli 15651 ⇝_𝑟 crli 15652 𝑂(1)co1 15653 Σcsu 15853 Basecbs 17387 0_gc0g 17610 ℤRHomczrh 21805 ℤ/nℤczn 21808 DChrcdchr 27559

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1827 ax-4 1841 ax-5 1942 ax-6 1999 ax-7 2040 ax-8 2146 ax-9 2154 ax-10 2177 ax-11 2193 ax-12 2212 ax-ext 2732 ax-rep 5231 ax-sep 5248 ax-nul 5259 ax-pow 5326 ax-pr 5390 ax-un 7751 ax-inf2 9642 ax-cnex 11256 ax-resscn 11257 ax-1cn 11258 ax-icn 11259 ax-addcl 11260 ax-addrcl 11261 ax-mulcl 11262 ax-mulrcl 11263 ax-mulcom 11264 ax-addass 11265 ax-mulass 11266 ax-distr 11267 ax-i2m1 11268 ax-1ne0 11269 ax-1rid 11270 ax-rnegex 11271 ax-rrecex 11272 ax-cnre 11273 ax-pre-lttri 11274 ax-pre-lttrn 11275 ax-pre-ltadd 11276 ax-pre-mulgt0 11277 ax-pre-sup 11278 ax-addf 11279 ax-mulf 11280

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1572 df-fal 1582 df-ex 1812 df-nf 1816 df-sb 2099 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3365 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3739 df-csb 3847 df-ss 3896 df-pss 4014 df-dif 4047 df-in 4091 df-un 4151 df-nul 4279 df-if 4482 df-pw 4558 df-sn 4584 df-pr 4586 df-tp 4588 df-op 4590 df-uni 4867 df-int 4907 df-iun 4952 df-iin 4953 df-disj 5070 df-br 5103 df-opab 5167 df-mpt 5186 df-tr 5212 df-id 5545 df-eprel 5550 df-po 5558 df-so 5559 df-fr 5603 df-se 5604 df-we 5605 df-xp 5656 df-rel 5657 df-cnv 5658 df-co 5659 df-dm 5660 df-rn 5661 df-res 5662 df-ima 5663 df-pred 6304 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6494 df-fun 6540 df-fn 6541 df-f 6542 df-f1 6543 df-fo 6544 df-f1o 6545 df-fv 6546 df-isom 6547 df-riota 7377 df-ov 7423 df-oprab 7424 df-mpo 7425 df-of 7693 df-om 7878 df-1st 8001 df-2nd 8002 df-supp 8178 df-tpos 8243 df-frecs 8299 df-wrecs 8330 df-recs 8379 df-rdg 8418 df-1o 8476 df-2o 8477 df-oadd 8480 df-omul 8481 df-er 8717 df-ec 8719 df-qs 8723 df-map 8849 df-pm 8850 df-ixp 8926 df-en 8974 df-dom 8975 df-sdom 8976 df-fin 8977 df-fsupp 9354 df-fi 9403 df-sup 9434 df-inf 9435 df-oi 9504 df-card 10020 df-acn 10023 df-pnf 11345 df-mnf 11346 df-xr 11347 df-ltxr 11348 df-le 11349 df-sub 11543 df-neg 11544 df-div 11974 df-nn 12336 df-2 12405 df-3 12406 df-4 12407 df-5 12408 df-6 12409 df-7 12410 df-8 12411 df-9 12412 df-n0 12607 df-z 12694 df-dec 12815 df-uz 12966 df-q 13076 df-rp 13121 df-xneg 13241 df-xadd 13242 df-xmul 13243 df-ioo 13480 df-ioc 13481 df-ico 13482 df-icc 13483 df-fz 13640 df-fzo 13789 df-fl 13932 df-mod 14010 df-seq 14145 df-exp 14205 df-fac 14418 df-bc 14447 df-hash 14475 df-shft 15220 df-cj 15266 df-re 15267 df-im 15268 df-sqrt 15402 df-abs 15403 df-limsup 15638 df-clim 15655 df-rlim 15656 df-o1 15657 df-lo1 15658 df-sum 15854 df-ef 16233 df-sin 16235 df-cos 16236 df-pi 16238 df-dvds 16423 df-struct 17325 df-sets 17342 df-slot 17360 df-ndx 17372 df-base 17388 df-ress 17409 df-plusg 17441 df-mulr 17442 df-starv 17443 df-sca 17444 df-vsca 17445 df-ip 17446 df-tset 17447 df-ple 17448 df-ds 17450 df-unif 17451 df-hom 17452 df-cco 17453 df-rest 17593 df-topn 17594 df-0g 17612 df-gsum 17613 df-topgen 17614 df-pt 17615 df-prds 17618 df-xrs 17674 df-qtop 17679 df-imas 17680 df-qus 17681 df-xps 17682 df-mre 17756 df-mrc 17757 df-acs 17759 df-mgm 18816 df-sgrp 18908 df-mnd 18924 df-mhm 18978 df-submnd 18979 df-grp 19147 df-minusg 19148 df-sbg 19149 df-mulg 19278 df-subg 19333 df-nsg 19334 df-eqg 19335 df-ghm 19428 df-cntz 19531 df-od 19742 df-cmn 19996 df-abl 19997 df-mgp 20361 df-rng 20375 df-ur 20408 df-ring 20461 df-cring 20462 df-oppr 20567 df-dvdsr 20587 df-unit 20588 df-invr 20618 df-dvr 20631 df-rhm 20702 df-subrng 20798 df-subrg 20822 df-drng 20982 df-lmod 21137 df-lss 21207 df-lsp 21247 df-sra 21448 df-rgmod 21449 df-lidl 21486 df-rsp 21487 df-2idl 21543 df-psmet 21670 df-xmet 21671 df-met 21672 df-bl 21673 df-mopn 21674 df-fbas 21675 df-fg 21676 df-cnfld 21679 df-zring 21753 df-zrh 21809 df-zn 21812 df-top 23212 df-topon 23229 df-topsp 23251 df-bases 23264 df-cld 23337 df-ntr 23338 df-cls 23339 df-nei 23416 df-lp 23454 df-perf 23455 df-cn 23545 df-cnp 23546 df-haus 23633 df-cmp 23705 df-tx 23881 df-hmeo 24074 df-fil 24165 df-fm 24257 df-flim 24258 df-flf 24259 df-xms 24639 df-ms 24640 df-tms 24641 df-cncf 25199 df-limc 26186 df-dv 26187 df-log 26884 df-cxp 26885 df-dchr 27560

This theorem is used by: dchrisum0lem2 27845

W3C validator