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

Theorem dchrisum0lem1b 27008
Description: Lemma for dchrisum0lem1 27009. (Contributed by Mario Carneiro, 7-Jun-2016.)
Hypotheses
Ref Expression
rpvmasum.z 𝑍 = (β„€/nβ„€β€˜π‘)
rpvmasum.l 𝐿 = (β„€RHomβ€˜π‘)
rpvmasum.a (πœ‘ β†’ 𝑁 ∈ β„•)
rpvmasum2.g 𝐺 = (DChrβ€˜π‘)
rpvmasum2.d 𝐷 = (Baseβ€˜πΊ)
rpvmasum2.1 1 = (0gβ€˜πΊ)
rpvmasum2.w π‘Š = {𝑦 ∈ (𝐷 βˆ– { 1 }) ∣ Ξ£π‘š ∈ β„• ((π‘¦β€˜(πΏβ€˜π‘š)) / π‘š) = 0}
dchrisum0.b (πœ‘ β†’ 𝑋 ∈ π‘Š)
dchrisum0lem1.f 𝐹 = (π‘Ž ∈ β„• ↦ ((π‘‹β€˜(πΏβ€˜π‘Ž)) / (βˆšβ€˜π‘Ž)))
dchrisum0.c (πœ‘ β†’ 𝐢 ∈ (0[,)+∞))
dchrisum0.s (πœ‘ β†’ seq1( + , 𝐹) ⇝ 𝑆)
dchrisum0.1 (πœ‘ β†’ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘¦)) βˆ’ 𝑆)) ≀ (𝐢 / (βˆšβ€˜π‘¦)))
Assertion
Ref Expression
dchrisum0lem1b (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š))) ≀ ((2 Β· 𝐢) / (βˆšβ€˜π‘₯)))
Distinct variable groups:   π‘₯,π‘š,𝑦, 1   π‘š,𝑑,π‘₯,𝑦,𝐢   𝐹,𝑑,π‘₯,𝑦   π‘Ž,𝑑,π‘š,π‘₯,𝑦   π‘š,𝑁,π‘₯,𝑦   πœ‘,𝑑,π‘š,π‘₯   𝑆,𝑑,π‘š,π‘₯,𝑦   π‘₯,π‘Š   π‘š,𝑍,π‘₯,𝑦   𝐷,π‘š,π‘₯,𝑦   𝐿,π‘Ž,𝑑,π‘š,π‘₯,𝑦   𝑋,π‘Ž,𝑑,π‘š,π‘₯,𝑦   π‘š,𝐹
Allowed substitution hints:   πœ‘(𝑦,π‘Ž)   𝐢(π‘Ž)   𝐷(π‘Ž,𝑑)   𝑆(π‘Ž)   1 (π‘Ž,𝑑)   𝐹(π‘Ž)   𝐺(π‘₯,𝑦,π‘š,π‘Ž,𝑑)   𝑁(π‘Ž,𝑑)   π‘Š(𝑦,π‘š,π‘Ž,𝑑)   𝑍(π‘Ž,𝑑)

