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

Theorem pntrsumo1 27413
Description: A bound on a sum over 𝑅. Equation 10.1.16 of [Shapiro], p. 403. (Contributed by Mario Carneiro, 25-May-2016.)
Hypothesis
Ref Expression
pntrval.r 𝑅 = (π‘Ž ∈ ℝ+ ↦ ((Οˆβ€˜π‘Ž) βˆ’ π‘Ž))
Assertion
Ref Expression
pntrsumo1 (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) ∈ 𝑂(1)
Distinct variable groups:   𝑛,π‘Ž,π‘₯   𝑅,𝑛,π‘₯
Allowed substitution hint:   𝑅(π‘Ž)

Proof of Theorem pntrsumo1
Dummy variable π‘š is distinct from all other variables.
StepHypRef Expression
1 1re 11210 . . . . . . . . . . 11 1 ∈ ℝ
2 elicopnf 13418 . . . . . . . . . . 11 (1 ∈ ℝ β†’ (π‘₯ ∈ (1[,)+∞) ↔ (π‘₯ ∈ ℝ ∧ 1 ≀ π‘₯)))
31, 2ax-mp 5 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) ↔ (π‘₯ ∈ ℝ ∧ 1 ≀ π‘₯))
43simplbi 497 . . . . . . . . 9 (π‘₯ ∈ (1[,)+∞) β†’ π‘₯ ∈ ℝ)
5 0red 11213 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ 0 ∈ ℝ)
6 1red 11211 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ 1 ∈ ℝ)
7 0lt1 11732 . . . . . . . . . . 11 0 < 1
87a1i 11 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ 0 < 1)
93simprbi 496 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ 1 ≀ π‘₯)
105, 6, 4, 8, 9ltletrd 11370 . . . . . . . . 9 (π‘₯ ∈ (1[,)+∞) β†’ 0 < π‘₯)
114, 10elrpd 13009 . . . . . . . 8 (π‘₯ ∈ (1[,)+∞) β†’ π‘₯ ∈ ℝ+)
1211ssriv 3978 . . . . . . 7 (1[,)+∞) βŠ† ℝ+
1312a1i 11 . . . . . 6 (⊀ β†’ (1[,)+∞) βŠ† ℝ+)
14 rpssre 12977 . . . . . 6 ℝ+ βŠ† ℝ
1513, 14sstrdi 3986 . . . . 5 (⊀ β†’ (1[,)+∞) βŠ† ℝ)
1615resmptd 6030 . . . 4 (⊀ β†’ ((π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) β†Ύ (1[,)+∞)) = (π‘₯ ∈ (1[,)+∞) ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))))
17 chpcl 26971 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ β†’ (Οˆβ€˜π‘₯) ∈ ℝ)
184, 17syl 17 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ (Οˆβ€˜π‘₯) ∈ ℝ)
19 peano2re 11383 . . . . . . . . . . 11 ((Οˆβ€˜π‘₯) ∈ ℝ β†’ ((Οˆβ€˜π‘₯) + 1) ∈ ℝ)
2018, 19syl 17 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ ((Οˆβ€˜π‘₯) + 1) ∈ ℝ)
2111rprege0d 13019 . . . . . . . . . . . 12 (π‘₯ ∈ (1[,)+∞) β†’ (π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯))
22 flge0nn0 13781 . . . . . . . . . . . 12 ((π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯) β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
2321, 22syl 17 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
24 nn0p1nn 12507 . . . . . . . . . . 11 ((βŒŠβ€˜π‘₯) ∈ β„•0 β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„•)
2523, 24syl 17 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„•)
2620, 25nndivred 12262 . . . . . . . . 9 (π‘₯ ∈ (1[,)+∞) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ)
2726recnd 11238 . . . . . . . 8 (π‘₯ ∈ (1[,)+∞) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ β„‚)
28 ax-1cn 11163 . . . . . . . 8 1 ∈ β„‚
29 subcl 11455 . . . . . . . 8 (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ β„‚ ∧ 1 ∈ β„‚) β†’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) ∈ β„‚)
3027, 28, 29sylancl 585 . . . . . . 7 (π‘₯ ∈ (1[,)+∞) β†’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) ∈ β„‚)
31 fzfid 13934 . . . . . . . . . 10 (π‘₯ ∈ ℝ β†’ (1...(βŒŠβ€˜π‘₯)) ∈ Fin)
32 elfznn 13526 . . . . . . . . . . . 12 (𝑛 ∈ (1...(βŒŠβ€˜π‘₯)) β†’ 𝑛 ∈ β„•)
3332adantl 481 . . . . . . . . . . 11 ((π‘₯ ∈ ℝ ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„•)
34 nnrp 12981 . . . . . . . . . . . . 13 (𝑛 ∈ β„• β†’ 𝑛 ∈ ℝ+)
35 pntrval.r . . . . . . . . . . . . . . 15 𝑅 = (π‘Ž ∈ ℝ+ ↦ ((Οˆβ€˜π‘Ž) βˆ’ π‘Ž))
3635pntrf 27411 . . . . . . . . . . . . . 14 𝑅:ℝ+βŸΆβ„
3736ffvelcdmi 7075 . . . . . . . . . . . . 13 (𝑛 ∈ ℝ+ β†’ (π‘…β€˜π‘›) ∈ ℝ)
3834, 37syl 17 . . . . . . . . . . . 12 (𝑛 ∈ β„• β†’ (π‘…β€˜π‘›) ∈ ℝ)
39 peano2nn 12220 . . . . . . . . . . . . 13 (𝑛 ∈ β„• β†’ (𝑛 + 1) ∈ β„•)
40 nnmulcl 12232 . . . . . . . . . . . . 13 ((𝑛 ∈ β„• ∧ (𝑛 + 1) ∈ β„•) β†’ (𝑛 Β· (𝑛 + 1)) ∈ β„•)
4139, 40mpdan 684 . . . . . . . . . . . 12 (𝑛 ∈ β„• β†’ (𝑛 Β· (𝑛 + 1)) ∈ β„•)
4238, 41nndivred 12262 . . . . . . . . . . 11 (𝑛 ∈ β„• β†’ ((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ ℝ)
4333, 42syl 17 . . . . . . . . . 10 ((π‘₯ ∈ ℝ ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ ℝ)
4431, 43fsumrecl 15676 . . . . . . . . 9 (π‘₯ ∈ ℝ β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ ℝ)
4544recnd 11238 . . . . . . . 8 (π‘₯ ∈ ℝ β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ β„‚)
464, 45syl 17 . . . . . . 7 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ β„‚)
47 oveq2 7409 . . . . . . . . . . 11 (π‘š = 𝑛 β†’ (1 / π‘š) = (1 / 𝑛))
48 fvoveq1 7424 . . . . . . . . . . . 12 (π‘š = 𝑛 β†’ (Οˆβ€˜(π‘š βˆ’ 1)) = (Οˆβ€˜(𝑛 βˆ’ 1)))
49 oveq1 7408 . . . . . . . . . . . 12 (π‘š = 𝑛 β†’ (π‘š βˆ’ 1) = (𝑛 βˆ’ 1))
5048, 49oveq12d 7419 . . . . . . . . . . 11 (π‘š = 𝑛 β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1)))
5147, 50jca 511 . . . . . . . . . 10 (π‘š = 𝑛 β†’ ((1 / π‘š) = (1 / 𝑛) ∧ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1))))
52 oveq2 7409 . . . . . . . . . . 11 (π‘š = (𝑛 + 1) β†’ (1 / π‘š) = (1 / (𝑛 + 1)))
53 fvoveq1 7424 . . . . . . . . . . . 12 (π‘š = (𝑛 + 1) β†’ (Οˆβ€˜(π‘š βˆ’ 1)) = (Οˆβ€˜((𝑛 + 1) βˆ’ 1)))
54 oveq1 7408 . . . . . . . . . . . 12 (π‘š = (𝑛 + 1) β†’ (π‘š βˆ’ 1) = ((𝑛 + 1) βˆ’ 1))
5553, 54oveq12d 7419 . . . . . . . . . . 11 (π‘š = (𝑛 + 1) β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)))
5652, 55jca 511 . . . . . . . . . 10 (π‘š = (𝑛 + 1) β†’ ((1 / π‘š) = (1 / (𝑛 + 1)) ∧ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1))))
57 oveq2 7409 . . . . . . . . . . . 12 (π‘š = 1 β†’ (1 / π‘š) = (1 / 1))
58 1div1e1 11900 . . . . . . . . . . . 12 (1 / 1) = 1
5957, 58eqtrdi 2780 . . . . . . . . . . 11 (π‘š = 1 β†’ (1 / π‘š) = 1)
60 oveq1 7408 . . . . . . . . . . . . . . . 16 (π‘š = 1 β†’ (π‘š βˆ’ 1) = (1 βˆ’ 1))
61 1m1e0 12280 . . . . . . . . . . . . . . . 16 (1 βˆ’ 1) = 0
6260, 61eqtrdi 2780 . . . . . . . . . . . . . . 15 (π‘š = 1 β†’ (π‘š βˆ’ 1) = 0)
6362fveq2d 6885 . . . . . . . . . . . . . 14 (π‘š = 1 β†’ (Οˆβ€˜(π‘š βˆ’ 1)) = (Οˆβ€˜0))
64 2pos 12311 . . . . . . . . . . . . . . 15 0 < 2
65 0re 11212 . . . . . . . . . . . . . . . 16 0 ∈ ℝ
66 chpeq0 27056 . . . . . . . . . . . . . . . 16 (0 ∈ ℝ β†’ ((Οˆβ€˜0) = 0 ↔ 0 < 2))
6765, 66ax-mp 5 . . . . . . . . . . . . . . 15 ((Οˆβ€˜0) = 0 ↔ 0 < 2)
6864, 67mpbir 230 . . . . . . . . . . . . . 14 (Οˆβ€˜0) = 0
6963, 68eqtrdi 2780 . . . . . . . . . . . . 13 (π‘š = 1 β†’ (Οˆβ€˜(π‘š βˆ’ 1)) = 0)
7069, 62oveq12d 7419 . . . . . . . . . . . 12 (π‘š = 1 β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = (0 βˆ’ 0))
71 0m0e0 12328 . . . . . . . . . . . 12 (0 βˆ’ 0) = 0
7270, 71eqtrdi 2780 . . . . . . . . . . 11 (π‘š = 1 β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = 0)
7359, 72jca 511 . . . . . . . . . 10 (π‘š = 1 β†’ ((1 / π‘š) = 1 ∧ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = 0))
74 oveq2 7409 . . . . . . . . . . 11 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (1 / π‘š) = (1 / ((βŒŠβ€˜π‘₯) + 1)))
75 fvoveq1 7424 . . . . . . . . . . . 12 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (Οˆβ€˜(π‘š βˆ’ 1)) = (Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)))
76 oveq1 7408 . . . . . . . . . . . 12 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (π‘š βˆ’ 1) = (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))
7775, 76oveq12d 7419 . . . . . . . . . . 11 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)))
7874, 77jca 511 . . . . . . . . . 10 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ ((1 / π‘š) = (1 / ((βŒŠβ€˜π‘₯) + 1)) ∧ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))))
79 nnuz 12861 . . . . . . . . . . 11 β„• = (β„€β‰₯β€˜1)
8025, 79eleqtrdi 2835 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ (β„€β‰₯β€˜1))
81 elfznn 13526 . . . . . . . . . . . . 13 (π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1)) β†’ π‘š ∈ β„•)
8281adantl 481 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ π‘š ∈ β„•)
8382nnrecred 12259 . . . . . . . . . . 11 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (1 / π‘š) ∈ ℝ)
8483recnd 11238 . . . . . . . . . 10 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (1 / π‘š) ∈ β„‚)
8582nnred 12223 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ π‘š ∈ ℝ)
86 peano2rem 11523 . . . . . . . . . . . . . 14 (π‘š ∈ ℝ β†’ (π‘š βˆ’ 1) ∈ ℝ)
8785, 86syl 17 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (π‘š βˆ’ 1) ∈ ℝ)
88 chpcl 26971 . . . . . . . . . . . . 13 ((π‘š βˆ’ 1) ∈ ℝ β†’ (Οˆβ€˜(π‘š βˆ’ 1)) ∈ ℝ)
8987, 88syl 17 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (Οˆβ€˜(π‘š βˆ’ 1)) ∈ ℝ)
9089, 87resubcld 11638 . . . . . . . . . . 11 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) ∈ ℝ)
9190recnd 11238 . . . . . . . . . 10 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) ∈ β„‚)
9251, 56, 73, 78, 80, 84, 91fsumparts 15748 . . . . . . . . 9 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))((1 / 𝑛) Β· (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) βˆ’ ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1)))) = ((((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))) βˆ’ (1 Β· 0)) βˆ’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))(((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) Β· ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)))))
934flcld 13759 . . . . . . . . . . . 12 (π‘₯ ∈ (1[,)+∞) β†’ (βŒŠβ€˜π‘₯) ∈ β„€)
94 fzval3 13697 . . . . . . . . . . . 12 ((βŒŠβ€˜π‘₯) ∈ β„€ β†’ (1...(βŒŠβ€˜π‘₯)) = (1..^((βŒŠβ€˜π‘₯) + 1)))
9593, 94syl 17 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ (1...(βŒŠβ€˜π‘₯)) = (1..^((βŒŠβ€˜π‘₯) + 1)))
9695eqcomd 2730 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ (1..^((βŒŠβ€˜π‘₯) + 1)) = (1...(βŒŠβ€˜π‘₯)))
9732adantl 481 . . . . . . . . . . . . . . . . . . 19 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„•)
9897nncnd 12224 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„‚)
99 pncan 11462 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ β„‚ ∧ 1 ∈ β„‚) β†’ ((𝑛 + 1) βˆ’ 1) = 𝑛)
10098, 28, 99sylancl 585 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ 1) = 𝑛)
10197nnred 12223 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ ℝ)
102100, 101eqeltrd 2825 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ 1) ∈ ℝ)
103 chpcl 26971 . . . . . . . . . . . . . . . 16 (((𝑛 + 1) βˆ’ 1) ∈ ℝ β†’ (Οˆβ€˜((𝑛 + 1) βˆ’ 1)) ∈ ℝ)
104102, 103syl 17 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜((𝑛 + 1) βˆ’ 1)) ∈ ℝ)
105104recnd 11238 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜((𝑛 + 1) βˆ’ 1)) ∈ β„‚)
106102recnd 11238 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ 1) ∈ β„‚)
107 peano2rem 11523 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℝ β†’ (𝑛 βˆ’ 1) ∈ ℝ)
108101, 107syl 17 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 βˆ’ 1) ∈ ℝ)
109 chpcl 26971 . . . . . . . . . . . . . . . 16 ((𝑛 βˆ’ 1) ∈ ℝ β†’ (Οˆβ€˜(𝑛 βˆ’ 1)) ∈ ℝ)
110108, 109syl 17 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜(𝑛 βˆ’ 1)) ∈ ℝ)
111110recnd 11238 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜(𝑛 βˆ’ 1)) ∈ β„‚)
112 1cnd 11205 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ∈ β„‚)
11398, 112subcld 11567 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 βˆ’ 1) ∈ β„‚)
114105, 106, 111, 113sub4d 11616 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) βˆ’ ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1))) = (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (Οˆβ€˜(𝑛 βˆ’ 1))) βˆ’ (((𝑛 + 1) βˆ’ 1) βˆ’ (𝑛 βˆ’ 1))))
115 vmacl 26965 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ β„• β†’ (Ξ›β€˜π‘›) ∈ ℝ)
11697, 115syl 17 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Ξ›β€˜π‘›) ∈ ℝ)
117116recnd 11238 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Ξ›β€˜π‘›) ∈ β„‚)
118 nnm1nn0 12509 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ β„• β†’ (𝑛 βˆ’ 1) ∈ β„•0)
11997, 118syl 17 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 βˆ’ 1) ∈ β„•0)
120 chpp1 27002 . . . . . . . . . . . . . . . . 17 ((𝑛 βˆ’ 1) ∈ β„•0 β†’ (Οˆβ€˜((𝑛 βˆ’ 1) + 1)) = ((Οˆβ€˜(𝑛 βˆ’ 1)) + (Ξ›β€˜((𝑛 βˆ’ 1) + 1))))
121119, 120syl 17 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜((𝑛 βˆ’ 1) + 1)) = ((Οˆβ€˜(𝑛 βˆ’ 1)) + (Ξ›β€˜((𝑛 βˆ’ 1) + 1))))
122 npcan 11465 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ β„‚ ∧ 1 ∈ β„‚) β†’ ((𝑛 βˆ’ 1) + 1) = 𝑛)
12398, 28, 122sylancl 585 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 βˆ’ 1) + 1) = 𝑛)
124123, 100eqtr4d 2767 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 βˆ’ 1) + 1) = ((𝑛 + 1) βˆ’ 1))
125124fveq2d 6885 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜((𝑛 βˆ’ 1) + 1)) = (Οˆβ€˜((𝑛 + 1) βˆ’ 1)))
126123fveq2d 6885 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Ξ›β€˜((𝑛 βˆ’ 1) + 1)) = (Ξ›β€˜π‘›))
127126oveq2d 7417 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Οˆβ€˜(𝑛 βˆ’ 1)) + (Ξ›β€˜((𝑛 βˆ’ 1) + 1))) = ((Οˆβ€˜(𝑛 βˆ’ 1)) + (Ξ›β€˜π‘›)))
128121, 125, 1273eqtr3d 2772 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜((𝑛 + 1) βˆ’ 1)) = ((Οˆβ€˜(𝑛 βˆ’ 1)) + (Ξ›β€˜π‘›)))
129111, 117, 128mvrladdd 11623 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (Οˆβ€˜(𝑛 βˆ’ 1))) = (Ξ›β€˜π‘›))
130 peano2cn 11382 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ β„‚ β†’ (𝑛 + 1) ∈ β„‚)
13198, 130syl 17 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 + 1) ∈ β„‚)
132131, 98, 112nnncan2d 11602 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) βˆ’ 1) βˆ’ (𝑛 βˆ’ 1)) = ((𝑛 + 1) βˆ’ 𝑛))
133 pncan2 11463 . . . . . . . . . . . . . . . 16 ((𝑛 ∈ β„‚ ∧ 1 ∈ β„‚) β†’ ((𝑛 + 1) βˆ’ 𝑛) = 1)
13498, 28, 133sylancl 585 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ 𝑛) = 1)
135132, 134eqtrd 2764 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) βˆ’ 1) βˆ’ (𝑛 βˆ’ 1)) = 1)
136129, 135oveq12d 7419 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (Οˆβ€˜(𝑛 βˆ’ 1))) βˆ’ (((𝑛 + 1) βˆ’ 1) βˆ’ (𝑛 βˆ’ 1))) = ((Ξ›β€˜π‘›) βˆ’ 1))
137114, 136eqtrd 2764 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) βˆ’ ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1))) = ((Ξ›β€˜π‘›) βˆ’ 1))
138137oveq2d 7417 . . . . . . . . . . 11 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((1 / 𝑛) Β· (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) βˆ’ ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1)))) = ((1 / 𝑛) Β· ((Ξ›β€˜π‘›) βˆ’ 1)))
139 peano2rem 11523 . . . . . . . . . . . . . 14 ((Ξ›β€˜π‘›) ∈ ℝ β†’ ((Ξ›β€˜π‘›) βˆ’ 1) ∈ ℝ)
140116, 139syl 17 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ›β€˜π‘›) βˆ’ 1) ∈ ℝ)
141140recnd 11238 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ›β€˜π‘›) βˆ’ 1) ∈ β„‚)
14297nnne0d 12258 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 β‰  0)
143141, 98, 142divrec2d 11990 . . . . . . . . . . 11 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) = ((1 / 𝑛) Β· ((Ξ›β€˜π‘›) βˆ’ 1)))
144138, 143eqtr4d 2767 . . . . . . . . . 10 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((1 / 𝑛) Β· (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) βˆ’ ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1)))) = (((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛))
14596, 144sumeq12rdv 15649 . . . . . . . . 9 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))((1 / 𝑛) Β· (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) βˆ’ ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1)))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛))
14623nn0cnd 12530 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ (1[,)+∞) β†’ (βŒŠβ€˜π‘₯) ∈ β„‚)
147 pncan 11462 . . . . . . . . . . . . . . . . . . 19 (((βŒŠβ€˜π‘₯) ∈ β„‚ ∧ 1 ∈ β„‚) β†’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1) = (βŒŠβ€˜π‘₯))
148146, 28, 147sylancl 585 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ (1[,)+∞) β†’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1) = (βŒŠβ€˜π‘₯))
149148fveq2d 6885 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ (1[,)+∞) β†’ (Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = (Οˆβ€˜(βŒŠβ€˜π‘₯)))
150 chpfl 26997 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ ℝ β†’ (Οˆβ€˜(βŒŠβ€˜π‘₯)) = (Οˆβ€˜π‘₯))
1514, 150syl 17 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ (1[,)+∞) β†’ (Οˆβ€˜(βŒŠβ€˜π‘₯)) = (Οˆβ€˜π‘₯))
152149, 151eqtrd 2764 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1[,)+∞) β†’ (Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = (Οˆβ€˜π‘₯))
153152oveq1d 7416 . . . . . . . . . . . . . . 15 (π‘₯ ∈ (1[,)+∞) β†’ ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = ((Οˆβ€˜π‘₯) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)))
15418recnd 11238 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1[,)+∞) β†’ (Οˆβ€˜π‘₯) ∈ β„‚)
15525nncnd 12224 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1[,)+∞) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„‚)
156 1cnd 11205 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1[,)+∞) β†’ 1 ∈ β„‚)
157154, 155, 156subsub3d 11597 . . . . . . . . . . . . . . 15 (π‘₯ ∈ (1[,)+∞) β†’ ((Οˆβ€˜π‘₯) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = (((Οˆβ€˜π‘₯) + 1) βˆ’ ((βŒŠβ€˜π‘₯) + 1)))
158153, 157eqtrd 2764 . . . . . . . . . . . . . 14 (π‘₯ ∈ (1[,)+∞) β†’ ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = (((Οˆβ€˜π‘₯) + 1) βˆ’ ((βŒŠβ€˜π‘₯) + 1)))
159158oveq2d 7417 . . . . . . . . . . . . 13 (π‘₯ ∈ (1[,)+∞) β†’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))) = ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· (((Οˆβ€˜π‘₯) + 1) βˆ’ ((βŒŠβ€˜π‘₯) + 1))))
16025nnrecred 12259 . . . . . . . . . . . . . . 15 (π‘₯ ∈ (1[,)+∞) β†’ (1 / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ)
161160recnd 11238 . . . . . . . . . . . . . 14 (π‘₯ ∈ (1[,)+∞) β†’ (1 / ((βŒŠβ€˜π‘₯) + 1)) ∈ β„‚)
162 peano2cn 11382 . . . . . . . . . . . . . . 15 ((Οˆβ€˜π‘₯) ∈ β„‚ β†’ ((Οˆβ€˜π‘₯) + 1) ∈ β„‚)
163154, 162syl 17 . . . . . . . . . . . . . 14 (π‘₯ ∈ (1[,)+∞) β†’ ((Οˆβ€˜π‘₯) + 1) ∈ β„‚)
164161, 163, 155subdid 11666 . . . . . . . . . . . . 13 (π‘₯ ∈ (1[,)+∞) β†’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· (((Οˆβ€˜π‘₯) + 1) βˆ’ ((βŒŠβ€˜π‘₯) + 1))) = (((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜π‘₯) + 1)) βˆ’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((βŒŠβ€˜π‘₯) + 1))))
16525nnne0d 12258 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1[,)+∞) β†’ ((βŒŠβ€˜π‘₯) + 1) β‰  0)
166163, 155, 165divrec2d 11990 . . . . . . . . . . . . . . 15 (π‘₯ ∈ (1[,)+∞) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) = ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜π‘₯) + 1)))
167166eqcomd 2730 . . . . . . . . . . . . . 14 (π‘₯ ∈ (1[,)+∞) β†’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜π‘₯) + 1)) = (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)))
168155, 165recid2d 11982 . . . . . . . . . . . . . 14 (π‘₯ ∈ (1[,)+∞) β†’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((βŒŠβ€˜π‘₯) + 1)) = 1)
169167, 168oveq12d 7419 . . . . . . . . . . . . 13 (π‘₯ ∈ (1[,)+∞) β†’ (((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜π‘₯) + 1)) βˆ’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((βŒŠβ€˜π‘₯) + 1))) = ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))
170159, 164, 1693eqtrd 2768 . . . . . . . . . . . 12 (π‘₯ ∈ (1[,)+∞) β†’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))) = ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))
17128mul01i 11400 . . . . . . . . . . . . 13 (1 Β· 0) = 0
172171a1i 11 . . . . . . . . . . . 12 (π‘₯ ∈ (1[,)+∞) β†’ (1 Β· 0) = 0)
173170, 172oveq12d 7419 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ (((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))) βˆ’ (1 Β· 0)) = (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) βˆ’ 0))
17430subid1d 11556 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) βˆ’ 0) = ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))
175173, 174eqtrd 2764 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ (((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))) βˆ’ (1 Β· 0)) = ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))
17697, 41syl 17 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· (𝑛 + 1)) ∈ β„•)
177176nnrecred 12259 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / (𝑛 Β· (𝑛 + 1))) ∈ ℝ)
178177recnd 11238 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / (𝑛 Β· (𝑛 + 1))) ∈ β„‚)
17997, 38syl 17 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜π‘›) ∈ ℝ)
180179recnd 11238 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜π‘›) ∈ β„‚)
181178, 180mulneg1d 11663 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (-(1 / (𝑛 Β· (𝑛 + 1))) Β· (π‘…β€˜π‘›)) = -((1 / (𝑛 Β· (𝑛 + 1))) Β· (π‘…β€˜π‘›)))
18298, 112mulcld 11230 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· 1) ∈ β„‚)
18398, 131mulcld 11230 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· (𝑛 + 1)) ∈ β„‚)
184176nnne0d 12258 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· (𝑛 + 1)) β‰  0)
185131, 182, 183, 184divsubdird 12025 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) βˆ’ (𝑛 Β· 1)) / (𝑛 Β· (𝑛 + 1))) = (((𝑛 + 1) / (𝑛 Β· (𝑛 + 1))) βˆ’ ((𝑛 Β· 1) / (𝑛 Β· (𝑛 + 1)))))
18698mulridd 11227 . . . . . . . . . . . . . . . . . . . 20 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· 1) = 𝑛)
187186oveq2d 7417 . . . . . . . . . . . . . . . . . . 19 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ (𝑛 Β· 1)) = ((𝑛 + 1) βˆ’ 𝑛))
188187, 134eqtrd 2764 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ (𝑛 Β· 1)) = 1)
189188oveq1d 7416 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) βˆ’ (𝑛 Β· 1)) / (𝑛 Β· (𝑛 + 1))) = (1 / (𝑛 Β· (𝑛 + 1))))
190131mulridd 11227 . . . . . . . . . . . . . . . . . . . 20 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) Β· 1) = (𝑛 + 1))
191131, 98mulcomd 11231 . . . . . . . . . . . . . . . . . . . 20 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) Β· 𝑛) = (𝑛 Β· (𝑛 + 1)))
192190, 191oveq12d 7419 . . . . . . . . . . . . . . . . . . 19 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) Β· 1) / ((𝑛 + 1) Β· 𝑛)) = ((𝑛 + 1) / (𝑛 Β· (𝑛 + 1))))
19397, 39syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 + 1) ∈ β„•)
194193nnne0d 12258 . . . . . . . . . . . . . . . . . . . 20 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 + 1) β‰  0)
195112, 98, 131, 142, 194divcan5d 12012 . . . . . . . . . . . . . . . . . . 19 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) Β· 1) / ((𝑛 + 1) Β· 𝑛)) = (1 / 𝑛))
196192, 195eqtr3d 2766 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) / (𝑛 Β· (𝑛 + 1))) = (1 / 𝑛))
197112, 131, 98, 194, 142divcan5d 12012 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 Β· 1) / (𝑛 Β· (𝑛 + 1))) = (1 / (𝑛 + 1)))
198196, 197oveq12d 7419 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) / (𝑛 Β· (𝑛 + 1))) βˆ’ ((𝑛 Β· 1) / (𝑛 Β· (𝑛 + 1)))) = ((1 / 𝑛) βˆ’ (1 / (𝑛 + 1))))
199185, 189, 1983eqtr3d 2772 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / (𝑛 Β· (𝑛 + 1))) = ((1 / 𝑛) βˆ’ (1 / (𝑛 + 1))))
200199negeqd 11450 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ -(1 / (𝑛 Β· (𝑛 + 1))) = -((1 / 𝑛) βˆ’ (1 / (𝑛 + 1))))
20197nnrecred 12259 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / 𝑛) ∈ ℝ)
202201recnd 11238 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / 𝑛) ∈ β„‚)
203193nnrecred 12259 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / (𝑛 + 1)) ∈ ℝ)
204203recnd 11238 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / (𝑛 + 1)) ∈ β„‚)
205202, 204negsubdi2d 11583 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ -((1 / 𝑛) βˆ’ (1 / (𝑛 + 1))) = ((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)))
206200, 205eqtr2d 2765 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) = -(1 / (𝑛 Β· (𝑛 + 1))))
20797nnrpd 13010 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ ℝ+)
208100, 207eqeltrd 2825 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ 1) ∈ ℝ+)
20935pntrval 27410 . . . . . . . . . . . . . . . 16 (((𝑛 + 1) βˆ’ 1) ∈ ℝ+ β†’ (π‘…β€˜((𝑛 + 1) βˆ’ 1)) = ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)))
210208, 209syl 17 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜((𝑛 + 1) βˆ’ 1)) = ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)))
211100fveq2d 6885 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜((𝑛 + 1) βˆ’ 1)) = (π‘…β€˜π‘›))
212210, 211eqtr3d 2766 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) = (π‘…β€˜π‘›))
213206, 212oveq12d 7419 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) Β· ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1))) = (-(1 / (𝑛 Β· (𝑛 + 1))) Β· (π‘…β€˜π‘›)))
214180, 183, 184divrec2d 11990 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) = ((1 / (𝑛 Β· (𝑛 + 1))) Β· (π‘…β€˜π‘›)))
215214negeqd 11450 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ -((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) = -((1 / (𝑛 Β· (𝑛 + 1))) Β· (π‘…β€˜π‘›)))
216181, 213, 2153eqtr4d 2774 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) Β· ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1))) = -((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
21796, 216sumeq12rdv 15649 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))(((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) Β· ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))-((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
218 fzfid 13934 . . . . . . . . . . . 12 (π‘₯ ∈ (1[,)+∞) β†’ (1...(βŒŠβ€˜π‘₯)) ∈ Fin)
21997, 42syl 17 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ ℝ)
220219recnd 11238 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ β„‚)
221218, 220fsumneg 15729 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))-((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) = -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
222217, 221eqtrd 2764 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))(((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) Β· ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1))) = -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
223175, 222oveq12d 7419 . . . . . . . . 9 (π‘₯ ∈ (1[,)+∞) β†’ ((((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))) βˆ’ (1 Β· 0)) βˆ’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))(((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) Β· ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)))) = (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) βˆ’ -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))))
22492, 145, 2233eqtr3d 2772 . . . . . . . 8 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) = (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) βˆ’ -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))))
22530, 46subnegd 11574 . . . . . . . 8 (π‘₯ ∈ (1[,)+∞) β†’ (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) βˆ’ -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) = (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))))
226224, 225eqtrd 2764 . . . . . . 7 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) = (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))))
22730, 46, 226mvrladdd 11623 . . . . . 6 (π‘₯ ∈ (1[,)+∞) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) βˆ’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1)) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
228227mpteq2ia 5241 . . . . 5 (π‘₯ ∈ (1[,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) βˆ’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))) = (π‘₯ ∈ (1[,)+∞) ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
229 fzfid 13934 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (1...(βŒŠβ€˜π‘₯)) ∈ Fin)
23032adantl 481 . . . . . . . . . . 11 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„•)
231230, 115syl 17 . . . . . . . . . 10 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Ξ›β€˜π‘›) ∈ ℝ)
232231, 139syl 17 . . . . . . . . 9 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ›β€˜π‘›) βˆ’ 1) ∈ ℝ)
233232, 230nndivred 12262 . . . . . . . 8 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) ∈ ℝ)
234229, 233fsumrecl 15676 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) ∈ ℝ)
235 rpre 12978 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ+ β†’ π‘₯ ∈ ℝ)
236235adantl 481 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ π‘₯ ∈ ℝ)
237236, 17syl 17 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (Οˆβ€˜π‘₯) ∈ ℝ)
238237, 19syl 17 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Οˆβ€˜π‘₯) + 1) ∈ ℝ)
239 rprege0 12985 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ+ β†’ (π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯))
240239, 22syl 17 . . . . . . . . . . 11 (π‘₯ ∈ ℝ+ β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
241240adantl 481 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
242241, 24syl 17 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„•)
243238, 242nndivred 12262 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ)
244 peano2rem 11523 . . . . . . . 8 ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ β†’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) ∈ ℝ)
245243, 244syl 17 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) ∈ ℝ)
246 reex 11196 . . . . . . . . . . . 12 ℝ ∈ V
247246, 14ssexi 5312 . . . . . . . . . . 11 ℝ+ ∈ V
248247a1i 11 . . . . . . . . . 10 (⊀ β†’ ℝ+ ∈ V)
249231, 230nndivred 12262 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ›β€˜π‘›) / 𝑛) ∈ ℝ)
250249recnd 11238 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ›β€˜π‘›) / 𝑛) ∈ β„‚)
251229, 250fsumcl 15675 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) ∈ β„‚)
252 relogcl 26425 . . . . . . . . . . . . 13 (π‘₯ ∈ ℝ+ β†’ (logβ€˜π‘₯) ∈ ℝ)
253252adantl 481 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (logβ€˜π‘₯) ∈ ℝ)
254253recnd 11238 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (logβ€˜π‘₯) ∈ β„‚)
255251, 254subcld 11567 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯)) ∈ β„‚)
256230nnrecred 12259 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / 𝑛) ∈ ℝ)
257229, 256fsumrecl 15676 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ∈ ℝ)
258257, 253resubcld 11638 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)) ∈ ℝ)
259 eqidd 2725 . . . . . . . . . 10 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) = (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))))
260 eqidd 2725 . . . . . . . . . 10 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) = (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))))
261248, 255, 258, 259, 260offval2 7683 . . . . . . . . 9 (⊀ β†’ ((π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∘f βˆ’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))) = (π‘₯ ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))))
262256recnd 11238 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / 𝑛) ∈ β„‚)
263229, 250, 262fsumsub 15730 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) / 𝑛) βˆ’ (1 / 𝑛)) = (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛)))
264231recnd 11238 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Ξ›β€˜π‘›) ∈ β„‚)
265 1cnd 11205 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ∈ β„‚)
266230nncnd 12224 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„‚)
267230nnne0d 12258 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 β‰  0)
268264, 265, 266, 267divsubdird 12025 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) = (((Ξ›β€˜π‘›) / 𝑛) βˆ’ (1 / 𝑛)))
269268sumeq2dv 15645 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) / 𝑛) βˆ’ (1 / 𝑛)))
270257recnd 11238 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ∈ β„‚)
271251, 270, 254nnncan2d 11602 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) = (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛)))
272263, 269, 2713eqtr4rd 2775 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛))
273272mpteq2dva 5238 . . . . . . . . 9 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))) = (π‘₯ ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛)))
274261, 273eqtrd 2764 . . . . . . . 8 (⊀ β†’ ((π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∘f βˆ’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))) = (π‘₯ ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛)))
275 vmadivsum 27330 . . . . . . . . 9 (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∈ 𝑂(1)
27614a1i 11 . . . . . . . . . 10 (⊀ β†’ ℝ+ βŠ† ℝ)
277258recnd 11238 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)) ∈ β„‚)
278 1red 11211 . . . . . . . . . 10 (⊀ β†’ 1 ∈ ℝ)
279 harmoniclbnd 26856 . . . . . . . . . . . . . 14 (π‘₯ ∈ ℝ+ β†’ (logβ€˜π‘₯) ≀ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛))
280279adantl 481 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (logβ€˜π‘₯) ≀ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛))
281253, 257, 280abssubge0d 15374 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) = (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))
282281adantrr 714 . . . . . . . . . . 11 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) = (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))
283235ad2antrl 725 . . . . . . . . . . . . 13 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ π‘₯ ∈ ℝ)
284 simprr 770 . . . . . . . . . . . . 13 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ 1 ≀ π‘₯)
285 harmonicubnd 26857 . . . . . . . . . . . . 13 ((π‘₯ ∈ ℝ ∧ 1 ≀ π‘₯) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ≀ ((logβ€˜π‘₯) + 1))
286283, 284, 285syl2anc 583 . . . . . . . . . . . 12 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ≀ ((logβ€˜π‘₯) + 1))
287 1red 11211 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ 1 ∈ ℝ)
288257, 253, 287lesubadd2d 11809 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)) ≀ 1 ↔ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ≀ ((logβ€˜π‘₯) + 1)))
289288adantrr 714 . . . . . . . . . . . 12 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)) ≀ 1 ↔ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ≀ ((logβ€˜π‘₯) + 1)))
290286, 289mpbird 257 . . . . . . . . . . 11 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)) ≀ 1)
291282, 290eqbrtrd 5160 . . . . . . . . . 10 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) ≀ 1)
292276, 277, 278, 278, 291elo1d 15476 . . . . . . . . 9 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) ∈ 𝑂(1))
293 o1sub 15556 . . . . . . . . 9 (((π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∈ 𝑂(1) ∧ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) ∈ 𝑂(1)) β†’ ((π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∘f βˆ’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))) ∈ 𝑂(1))
294275, 292, 293sylancr 586 . . . . . . . 8 (⊀ β†’ ((π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∘f βˆ’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))) ∈ 𝑂(1))
295274, 294eqeltrrd 2826 . . . . . . 7 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛)) ∈ 𝑂(1))
296243recnd 11238 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ β„‚)
297 1cnd 11205 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ 1 ∈ β„‚)
298237recnd 11238 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (Οˆβ€˜π‘₯) ∈ β„‚)
299 rpcnne0 12988 . . . . . . . . . . . . 13 (π‘₯ ∈ ℝ+ β†’ (π‘₯ ∈ β„‚ ∧ π‘₯ β‰  0))
300299adantl 481 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (π‘₯ ∈ β„‚ ∧ π‘₯ β‰  0))
301 divdir 11893 . . . . . . . . . . . 12 (((Οˆβ€˜π‘₯) ∈ β„‚ ∧ 1 ∈ β„‚ ∧ (π‘₯ ∈ β„‚ ∧ π‘₯ β‰  0)) β†’ (((Οˆβ€˜π‘₯) + 1) / π‘₯) = (((Οˆβ€˜π‘₯) / π‘₯) + (1 / π‘₯)))
302298, 297, 300, 301syl3anc 1368 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / π‘₯) = (((Οˆβ€˜π‘₯) / π‘₯) + (1 / π‘₯)))
303302mpteq2dva 5238 . . . . . . . . . 10 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) + 1) / π‘₯)) = (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) / π‘₯) + (1 / π‘₯))))
304 simpr 484 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ π‘₯ ∈ ℝ+)
305237, 304rerpdivcld 13043 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Οˆβ€˜π‘₯) / π‘₯) ∈ ℝ)
306 rpreccl 12996 . . . . . . . . . . . . 13 (π‘₯ ∈ ℝ+ β†’ (1 / π‘₯) ∈ ℝ+)
307306adantl 481 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (1 / π‘₯) ∈ ℝ+)
308 eqidd 2725 . . . . . . . . . . . 12 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) = (π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)))
309 eqidd 2725 . . . . . . . . . . . 12 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) = (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)))
310248, 305, 307, 308, 309offval2 7683 . . . . . . . . . . 11 (⊀ β†’ ((π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) ∘f + (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯))) = (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) / π‘₯) + (1 / π‘₯))))
311 chpo1ub 27328 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) ∈ 𝑂(1)
312 divrcnv 15794 . . . . . . . . . . . . . 14 (1 ∈ β„‚ β†’ (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) β‡π‘Ÿ 0)
31328, 312ax-mp 5 . . . . . . . . . . . . 13 (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) β‡π‘Ÿ 0
314 rlimo1 15557 . . . . . . . . . . . . 13 ((π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) β‡π‘Ÿ 0 β†’ (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) ∈ 𝑂(1))
315313, 314mp1i 13 . . . . . . . . . . . 12 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) ∈ 𝑂(1))
316 o1add 15554 . . . . . . . . . . . 12 (((π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) ∈ 𝑂(1) ∧ (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) ∈ 𝑂(1)) β†’ ((π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) ∘f + (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯))) ∈ 𝑂(1))
317311, 315, 316sylancr 586 . . . . . . . . . . 11 (⊀ β†’ ((π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) ∘f + (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯))) ∈ 𝑂(1))
318310, 317eqeltrrd 2826 . . . . . . . . . 10 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) / π‘₯) + (1 / π‘₯))) ∈ 𝑂(1))
319303, 318eqeltrd 2825 . . . . . . . . 9 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) + 1) / π‘₯)) ∈ 𝑂(1))
320238, 304rerpdivcld 13043 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / π‘₯) ∈ ℝ)
321 chpge0 26973 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ ℝ β†’ 0 ≀ (Οˆβ€˜π‘₯))
322236, 321syl 17 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ 0 ≀ (Οˆβ€˜π‘₯))
323237, 322ge0p1rpd 13042 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Οˆβ€˜π‘₯) + 1) ∈ ℝ+)
324323rprege0d 13019 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 ≀ ((Οˆβ€˜π‘₯) + 1)))
325242nnrpd 13010 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ ℝ+)
326325rpregt0d 13018 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((βŒŠβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 < ((βŒŠβ€˜π‘₯) + 1)))
327 divge0 12079 . . . . . . . . . . . . 13 (((((Οˆβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 ≀ ((Οˆβ€˜π‘₯) + 1)) ∧ (((βŒŠβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 < ((βŒŠβ€˜π‘₯) + 1))) β†’ 0 ≀ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)))
328324, 326, 327syl2anc 583 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ 0 ≀ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)))
329243, 328absidd 15365 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1))) = (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)))
330320recnd 11238 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / π‘₯) ∈ β„‚)
331330abscld 15379 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / π‘₯)) ∈ ℝ)
332 fllep1 13762 . . . . . . . . . . . . . 14 (π‘₯ ∈ ℝ β†’ π‘₯ ≀ ((βŒŠβ€˜π‘₯) + 1))
333236, 332syl 17 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ π‘₯ ≀ ((βŒŠβ€˜π‘₯) + 1))
334 rpregt0 12984 . . . . . . . . . . . . . . 15 (π‘₯ ∈ ℝ+ β†’ (π‘₯ ∈ ℝ ∧ 0 < π‘₯))
335334adantl 481 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (π‘₯ ∈ ℝ ∧ 0 < π‘₯))
336323rpregt0d 13018 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 < ((Οˆβ€˜π‘₯) + 1)))
337 lediv2 12100 . . . . . . . . . . . . . 14 (((π‘₯ ∈ ℝ ∧ 0 < π‘₯) ∧ (((βŒŠβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 < ((βŒŠβ€˜π‘₯) + 1)) ∧ (((Οˆβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 < ((Οˆβ€˜π‘₯) + 1))) β†’ (π‘₯ ≀ ((βŒŠβ€˜π‘₯) + 1) ↔ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ≀ (((Οˆβ€˜π‘₯) + 1) / π‘₯)))
338335, 326, 336, 337syl3anc 1368 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (π‘₯ ≀ ((βŒŠβ€˜π‘₯) + 1) ↔ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ≀ (((Οˆβ€˜π‘₯) + 1) / π‘₯)))
339333, 338mpbid 231 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ≀ (((Οˆβ€˜π‘₯) + 1) / π‘₯))
340320leabsd 15357 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / π‘₯) ≀ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / π‘₯)))
341243, 320, 331, 339, 340letrd 11367 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ≀ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / π‘₯)))
342329, 341eqbrtrd 5160 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1))) ≀ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / π‘₯)))
343342adantrr 714 . . . . . . . . 9 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1))) ≀ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / π‘₯)))
344278, 319, 320, 296, 343o1le 15595 . . . . . . . 8 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1))) ∈ 𝑂(1))
345 o1const 15560 . . . . . . . . . 10 ((ℝ+ βŠ† ℝ ∧ 1 ∈ β„‚) β†’ (π‘₯ ∈ ℝ+ ↦ 1) ∈ 𝑂(1))
34614, 28, 345mp2an 689 . . . . . . . . 9 (π‘₯ ∈ ℝ+ ↦ 1) ∈ 𝑂(1)
347346a1i 11 . . . . . . . 8 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ 1) ∈ 𝑂(1))
348296, 297, 344, 347o1sub2 15566 . . . . . . 7 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1)) ∈ 𝑂(1))
349234, 245, 295, 348o1sub2 15566 . . . . . 6 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) βˆ’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))) ∈ 𝑂(1))
35013, 349o1res2 15503 . . . . 5 (⊀ β†’ (π‘₯ ∈ (1[,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) βˆ’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))) ∈ 𝑂(1))
351228, 350eqeltrrid 2830 . . . 4 (⊀ β†’ (π‘₯ ∈ (1[,)+∞) ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) ∈ 𝑂(1))
35216, 351eqeltrd 2825 . . 3 (⊀ β†’ ((π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) β†Ύ (1[,)+∞)) ∈ 𝑂(1))
353 eqid 2724 . . . . . 6 (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) = (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
354353, 45fmpti 7103 . . . . 5 (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))):β„βŸΆβ„‚
355354a1i 11 . . . 4 (⊀ β†’ (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))):β„βŸΆβ„‚)
356 ssidd 3997 . . . 4 (⊀ β†’ ℝ βŠ† ℝ)
357355, 356, 278o1resb 15506 . . 3 (⊀ β†’ ((π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) ∈ 𝑂(1) ↔ ((π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) β†Ύ (1[,)+∞)) ∈ 𝑂(1)))
358352, 357mpbird 257 . 2 (⊀ β†’ (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) ∈ 𝑂(1))
359358mptru 1540 1 (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) ∈ 𝑂(1)
Colors of variables: wff setvar class
Syntax hints:   ↔ wb 205   ∧ wa 395   = wceq 1533  βŠ€wtru 1534   ∈ wcel 2098   β‰  wne 2932  Vcvv 3466   βŠ† wss 3940   class class class wbr 5138   ↦ cmpt 5221   β†Ύ cres 5668  βŸΆwf 6529  β€˜cfv 6533  (class class class)co 7401   ∘f cof 7661  β„‚cc 11103  β„cr 11104  0cc0 11105  1c1 11106   + caddc 11108   Β· cmul 11110  +∞cpnf 11241   < clt 11244   ≀ cle 11245   βˆ’ cmin 11440  -cneg 11441   / cdiv 11867  β„•cn 12208  2c2 12263  β„•0cn0 12468  β„€cz 12554  β„€β‰₯cuz 12818  β„+crp 12970  [,)cico 13322  ...cfz 13480  ..^cfzo 13623  βŒŠcfl 13751  abscabs 15177   β‡π‘Ÿ crli 15425  π‘‚(1)co1 15426  Ξ£csu 15628  logclog 26404  Ξ›cvma 26939  Οˆcchp 26940
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  ax-inf2 9631  ax-cnex 11161  ax-resscn 11162  ax-1cn 11163  ax-icn 11164  ax-addcl 11165  ax-addrcl 11166  ax-mulcl 11167  ax-mulrcl 11168  ax-mulcom 11169  ax-addass 11170  ax-mulass 11171  ax-distr 11172  ax-i2m1 11173  ax-1ne0 11174  ax-1rid 11175  ax-rnegex 11176  ax-rrecex 11177  ax-cnre 11178  ax-pre-lttri 11179  ax-pre-lttrn 11180  ax-pre-ltadd 11181  ax-pre-mulgt0 11182  ax-pre-sup 11183  ax-addf 11184
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-tp 4625  df-op 4627  df-uni 4900  df-int 4941  df-iun 4989  df-iin 4990  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-se 5622  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-of 7663  df-om 7849  df-1st 7968  df-2nd 7969  df-supp 8141  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-2o 8462  df-oadd 8465  df-er 8698  df-map 8817  df-pm 8818  df-ixp 8887  df-en 8935  df-dom 8936  df-sdom 8937  df-fin 8938  df-fsupp 9357  df-fi 9401  df-sup 9432  df-inf 9433  df-oi 9500  df-dju 9891  df-card 9929  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-4 12273  df-5 12274  df-6 12275  df-7 12276  df-8 12277  df-9 12278  df-n0 12469  df-xnn0 12541  df-z 12555  df-dec 12674  df-uz 12819  df-q 12929  df-rp 12971  df-xneg 13088  df-xadd 13089  df-xmul 13090  df-ioo 13324  df-ioc 13325  df-ico 13326  df-icc 13327  df-fz 13481  df-fzo 13624  df-fl 13753  df-mod 13831  df-seq 13963  df-exp 14024  df-fac 14230  df-bc 14259  df-hash 14287  df-shft 15010  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179  df-limsup 15411  df-clim 15428  df-rlim 15429  df-o1 15430  df-lo1 15431  df-sum 15629  df-ef 16007  df-e 16008  df-sin 16009  df-cos 16010  df-tan 16011  df-pi 16012  df-dvds 16194  df-gcd 16432  df-prm 16605  df-pc 16768  df-struct 17078  df-sets 17095  df-slot 17113  df-ndx 17125  df-base 17143  df-ress 17172  df-plusg 17208  df-mulr 17209  df-starv 17210  df-sca 17211  df-vsca 17212  df-ip 17213  df-tset 17214  df-ple 17215  df-ds 17217  df-unif 17218  df-hom 17219  df-cco 17220  df-rest 17366  df-topn 17367  df-0g 17385  df-gsum 17386  df-topgen 17387  df-pt 17388  df-prds 17391  df-xrs 17446  df-qtop 17451  df-imas 17452  df-xps 17454  df-mre 17528  df-mrc 17529  df-acs 17531  df-mgm 18562  df-sgrp 18641  df-mnd 18657  df-submnd 18703  df-mulg 18985  df-cntz 19222  df-cmn 19691  df-psmet 21219  df-xmet 21220  df-met 21221  df-bl 21222  df-mopn 21223  df-fbas 21224  df-fg 21225  df-cnfld 21228  df-top 22717  df-topon 22734  df-topsp 22756  df-bases 22770  df-cld 22844  df-ntr 22845  df-cls 22846  df-nei 22923  df-lp 22961  df-perf 22962  df-cn 23052  df-cnp 23053  df-haus 23140  df-cmp 23212  df-tx 23387  df-hmeo 23580  df-fil 23671  df-fm 23763  df-flim 23764  df-flf 23765  df-xms 24147  df-ms 24148  df-tms 24149  df-cncf 24719  df-limc 25716  df-dv 25717  df-ulm 26229  df-log 26406  df-cxp 26407  df-atan 26714  df-em 26840  df-cht 26944  df-vma 26945  df-chp 26946  df-ppi 26947
This theorem is referenced by:  pntrsumbnd  27414
  Copyright terms: Public domain W3C validator