Proof of Theorem dchrisum0lem1b
StepHypRef Expression
1 fzfid 13935 . . . 4 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑))) ∈ Fin)
2 ssun2 4173 . . . . . . 7 (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βŠ† ((1...(βŒŠβ€˜π‘₯)) βˆͺ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑))))
3 simpr 486 . . . . . . . . . . . . 13 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ π‘₯ ∈ ℝ+)
43rprege0d 13020 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ (π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯))
5 flge0nn0 13782 . . . . . . . . . . . 12 ((π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯) β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
64, 5syl 17 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
7 nn0p1nn 12508 . . . . . . . . . . 11 ((βŒŠβ€˜π‘₯) ∈ β„•0 β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„•)
86, 7syl 17 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„•)
98adantr 482 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„•)
10 nnuz 12862 . . . . . . . . 9 β„• = (β„€β‰₯β€˜1)
119, 10eleqtrdi 2844 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ (β„€β‰₯β€˜1))
12 dchrisum0lem1a 26979 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘₯ ≀ ((π‘₯↑2) / 𝑑) ∧ (βŒŠβ€˜((π‘₯↑2) / 𝑑)) ∈ (β„€β‰₯β€˜(βŒŠβ€˜π‘₯))))
1312simprd 497 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (βŒŠβ€˜((π‘₯↑2) / 𝑑)) ∈ (β„€β‰₯β€˜(βŒŠβ€˜π‘₯)))
14 fzsplit2 13523 . . . . . . . 8 ((((βŒŠβ€˜π‘₯) + 1) ∈ (β„€β‰₯β€˜1) ∧ (βŒŠβ€˜((π‘₯↑2) / 𝑑)) ∈ (β„€β‰₯β€˜(βŒŠβ€˜π‘₯))) β†’ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑))) = ((1...(βŒŠβ€˜π‘₯)) βˆͺ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))))
1511, 13, 14syl2anc 585 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑))) = ((1...(βŒŠβ€˜π‘₯)) βˆͺ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))))
162, 15sseqtrrid 4035 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βŠ† (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑))))
1716sselda 3982 . . . . 5 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑))))
18 rpvmasum2.g . . . . . . 7 𝐺 = (DChrβ€˜π‘)
19 rpvmasum.z . . . . . . 7 𝑍 = (β„€/nβ„€β€˜π‘)
20 rpvmasum2.d . . . . . . 7 𝐷 = (Baseβ€˜πΊ)
21 rpvmasum.l . . . . . . 7 𝐿 = (β„€RHomβ€˜π‘)
22 rpvmasum2.w . . . . . . . . . . 11 π‘Š = {𝑦 ∈ (𝐷 βˆ– { 1 }) ∣ Ξ£π‘š ∈ β„• ((π‘¦β€˜(πΏβ€˜π‘š)) / π‘š) = 0}
2322ssrab3 4080 . . . . . . . . . 10 π‘Š βŠ† (𝐷 βˆ– { 1 })
24 dchrisum0.b . . . . . . . . . 10 (πœ‘ β†’ 𝑋 ∈ π‘Š)
2523, 24sselid 3980 . . . . . . . . 9 (πœ‘ β†’ 𝑋 ∈ (𝐷 βˆ– { 1 }))
2625eldifad 3960 . . . . . . . 8 (πœ‘ β†’ 𝑋 ∈ 𝐷)
2726ad3antrrr 729 . . . . . . 7 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ 𝑋 ∈ 𝐷)
28 elfzelz 13498 . . . . . . . 8 (π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑))) β†’ π‘š ∈ β„€)
2928adantl 483 . . . . . . 7 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ π‘š ∈ β„€)
3018, 19, 20, 21, 27, 29dchrzrhcl 26738 . . . . . 6 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ (π‘‹β€˜(πΏβ€˜π‘š)) ∈ β„‚)
31 elfznn 13527 . . . . . . . . . 10 (π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑))) β†’ π‘š ∈ β„•)
3231adantl 483 . . . . . . . . 9 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ π‘š ∈ β„•)
3332nnrpd 13011 . . . . . . . 8 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ π‘š ∈ ℝ+)
3433rpsqrtcld 15355 . . . . . . 7 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ (βˆšβ€˜π‘š) ∈ ℝ+)
3534rpcnd 13015 . . . . . 6 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ (βˆšβ€˜π‘š) ∈ β„‚)
3634rpne0d 13018 . . . . . 6 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ (βˆšβ€˜π‘š) β‰  0)
3730, 35, 36divcld 11987 . . . . 5 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ ((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) ∈ β„‚)
3817, 37syldan 592 . . . 4 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ ((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) ∈ β„‚)
391, 38fsumcl 15676 . . 3 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) ∈ β„‚)
4039abscld 15380 . 2 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š))) ∈ ℝ)
41 1zzd 12590 . . . . . . . 8 (πœ‘ β†’ 1 ∈ β„€)
4226adantr 482 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘š ∈ β„•) β†’ 𝑋 ∈ 𝐷)
43 nnz 12576 . . . . . . . . . . . . 13 (π‘š ∈ β„• β†’ π‘š ∈ β„€)
4443adantl 483 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘š ∈ β„•) β†’ π‘š ∈ β„€)
4518, 19, 20, 21, 42, 44dchrzrhcl 26738 . . . . . . . . . . 11 ((πœ‘ ∧ π‘š ∈ β„•) β†’ (π‘‹β€˜(πΏβ€˜π‘š)) ∈ β„‚)
46 nnrp 12982 . . . . . . . . . . . . . 14 (π‘š ∈ β„• β†’ π‘š ∈ ℝ+)
4746adantl 483 . . . . . . . . . . . . 13 ((πœ‘ ∧ π‘š ∈ β„•) β†’ π‘š ∈ ℝ+)
4847rpsqrtcld 15355 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘š ∈ β„•) β†’ (βˆšβ€˜π‘š) ∈ ℝ+)
4948rpcnd 13015 . . . . . . . . . . 11 ((πœ‘ ∧ π‘š ∈ β„•) β†’ (βˆšβ€˜π‘š) ∈ β„‚)
5048rpne0d 13018 . . . . . . . . . . 11 ((πœ‘ ∧ π‘š ∈ β„•) β†’ (βˆšβ€˜π‘š) β‰  0)
5145, 49, 50divcld 11987 . . . . . . . . . 10 ((πœ‘ ∧ π‘š ∈ β„•) β†’ ((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) ∈ β„‚)
52 dchrisum0lem1.f . . . . . . . . . . 11 𝐹 = (π‘Ž ∈ β„• ↦ ((π‘‹β€˜(πΏβ€˜π‘Ž)) / (βˆšβ€˜π‘Ž)))
53 2fveq3 6894 . . . . . . . . . . . . 13 (π‘Ž = π‘š β†’ (π‘‹β€˜(πΏβ€˜π‘Ž)) = (π‘‹β€˜(πΏβ€˜π‘š)))
54 fveq2 6889 . . . . . . . . . . . . 13 (π‘Ž = π‘š β†’ (βˆšβ€˜π‘Ž) = (βˆšβ€˜π‘š))
5553, 54oveq12d 7424 . . . . . . . . . . . 12 (π‘Ž = π‘š β†’ ((π‘‹β€˜(πΏβ€˜π‘Ž)) / (βˆšβ€˜π‘Ž)) = ((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)))
5655cbvmptv 5261 . . . . . . . . . . 11 (π‘Ž ∈ β„• ↦ ((π‘‹β€˜(πΏβ€˜π‘Ž)) / (βˆšβ€˜π‘Ž))) = (π‘š ∈ β„• ↦ ((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)))
5752, 56eqtri 2761 . . . . . . . . . 10 𝐹 = (π‘š ∈ β„• ↦ ((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)))
5851, 57fmptd 7111 . . . . . . . . 9 (πœ‘ β†’ 𝐹:β„•βŸΆβ„‚)
5958ffvelcdmda 7084 . . . . . . . 8 ((πœ‘ ∧ π‘š ∈ β„•) β†’ (πΉβ€˜π‘š) ∈ β„‚)
6010, 41, 59serf 13993 . . . . . . 7 (πœ‘ β†’ seq1( + , 𝐹):β„•βŸΆβ„‚)
6160ad2antrr 725 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ seq1( + , 𝐹):β„•βŸΆβ„‚)
623rpregt0d 13019 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ (π‘₯ ∈ ℝ ∧ 0 < π‘₯))
6362adantr 482 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘₯ ∈ ℝ ∧ 0 < π‘₯))
6463simpld 496 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ π‘₯ ∈ ℝ)
65 1red 11212 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ∈ ℝ)
66 elfznn 13527 . . . . . . . . . . 11 (𝑑 ∈ (1...(βŒŠβ€˜π‘₯)) β†’ 𝑑 ∈ β„•)
6766adantl 483 . . . . . . . . . 10 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑑 ∈ β„•)
6867nnred 12224 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑑 ∈ ℝ)
6967nnge1d 12257 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ≀ 𝑑)
703rpred 13013 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ π‘₯ ∈ ℝ)
71 fznnfl 13824 . . . . . . . . . . 11 (π‘₯ ∈ ℝ β†’ (𝑑 ∈ (1...(βŒŠβ€˜π‘₯)) ↔ (𝑑 ∈ β„• ∧ 𝑑 ≀ π‘₯)))
7270, 71syl 17 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ (𝑑 ∈ (1...(βŒŠβ€˜π‘₯)) ↔ (𝑑 ∈ β„• ∧ 𝑑 ≀ π‘₯)))
7372simplbda 501 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑑 ≀ π‘₯)
7465, 68, 64, 69, 73letrd 11368 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ≀ π‘₯)
75 flge1nn 13783 . . . . . . . 8 ((π‘₯ ∈ ℝ ∧ 1 ≀ π‘₯) β†’ (βŒŠβ€˜π‘₯) ∈ β„•)
7664, 74, 75syl2anc 585 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (βŒŠβ€˜π‘₯) ∈ β„•)
77 eluznn 12899 . . . . . . 7 (((βŒŠβ€˜π‘₯) ∈ β„• ∧ (βŒŠβ€˜((π‘₯↑2) / 𝑑)) ∈ (β„€β‰₯β€˜(βŒŠβ€˜π‘₯))) β†’ (βŒŠβ€˜((π‘₯↑2) / 𝑑)) ∈ β„•)
7876, 13, 77syl2anc 585 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (βŒŠβ€˜((π‘₯↑2) / 𝑑)) ∈ β„•)
7961, 78ffvelcdmd 7085 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) ∈ β„‚)
80 dchrisum0.s . . . . . . 7 (πœ‘ β†’ seq1( + , 𝐹) ⇝ 𝑆)
81 climcl 15440 . . . . . . 7 (seq1( + , 𝐹) ⇝ 𝑆 β†’ 𝑆 ∈ β„‚)
8280, 81syl 17 . . . . . 6 (πœ‘ β†’ 𝑆 ∈ β„‚)
8382ad2antrr 725 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑆 ∈ β„‚)
8479, 83subcld 11568 . . . 4 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ 𝑆) ∈ β„‚)
8584abscld 15380 . . 3 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ 𝑆)) ∈ ℝ)
8661, 76ffvelcdmd 7085 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)) ∈ β„‚)
8783, 86subcld 11568 . . . 4 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑆 βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯))) ∈ β„‚)
8887abscld 15380 . . 3 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(𝑆 βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)))) ∈ ℝ)
8985, 88readdcld 11240 . 2 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ 𝑆)) + (absβ€˜(𝑆 βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯))))) ∈ ℝ)
90 2re 12283 . . . . . 6 2 ∈ ℝ
91 dchrisum0.c . . . . . . . 8 (πœ‘ β†’ 𝐢 ∈ (0[,)+∞))
92 elrege0 13428 . . . . . . . 8 (𝐢 ∈ (0[,)+∞) ↔ (𝐢 ∈ ℝ ∧ 0 ≀ 𝐢))
9391, 92sylib 217 . . . . . . 7 (πœ‘ β†’ (𝐢 ∈ ℝ ∧ 0 ≀ 𝐢))
9493simpld 496 . . . . . 6 (πœ‘ β†’ 𝐢 ∈ ℝ)
95 remulcl 11192 . . . . . 6 ((2 ∈ ℝ ∧ 𝐢 ∈ ℝ) β†’ (2 Β· 𝐢) ∈ ℝ)
9690, 94, 95sylancr 588 . . . . 5 (πœ‘ β†’ (2 Β· 𝐢) ∈ ℝ)
9796adantr 482 . . . 4 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ (2 Β· 𝐢) ∈ ℝ)
983rpsqrtcld 15355 . . . 4 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ (βˆšβ€˜π‘₯) ∈ ℝ+)
9997, 98rerpdivcld 13044 . . 3 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ ((2 Β· 𝐢) / (βˆšβ€˜π‘₯)) ∈ ℝ)
10099adantr 482 . 2 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((2 Β· 𝐢) / (βˆšβ€˜π‘₯)) ∈ ℝ)
101 ssun1 4172 . . . . . . . . . . 11 (1...(βŒŠβ€˜π‘₯)) βŠ† ((1...(βŒŠβ€˜π‘₯)) βˆͺ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑))))
102101, 15sseqtrrid 4035 . . . . . . . . . 10 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1...(βŒŠβ€˜π‘₯)) βŠ† (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑))))
103102sselda 3982 . . . . . . . . 9 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜π‘₯))) β†’ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑))))
104 ovex 7439 . . . . . . . . . . 11 ((π‘‹β€˜(πΏβ€˜π‘Ž)) / (βˆšβ€˜π‘Ž)) ∈ V
10555, 52, 104fvmpt3i 7001 . . . . . . . . . 10 (π‘š ∈ β„• β†’ (πΉβ€˜π‘š) = ((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)))
10632, 105syl 17 . . . . . . . . 9 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) β†’ (πΉβ€˜π‘š) = ((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)))
107103, 106syldan 592 . . . . . . . 8 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (πΉβ€˜π‘š) = ((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)))
10876, 10eleqtrdi 2844 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (βŒŠβ€˜π‘₯) ∈ (β„€β‰₯β€˜1))
109103, 37syldan 592 . . . . . . . 8 ((((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) ∧ π‘š ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) ∈ β„‚)
110107, 108, 109fsumser 15673 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ Ξ£π‘š ∈ (1...(βŒŠβ€˜π‘₯))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) = (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)))
111110, 86eqeltrd 2834 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ Ξ£π‘š ∈ (1...(βŒŠβ€˜π‘₯))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) ∈ β„‚)
112111, 39pncan2d 11570 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ£π‘š ∈ (1...(βŒŠβ€˜π‘₯))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) + Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š))) βˆ’ Ξ£π‘š ∈ (1...(βŒŠβ€˜π‘₯))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š))) = Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)))
113 reflcl 13758 . . . . . . . . . . 11 (π‘₯ ∈ ℝ β†’ (βŒŠβ€˜π‘₯) ∈ ℝ)
11464, 113syl 17 . . . . . . . . . 10 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (βŒŠβ€˜π‘₯) ∈ ℝ)
115114ltp1d 12141 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (βŒŠβ€˜π‘₯) < ((βŒŠβ€˜π‘₯) + 1))
116 fzdisj 13525 . . . . . . . . 9 ((βŒŠβ€˜π‘₯) < ((βŒŠβ€˜π‘₯) + 1) β†’ ((1...(βŒŠβ€˜π‘₯)) ∩ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) = βˆ…)
117115, 116syl 17 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((1...(βŒŠβ€˜π‘₯)) ∩ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))) = βˆ…)
118 fzfid 13935 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑))) ∈ Fin)
119117, 15, 118, 37fsumsplit 15684 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ Ξ£π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) = (Ξ£π‘š ∈ (1...(βŒŠβ€˜π‘₯))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) + Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š))))
12078, 10eleqtrdi 2844 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (βŒŠβ€˜((π‘₯↑2) / 𝑑)) ∈ (β„€β‰₯β€˜1))
121106, 120, 37fsumser 15673 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ Ξ£π‘š ∈ (1...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) = (seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))))
122119, 121eqtr3d 2775 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Ξ£π‘š ∈ (1...(βŒŠβ€˜π‘₯))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) + Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š))) = (seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))))
123122, 110oveq12d 7424 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ£π‘š ∈ (1...(βŒŠβ€˜π‘₯))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) + Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š))) βˆ’ Ξ£π‘š ∈ (1...(βŒŠβ€˜π‘₯))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š))) = ((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯))))
124112, 123eqtr3d 2775 . . . 4 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š)) = ((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯))))
125124fveq2d 6893 . . 3 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š))) = (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)))))
12679, 86, 83abs3difd 15404 . . 3 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)))) ≀ ((absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ 𝑆)) + (absβ€˜(𝑆 βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯))))))
127125, 126eqbrtrd 5170 . 2 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š))) ≀ ((absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ 𝑆)) + (absβ€˜(𝑆 βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯))))))
12894ad2antrr 725 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝐢 ∈ ℝ)
129 simplr 768 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ π‘₯ ∈ ℝ+)
130129rpsqrtcld 15355 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (βˆšβ€˜π‘₯) ∈ ℝ+)
131128, 130rerpdivcld 13044 . . . 4 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝐢 / (βˆšβ€˜π‘₯)) ∈ ℝ)
132 2z 12591 . . . . . . . . . 10 2 ∈ β„€
133 rpexpcl 14043 . . . . . . . . . 10 ((π‘₯ ∈ ℝ+ ∧ 2 ∈ β„€) β†’ (π‘₯↑2) ∈ ℝ+)
1343, 132, 133sylancl 587 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ (π‘₯↑2) ∈ ℝ+)
135134adantr 482 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘₯↑2) ∈ ℝ+)
13667nnrpd 13011 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑑 ∈ ℝ+)
137135, 136rpdivcld 13030 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘₯↑2) / 𝑑) ∈ ℝ+)
138137rpsqrtcld 15355 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (βˆšβ€˜((π‘₯↑2) / 𝑑)) ∈ ℝ+)
139128, 138rerpdivcld 13044 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝐢 / (βˆšβ€˜((π‘₯↑2) / 𝑑))) ∈ ℝ)
140 2fveq3 6894 . . . . . . . 8 (𝑦 = ((π‘₯↑2) / 𝑑) β†’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘¦)) = (seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))))
141140fvoveq1d 7428 . . . . . . 7 (𝑦 = ((π‘₯↑2) / 𝑑) β†’ (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘¦)) βˆ’ 𝑆)) = (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ 𝑆)))
142 fveq2 6889 . . . . . . . 8 (𝑦 = ((π‘₯↑2) / 𝑑) β†’ (βˆšβ€˜π‘¦) = (βˆšβ€˜((π‘₯↑2) / 𝑑)))
143142oveq2d 7422 . . . . . . 7 (𝑦 = ((π‘₯↑2) / 𝑑) β†’ (𝐢 / (βˆšβ€˜π‘¦)) = (𝐢 / (βˆšβ€˜((π‘₯↑2) / 𝑑))))
144141, 143breq12d 5161 . . . . . 6 (𝑦 = ((π‘₯↑2) / 𝑑) β†’ ((absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘¦)) βˆ’ 𝑆)) ≀ (𝐢 / (βˆšβ€˜π‘¦)) ↔ (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ 𝑆)) ≀ (𝐢 / (βˆšβ€˜((π‘₯↑2) / 𝑑)))))
145 dchrisum0.1 . . . . . . 7 (πœ‘ β†’ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘¦)) βˆ’ 𝑆)) ≀ (𝐢 / (βˆšβ€˜π‘¦)))
146145ad2antrr 725 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘¦)) βˆ’ 𝑆)) ≀ (𝐢 / (βˆšβ€˜π‘¦)))
147134rpred 13013 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ (π‘₯↑2) ∈ ℝ)
148 nndivre 12250 . . . . . . . 8 (((π‘₯↑2) ∈ ℝ ∧ 𝑑 ∈ β„•) β†’ ((π‘₯↑2) / 𝑑) ∈ ℝ)
149147, 66, 148syl2an 597 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘₯↑2) / 𝑑) ∈ ℝ)
15012simpld 496 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ π‘₯ ≀ ((π‘₯↑2) / 𝑑))
15165, 64, 149, 74, 150letrd 11368 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ≀ ((π‘₯↑2) / 𝑑))
152 1re 11211 . . . . . . . 8 1 ∈ ℝ
153 elicopnf 13419 . . . . . . . 8 (1 ∈ ℝ β†’ (((π‘₯↑2) / 𝑑) ∈ (1[,)+∞) ↔ (((π‘₯↑2) / 𝑑) ∈ ℝ ∧ 1 ≀ ((π‘₯↑2) / 𝑑))))
154152, 153ax-mp 5 . . . . . . 7 (((π‘₯↑2) / 𝑑) ∈ (1[,)+∞) ↔ (((π‘₯↑2) / 𝑑) ∈ ℝ ∧ 1 ≀ ((π‘₯↑2) / 𝑑)))
155149, 151, 154sylanbrc 584 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘₯↑2) / 𝑑) ∈ (1[,)+∞))
156144, 146, 155rspcdva 3614 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ 𝑆)) ≀ (𝐢 / (βˆšβ€˜((π‘₯↑2) / 𝑑))))
157130rpregt0d 13019 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((βˆšβ€˜π‘₯) ∈ ℝ ∧ 0 < (βˆšβ€˜π‘₯)))
158138rpregt0d 13019 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((βˆšβ€˜((π‘₯↑2) / 𝑑)) ∈ ℝ ∧ 0 < (βˆšβ€˜((π‘₯↑2) / 𝑑))))
15993ad2antrr 725 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝐢 ∈ ℝ ∧ 0 ≀ 𝐢))
160129rprege0d 13020 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯))
161137rprege0d 13020 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((π‘₯↑2) / 𝑑) ∈ ℝ ∧ 0 ≀ ((π‘₯↑2) / 𝑑)))
162 sqrtle 15204 . . . . . . . 8 (((π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯) ∧ (((π‘₯↑2) / 𝑑) ∈ ℝ ∧ 0 ≀ ((π‘₯↑2) / 𝑑))) β†’ (π‘₯ ≀ ((π‘₯↑2) / 𝑑) ↔ (βˆšβ€˜π‘₯) ≀ (βˆšβ€˜((π‘₯↑2) / 𝑑))))
163160, 161, 162syl2anc 585 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘₯ ≀ ((π‘₯↑2) / 𝑑) ↔ (βˆšβ€˜π‘₯) ≀ (βˆšβ€˜((π‘₯↑2) / 𝑑))))
164150, 163mpbid 231 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (βˆšβ€˜π‘₯) ≀ (βˆšβ€˜((π‘₯↑2) / 𝑑)))
165 lediv2a 12105 . . . . . 6 (((((βˆšβ€˜π‘₯) ∈ ℝ ∧ 0 < (βˆšβ€˜π‘₯)) ∧ ((βˆšβ€˜((π‘₯↑2) / 𝑑)) ∈ ℝ ∧ 0 < (βˆšβ€˜((π‘₯↑2) / 𝑑))) ∧ (𝐢 ∈ ℝ ∧ 0 ≀ 𝐢)) ∧ (βˆšβ€˜π‘₯) ≀ (βˆšβ€˜((π‘₯↑2) / 𝑑))) β†’ (𝐢 / (βˆšβ€˜((π‘₯↑2) / 𝑑))) ≀ (𝐢 / (βˆšβ€˜π‘₯)))
166157, 158, 159, 164, 165syl31anc 1374 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝐢 / (βˆšβ€˜((π‘₯↑2) / 𝑑))) ≀ (𝐢 / (βˆšβ€˜π‘₯)))
16785, 139, 131, 156, 166letrd 11368 . . . 4 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ 𝑆)) ≀ (𝐢 / (βˆšβ€˜π‘₯)))
16883, 86abssubd 15397 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(𝑆 βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)))) = (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)) βˆ’ 𝑆)))
169 2fveq3 6894 . . . . . . . 8 (𝑦 = π‘₯ β†’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘¦)) = (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)))
170169fvoveq1d 7428 . . . . . . 7 (𝑦 = π‘₯ β†’ (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘¦)) βˆ’ 𝑆)) = (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)) βˆ’ 𝑆)))
171 fveq2 6889 . . . . . . . 8 (𝑦 = π‘₯ β†’ (βˆšβ€˜π‘¦) = (βˆšβ€˜π‘₯))
172171oveq2d 7422 . . . . . . 7 (𝑦 = π‘₯ β†’ (𝐢 / (βˆšβ€˜π‘¦)) = (𝐢 / (βˆšβ€˜π‘₯)))
173170, 172breq12d 5161 . . . . . 6 (𝑦 = π‘₯ β†’ ((absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘¦)) βˆ’ 𝑆)) ≀ (𝐢 / (βˆšβ€˜π‘¦)) ↔ (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)) βˆ’ 𝑆)) ≀ (𝐢 / (βˆšβ€˜π‘₯))))
174 elicopnf 13419 . . . . . . . 8 (1 ∈ ℝ β†’ (π‘₯ ∈ (1[,)+∞) ↔ (π‘₯ ∈ ℝ ∧ 1 ≀ π‘₯)))
175152, 174ax-mp 5 . . . . . . 7 (π‘₯ ∈ (1[,)+∞) ↔ (π‘₯ ∈ ℝ ∧ 1 ≀ π‘₯))
17664, 74, 175sylanbrc 584 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ π‘₯ ∈ (1[,)+∞))
177173, 146, 176rspcdva 3614 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)) βˆ’ 𝑆)) ≀ (𝐢 / (βˆšβ€˜π‘₯)))
178168, 177eqbrtrd 5170 . . . 4 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(𝑆 βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯)))) ≀ (𝐢 / (βˆšβ€˜π‘₯)))
17985, 88, 131, 131, 167, 178le2addd 11830 . . 3 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ 𝑆)) + (absβ€˜(𝑆 βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯))))) ≀ ((𝐢 / (βˆšβ€˜π‘₯)) + (𝐢 / (βˆšβ€˜π‘₯))))
180 2cnd 12287 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 2 ∈ β„‚)
18194adantr 482 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ 𝐢 ∈ ℝ)
182181recnd 11239 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ 𝐢 ∈ β„‚)
183182adantr 482 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝐢 ∈ β„‚)
18498rpcnne0d 13022 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ℝ+) β†’ ((βˆšβ€˜π‘₯) ∈ β„‚ ∧ (βˆšβ€˜π‘₯) β‰  0))
185184adantr 482 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((βˆšβ€˜π‘₯) ∈ β„‚ ∧ (βˆšβ€˜π‘₯) β‰  0))
186 divass 11887 . . . . 5 ((2 ∈ β„‚ ∧ 𝐢 ∈ β„‚ ∧ ((βˆšβ€˜π‘₯) ∈ β„‚ ∧ (βˆšβ€˜π‘₯) β‰  0)) β†’ ((2 Β· 𝐢) / (βˆšβ€˜π‘₯)) = (2 Β· (𝐢 / (βˆšβ€˜π‘₯))))
187180, 183, 185, 186syl3anc 1372 . . . 4 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((2 Β· 𝐢) / (βˆšβ€˜π‘₯)) = (2 Β· (𝐢 / (βˆšβ€˜π‘₯))))
188131recnd 11239 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝐢 / (βˆšβ€˜π‘₯)) ∈ β„‚)
1891882timesd 12452 . . . 4 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· (𝐢 / (βˆšβ€˜π‘₯))) = ((𝐢 / (βˆšβ€˜π‘₯)) + (𝐢 / (βˆšβ€˜π‘₯))))
190187, 189eqtrd 2773 . . 3 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((2 Β· 𝐢) / (βˆšβ€˜π‘₯)) = ((𝐢 / (βˆšβ€˜π‘₯)) + (𝐢 / (βˆšβ€˜π‘₯))))
191179, 190breqtrrd 5176 . 2 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜((seq1( + , 𝐹)β€˜(βŒŠβ€˜((π‘₯↑2) / 𝑑))) βˆ’ 𝑆)) + (absβ€˜(𝑆 βˆ’ (seq1( + , 𝐹)β€˜(βŒŠβ€˜π‘₯))))) ≀ ((2 Β· 𝐢) / (βˆšβ€˜π‘₯)))
19240, 89, 100, 127, 191letrd 11368 1 (((πœ‘ ∧ π‘₯ ∈ ℝ+) ∧ 𝑑 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜Ξ£π‘š ∈ (((βŒŠβ€˜π‘₯) + 1)...(βŒŠβ€˜((π‘₯↑2) / 𝑑)))((π‘‹β€˜(πΏβ€˜π‘š)) / (βˆšβ€˜π‘š))) ≀ ((2 Β· 𝐢) / (βˆšβ€˜π‘₯)))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 397   = wceq 1542   ∈ wcel 2107   β‰  wne 2941  βˆ€wral 3062  {crab 3433   βˆ– cdif 3945   βˆͺ cun 3946   ∩ cin 3947  βˆ…c0 4322  {csn 4628   class class class wbr 5148   ↦ cmpt 5231  βŸΆwf 6537  β€˜cfv 6541  (class class class)co 7406  β„‚cc 11105  β„cr 11106  0cc0 11107  1c1 11108   + caddc 11110   Β· cmul 11112  +∞cpnf 11242   < clt 11245   ≀ cle 11246   βˆ’ cmin 11441   / cdiv 11868  β„•cn 12209  2c2 12264  β„•0cn0 12469  β„€cz 12555  β„€β‰₯cuz 12819  β„+crp 12971  [,)cico 13323  ...cfz 13481  βŒŠcfl 13752  seqcseq 13963  β†‘cexp 14024  βˆšcsqrt 15177  abscabs 15178   ⇝ cli 15425  Ξ£csu 15629  Basecbs 17141  0gc0g 17382  β„€RHomczrh 21041  β„€/nβ„€czn 21044  DChrcdchr 26725
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722  ax-inf2 9633  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184  ax-pre-sup 11185  ax-addf 11186  ax-mulf 11187
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-tp 4633  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-se 5632  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6298  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-isom 6550  df-riota 7362  df-ov 7409  df-oprab 7410  df-mpo 7411  df-om 7853  df-1st 7972  df-2nd 7973  df-tpos 8208  df-frecs 8263  df-wrecs 8294  df-recs 8368  df-rdg 8407  df-1o 8463  df-er 8700  df-ec 8702  df-qs 8706  df-map 8819  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-sup 9434  df-inf 9435  df-oi 9502  df-card 9931  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-div 11869  df-nn 12210  df-2 12272  df-3 12273  df-4 12274  df-5 12275  df-6 12276  df-7 12277  df-8 12278  df-9 12279  df-n0 12470  df-z 12556  df-dec 12675  df-uz 12820  df-rp 12972  df-ico 13327  df-fz 13482  df-fzo 13625  df-fl 13754  df-seq 13964  df-exp 14025  df-hash 14288  df-cj 15043  df-re 15044  df-im 15045  df-sqrt 15179  df-abs 15180  df-clim 15429  df-sum 15630  df-struct 17077  df-sets 17094  df-slot 17112  df-ndx 17124  df-base 17142  df-ress 17171  df-plusg 17207  df-mulr 17208  df-starv 17209  df-sca 17210  df-vsca 17211  df-ip 17212  df-tset 17213  df-ple 17214  df-ds 17216  df-unif 17217  df-0g 17384  df-imas 17451  df-qus 17452  df-mgm 18558  df-sgrp 18607  df-mnd 18623  df-mhm 18668  df-grp 18819  df-minusg 18820  df-sbg 18821  df-mulg 18946  df-subg 18998  df-nsg 18999  df-eqg 19000  df-ghm 19085  df-cmn 19645  df-abl 19646  df-mgp 19983  df-ur 20000  df-ring 20052  df-cring 20053  df-oppr 20143  df-dvdsr 20164  df-unit 20165  df-rnghom 20244  df-subrg 20354  df-lmod 20466  df-lss 20536  df-lsp 20576  df-sra 20778  df-rgmod 20779  df-lidl 20780  df-rsp 20781  df-2idl 20850  df-cnfld 20938  df-zring 21011  df-zrh 21045  df-zn 21048  df-dchr 26726
This theorem is referenced by:  dchrisum0lem1  27009
  Copyright terms: Public domain W3C validator