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

Theorem pntrsumo1 27058
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 11211 . . . . . . . . . . 11 1 ∈ ℝ
2 elicopnf 13419 . . . . . . . . . . 11 (1 ∈ ℝ β†’ (π‘₯ ∈ (1[,)+∞) ↔ (π‘₯ ∈ ℝ ∧ 1 ≀ π‘₯)))
31, 2ax-mp 5 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) ↔ (π‘₯ ∈ ℝ ∧ 1 ≀ π‘₯))
43simplbi 499 . . . . . . . . 9 (π‘₯ ∈ (1[,)+∞) β†’ π‘₯ ∈ ℝ)
5 0red 11214 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ 0 ∈ ℝ)
6 1red 11212 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ 1 ∈ ℝ)
7 0lt1 11733 . . . . . . . . . . 11 0 < 1
87a1i 11 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ 0 < 1)
93simprbi 498 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ 1 ≀ π‘₯)
105, 6, 4, 8, 9ltletrd 11371 . . . . . . . . 9 (π‘₯ ∈ (1[,)+∞) β†’ 0 < π‘₯)
114, 10elrpd 13010 . . . . . . . 8 (π‘₯ ∈ (1[,)+∞) β†’ π‘₯ ∈ ℝ+)
1211ssriv 3986 . . . . . . 7 (1[,)+∞) βŠ† ℝ+
1312a1i 11 . . . . . 6 (⊀ β†’ (1[,)+∞) βŠ† ℝ+)
14 rpssre 12978 . . . . . 6 ℝ+ βŠ† ℝ
1513, 14sstrdi 3994 . . . . 5 (⊀ β†’ (1[,)+∞) βŠ† ℝ)
1615resmptd 6039 . . . 4 (⊀ β†’ ((π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) β†Ύ (1[,)+∞)) = (π‘₯ ∈ (1[,)+∞) ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))))
17 chpcl 26618 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ β†’ (Οˆβ€˜π‘₯) ∈ ℝ)
184, 17syl 17 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ (Οˆβ€˜π‘₯) ∈ ℝ)
19 peano2re 11384 . . . . . . . . . . 11 ((Οˆβ€˜π‘₯) ∈ ℝ β†’ ((Οˆβ€˜π‘₯) + 1) ∈ ℝ)
2018, 19syl 17 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ ((Οˆβ€˜π‘₯) + 1) ∈ ℝ)
2111rprege0d 13020 . . . . . . . . . . . 12 (π‘₯ ∈ (1[,)+∞) β†’ (π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯))
22 flge0nn0 13782 . . . . . . . . . . . 12 ((π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯) β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
2321, 22syl 17 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
24 nn0p1nn 12508 . . . . . . . . . . 11 ((βŒŠβ€˜π‘₯) ∈ β„•0 β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„•)
2523, 24syl 17 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„•)
2620, 25nndivred 12263 . . . . . . . . 9 (π‘₯ ∈ (1[,)+∞) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ)
2726recnd 11239 . . . . . . . 8 (π‘₯ ∈ (1[,)+∞) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ β„‚)
28 ax-1cn 11165 . . . . . . . 8 1 ∈ β„‚
29 subcl 11456 . . . . . . . 8 (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ β„‚ ∧ 1 ∈ β„‚) β†’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) ∈ β„‚)
3027, 28, 29sylancl 587 . . . . . . 7 (π‘₯ ∈ (1[,)+∞) β†’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) ∈ β„‚)
31 fzfid 13935 . . . . . . . . . 10 (π‘₯ ∈ ℝ β†’ (1...(βŒŠβ€˜π‘₯)) ∈ Fin)
32 elfznn 13527 . . . . . . . . . . . 12 (𝑛 ∈ (1...(βŒŠβ€˜π‘₯)) β†’ 𝑛 ∈ β„•)
3332adantl 483 . . . . . . . . . . 11 ((π‘₯ ∈ ℝ ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„•)
34 nnrp 12982 . . . . . . . . . . . . 13 (𝑛 ∈ β„• β†’ 𝑛 ∈ ℝ+)
35 pntrval.r . . . . . . . . . . . . . . 15 𝑅 = (π‘Ž ∈ ℝ+ ↦ ((Οˆβ€˜π‘Ž) βˆ’ π‘Ž))
3635pntrf 27056 . . . . . . . . . . . . . 14 𝑅:ℝ+βŸΆβ„
3736ffvelcdmi 7083 . . . . . . . . . . . . 13 (𝑛 ∈ ℝ+ β†’ (π‘…β€˜π‘›) ∈ ℝ)
3834, 37syl 17 . . . . . . . . . . . 12 (𝑛 ∈ β„• β†’ (π‘…β€˜π‘›) ∈ ℝ)
39 peano2nn 12221 . . . . . . . . . . . . 13 (𝑛 ∈ β„• β†’ (𝑛 + 1) ∈ β„•)
40 nnmulcl 12233 . . . . . . . . . . . . 13 ((𝑛 ∈ β„• ∧ (𝑛 + 1) ∈ β„•) β†’ (𝑛 Β· (𝑛 + 1)) ∈ β„•)
4139, 40mpdan 686 . . . . . . . . . . . 12 (𝑛 ∈ β„• β†’ (𝑛 Β· (𝑛 + 1)) ∈ β„•)
4238, 41nndivred 12263 . . . . . . . . . . 11 (𝑛 ∈ β„• β†’ ((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ ℝ)
4333, 42syl 17 . . . . . . . . . 10 ((π‘₯ ∈ ℝ ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ ℝ)
4431, 43fsumrecl 15677 . . . . . . . . 9 (π‘₯ ∈ ℝ β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ ℝ)
4544recnd 11239 . . . . . . . 8 (π‘₯ ∈ ℝ β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ β„‚)
464, 45syl 17 . . . . . . 7 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ β„‚)
47 oveq2 7414 . . . . . . . . . . 11 (π‘š = 𝑛 β†’ (1 / π‘š) = (1 / 𝑛))
48 fvoveq1 7429 . . . . . . . . . . . 12 (π‘š = 𝑛 β†’ (Οˆβ€˜(π‘š βˆ’ 1)) = (Οˆβ€˜(𝑛 βˆ’ 1)))
49 oveq1 7413 . . . . . . . . . . . 12 (π‘š = 𝑛 β†’ (π‘š βˆ’ 1) = (𝑛 βˆ’ 1))
5048, 49oveq12d 7424 . . . . . . . . . . 11 (π‘š = 𝑛 β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1)))
5147, 50jca 513 . . . . . . . . . 10 (π‘š = 𝑛 β†’ ((1 / π‘š) = (1 / 𝑛) ∧ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1))))
52 oveq2 7414 . . . . . . . . . . 11 (π‘š = (𝑛 + 1) β†’ (1 / π‘š) = (1 / (𝑛 + 1)))
53 fvoveq1 7429 . . . . . . . . . . . 12 (π‘š = (𝑛 + 1) β†’ (Οˆβ€˜(π‘š βˆ’ 1)) = (Οˆβ€˜((𝑛 + 1) βˆ’ 1)))
54 oveq1 7413 . . . . . . . . . . . 12 (π‘š = (𝑛 + 1) β†’ (π‘š βˆ’ 1) = ((𝑛 + 1) βˆ’ 1))
5553, 54oveq12d 7424 . . . . . . . . . . 11 (π‘š = (𝑛 + 1) β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)))
5652, 55jca 513 . . . . . . . . . 10 (π‘š = (𝑛 + 1) β†’ ((1 / π‘š) = (1 / (𝑛 + 1)) ∧ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1))))
57 oveq2 7414 . . . . . . . . . . . 12 (π‘š = 1 β†’ (1 / π‘š) = (1 / 1))
58 1div1e1 11901 . . . . . . . . . . . 12 (1 / 1) = 1
5957, 58eqtrdi 2789 . . . . . . . . . . 11 (π‘š = 1 β†’ (1 / π‘š) = 1)
60 oveq1 7413 . . . . . . . . . . . . . . . 16 (π‘š = 1 β†’ (π‘š βˆ’ 1) = (1 βˆ’ 1))
61 1m1e0 12281 . . . . . . . . . . . . . . . 16 (1 βˆ’ 1) = 0
6260, 61eqtrdi 2789 . . . . . . . . . . . . . . 15 (π‘š = 1 β†’ (π‘š βˆ’ 1) = 0)
6362fveq2d 6893 . . . . . . . . . . . . . 14 (π‘š = 1 β†’ (Οˆβ€˜(π‘š βˆ’ 1)) = (Οˆβ€˜0))
64 2pos 12312 . . . . . . . . . . . . . . 15 0 < 2
65 0re 11213 . . . . . . . . . . . . . . . 16 0 ∈ ℝ
66 chpeq0 26701 . . . . . . . . . . . . . . . 16 (0 ∈ ℝ β†’ ((Οˆβ€˜0) = 0 ↔ 0 < 2))
6765, 66ax-mp 5 . . . . . . . . . . . . . . 15 ((Οˆβ€˜0) = 0 ↔ 0 < 2)
6864, 67mpbir 230 . . . . . . . . . . . . . 14 (Οˆβ€˜0) = 0
6963, 68eqtrdi 2789 . . . . . . . . . . . . 13 (π‘š = 1 β†’ (Οˆβ€˜(π‘š βˆ’ 1)) = 0)
7069, 62oveq12d 7424 . . . . . . . . . . . 12 (π‘š = 1 β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = (0 βˆ’ 0))
71 0m0e0 12329 . . . . . . . . . . . 12 (0 βˆ’ 0) = 0
7270, 71eqtrdi 2789 . . . . . . . . . . 11 (π‘š = 1 β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = 0)
7359, 72jca 513 . . . . . . . . . 10 (π‘š = 1 β†’ ((1 / π‘š) = 1 ∧ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = 0))
74 oveq2 7414 . . . . . . . . . . 11 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (1 / π‘š) = (1 / ((βŒŠβ€˜π‘₯) + 1)))
75 fvoveq1 7429 . . . . . . . . . . . 12 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (Οˆβ€˜(π‘š βˆ’ 1)) = (Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)))
76 oveq1 7413 . . . . . . . . . . . 12 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (π‘š βˆ’ 1) = (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))
7775, 76oveq12d 7424 . . . . . . . . . . 11 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)))
7874, 77jca 513 . . . . . . . . . 10 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ ((1 / π‘š) = (1 / ((βŒŠβ€˜π‘₯) + 1)) ∧ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) = ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))))
79 nnuz 12862 . . . . . . . . . . 11 β„• = (β„€β‰₯β€˜1)
8025, 79eleqtrdi 2844 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ (β„€β‰₯β€˜1))
81 elfznn 13527 . . . . . . . . . . . . 13 (π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1)) β†’ π‘š ∈ β„•)
8281adantl 483 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ π‘š ∈ β„•)
8382nnrecred 12260 . . . . . . . . . . 11 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (1 / π‘š) ∈ ℝ)
8483recnd 11239 . . . . . . . . . 10 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (1 / π‘š) ∈ β„‚)
8582nnred 12224 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ π‘š ∈ ℝ)
86 peano2rem 11524 . . . . . . . . . . . . . 14 (π‘š ∈ ℝ β†’ (π‘š βˆ’ 1) ∈ ℝ)
8785, 86syl 17 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (π‘š βˆ’ 1) ∈ ℝ)
88 chpcl 26618 . . . . . . . . . . . . 13 ((π‘š βˆ’ 1) ∈ ℝ β†’ (Οˆβ€˜(π‘š βˆ’ 1)) ∈ ℝ)
8987, 88syl 17 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (Οˆβ€˜(π‘š βˆ’ 1)) ∈ ℝ)
9089, 87resubcld 11639 . . . . . . . . . . 11 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) ∈ ℝ)
9190recnd 11239 . . . . . . . . . 10 ((π‘₯ ∈ (1[,)+∞) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ ((Οˆβ€˜(π‘š βˆ’ 1)) βˆ’ (π‘š βˆ’ 1)) ∈ β„‚)
9251, 56, 73, 78, 80, 84, 91fsumparts 15749 . . . . . . . . 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 13760 . . . . . . . . . . . 12 (π‘₯ ∈ (1[,)+∞) β†’ (βŒŠβ€˜π‘₯) ∈ β„€)
94 fzval3 13698 . . . . . . . . . . . 12 ((βŒŠβ€˜π‘₯) ∈ β„€ β†’ (1...(βŒŠβ€˜π‘₯)) = (1..^((βŒŠβ€˜π‘₯) + 1)))
9593, 94syl 17 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ (1...(βŒŠβ€˜π‘₯)) = (1..^((βŒŠβ€˜π‘₯) + 1)))
9695eqcomd 2739 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ (1..^((βŒŠβ€˜π‘₯) + 1)) = (1...(βŒŠβ€˜π‘₯)))
9732adantl 483 . . . . . . . . . . . . . . . . . . 19 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„•)
9897nncnd 12225 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„‚)
99 pncan 11463 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ β„‚ ∧ 1 ∈ β„‚) β†’ ((𝑛 + 1) βˆ’ 1) = 𝑛)
10098, 28, 99sylancl 587 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ 1) = 𝑛)
10197nnred 12224 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ ℝ)
102100, 101eqeltrd 2834 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ 1) ∈ ℝ)
103 chpcl 26618 . . . . . . . . . . . . . . . 16 (((𝑛 + 1) βˆ’ 1) ∈ ℝ β†’ (Οˆβ€˜((𝑛 + 1) βˆ’ 1)) ∈ ℝ)
104102, 103syl 17 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜((𝑛 + 1) βˆ’ 1)) ∈ ℝ)
105104recnd 11239 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜((𝑛 + 1) βˆ’ 1)) ∈ β„‚)
106102recnd 11239 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ 1) ∈ β„‚)
107 peano2rem 11524 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℝ β†’ (𝑛 βˆ’ 1) ∈ ℝ)
108101, 107syl 17 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 βˆ’ 1) ∈ ℝ)
109 chpcl 26618 . . . . . . . . . . . . . . . 16 ((𝑛 βˆ’ 1) ∈ ℝ β†’ (Οˆβ€˜(𝑛 βˆ’ 1)) ∈ ℝ)
110108, 109syl 17 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜(𝑛 βˆ’ 1)) ∈ ℝ)
111110recnd 11239 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜(𝑛 βˆ’ 1)) ∈ β„‚)
112 1cnd 11206 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ∈ β„‚)
11398, 112subcld 11568 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 βˆ’ 1) ∈ β„‚)
114105, 106, 111, 113sub4d 11617 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) βˆ’ ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1))) = (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (Οˆβ€˜(𝑛 βˆ’ 1))) βˆ’ (((𝑛 + 1) βˆ’ 1) βˆ’ (𝑛 βˆ’ 1))))
115 vmacl 26612 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ β„• β†’ (Ξ›β€˜π‘›) ∈ ℝ)
11697, 115syl 17 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Ξ›β€˜π‘›) ∈ ℝ)
117116recnd 11239 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Ξ›β€˜π‘›) ∈ β„‚)
118 nnm1nn0 12510 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ β„• β†’ (𝑛 βˆ’ 1) ∈ β„•0)
11997, 118syl 17 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 βˆ’ 1) ∈ β„•0)
120 chpp1 26649 . . . . . . . . . . . . . . . . 17 ((𝑛 βˆ’ 1) ∈ β„•0 β†’ (Οˆβ€˜((𝑛 βˆ’ 1) + 1)) = ((Οˆβ€˜(𝑛 βˆ’ 1)) + (Ξ›β€˜((𝑛 βˆ’ 1) + 1))))
121119, 120syl 17 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜((𝑛 βˆ’ 1) + 1)) = ((Οˆβ€˜(𝑛 βˆ’ 1)) + (Ξ›β€˜((𝑛 βˆ’ 1) + 1))))
122 npcan 11466 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ β„‚ ∧ 1 ∈ β„‚) β†’ ((𝑛 βˆ’ 1) + 1) = 𝑛)
12398, 28, 122sylancl 587 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 βˆ’ 1) + 1) = 𝑛)
124123, 100eqtr4d 2776 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 βˆ’ 1) + 1) = ((𝑛 + 1) βˆ’ 1))
125124fveq2d 6893 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜((𝑛 βˆ’ 1) + 1)) = (Οˆβ€˜((𝑛 + 1) βˆ’ 1)))
126123fveq2d 6893 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Ξ›β€˜((𝑛 βˆ’ 1) + 1)) = (Ξ›β€˜π‘›))
127126oveq2d 7422 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Οˆβ€˜(𝑛 βˆ’ 1)) + (Ξ›β€˜((𝑛 βˆ’ 1) + 1))) = ((Οˆβ€˜(𝑛 βˆ’ 1)) + (Ξ›β€˜π‘›)))
128121, 125, 1273eqtr3d 2781 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Οˆβ€˜((𝑛 + 1) βˆ’ 1)) = ((Οˆβ€˜(𝑛 βˆ’ 1)) + (Ξ›β€˜π‘›)))
129111, 117, 128mvrladdd 11624 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (Οˆβ€˜(𝑛 βˆ’ 1))) = (Ξ›β€˜π‘›))
130 peano2cn 11383 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ β„‚ β†’ (𝑛 + 1) ∈ β„‚)
13198, 130syl 17 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 + 1) ∈ β„‚)
132131, 98, 112nnncan2d 11603 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) βˆ’ 1) βˆ’ (𝑛 βˆ’ 1)) = ((𝑛 + 1) βˆ’ 𝑛))
133 pncan2 11464 . . . . . . . . . . . . . . . 16 ((𝑛 ∈ β„‚ ∧ 1 ∈ β„‚) β†’ ((𝑛 + 1) βˆ’ 𝑛) = 1)
13498, 28, 133sylancl 587 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ 𝑛) = 1)
135132, 134eqtrd 2773 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) βˆ’ 1) βˆ’ (𝑛 βˆ’ 1)) = 1)
136129, 135oveq12d 7424 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (Οˆβ€˜(𝑛 βˆ’ 1))) βˆ’ (((𝑛 + 1) βˆ’ 1) βˆ’ (𝑛 βˆ’ 1))) = ((Ξ›β€˜π‘›) βˆ’ 1))
137114, 136eqtrd 2773 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) βˆ’ ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1))) = ((Ξ›β€˜π‘›) βˆ’ 1))
138137oveq2d 7422 . . . . . . . . . . 11 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((1 / 𝑛) Β· (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) βˆ’ ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1)))) = ((1 / 𝑛) Β· ((Ξ›β€˜π‘›) βˆ’ 1)))
139 peano2rem 11524 . . . . . . . . . . . . . 14 ((Ξ›β€˜π‘›) ∈ ℝ β†’ ((Ξ›β€˜π‘›) βˆ’ 1) ∈ ℝ)
140116, 139syl 17 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ›β€˜π‘›) βˆ’ 1) ∈ ℝ)
141140recnd 11239 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ›β€˜π‘›) βˆ’ 1) ∈ β„‚)
14297nnne0d 12259 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 β‰  0)
143141, 98, 142divrec2d 11991 . . . . . . . . . . 11 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) = ((1 / 𝑛) Β· ((Ξ›β€˜π‘›) βˆ’ 1)))
144138, 143eqtr4d 2776 . . . . . . . . . 10 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((1 / 𝑛) Β· (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) βˆ’ ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1)))) = (((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛))
14596, 144sumeq12rdv 15650 . . . . . . . . 9 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))((1 / 𝑛) Β· (((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) βˆ’ ((Οˆβ€˜(𝑛 βˆ’ 1)) βˆ’ (𝑛 βˆ’ 1)))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛))
14623nn0cnd 12531 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ (1[,)+∞) β†’ (βŒŠβ€˜π‘₯) ∈ β„‚)
147 pncan 11463 . . . . . . . . . . . . . . . . . . 19 (((βŒŠβ€˜π‘₯) ∈ β„‚ ∧ 1 ∈ β„‚) β†’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1) = (βŒŠβ€˜π‘₯))
148146, 28, 147sylancl 587 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ (1[,)+∞) β†’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1) = (βŒŠβ€˜π‘₯))
149148fveq2d 6893 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ (1[,)+∞) β†’ (Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = (Οˆβ€˜(βŒŠβ€˜π‘₯)))
150 chpfl 26644 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ ℝ β†’ (Οˆβ€˜(βŒŠβ€˜π‘₯)) = (Οˆβ€˜π‘₯))
1514, 150syl 17 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ (1[,)+∞) β†’ (Οˆβ€˜(βŒŠβ€˜π‘₯)) = (Οˆβ€˜π‘₯))
152149, 151eqtrd 2773 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1[,)+∞) β†’ (Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = (Οˆβ€˜π‘₯))
153152oveq1d 7421 . . . . . . . . . . . . . . 15 (π‘₯ ∈ (1[,)+∞) β†’ ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = ((Οˆβ€˜π‘₯) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)))
15418recnd 11239 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1[,)+∞) β†’ (Οˆβ€˜π‘₯) ∈ β„‚)
15525nncnd 12225 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1[,)+∞) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„‚)
156 1cnd 11206 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1[,)+∞) β†’ 1 ∈ β„‚)
157154, 155, 156subsub3d 11598 . . . . . . . . . . . . . . 15 (π‘₯ ∈ (1[,)+∞) β†’ ((Οˆβ€˜π‘₯) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = (((Οˆβ€˜π‘₯) + 1) βˆ’ ((βŒŠβ€˜π‘₯) + 1)))
158153, 157eqtrd 2773 . . . . . . . . . . . . . 14 (π‘₯ ∈ (1[,)+∞) β†’ ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = (((Οˆβ€˜π‘₯) + 1) βˆ’ ((βŒŠβ€˜π‘₯) + 1)))
159158oveq2d 7422 . . . . . . . . . . . . 13 (π‘₯ ∈ (1[,)+∞) β†’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))) = ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· (((Οˆβ€˜π‘₯) + 1) βˆ’ ((βŒŠβ€˜π‘₯) + 1))))
16025nnrecred 12260 . . . . . . . . . . . . . . 15 (π‘₯ ∈ (1[,)+∞) β†’ (1 / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ)
161160recnd 11239 . . . . . . . . . . . . . 14 (π‘₯ ∈ (1[,)+∞) β†’ (1 / ((βŒŠβ€˜π‘₯) + 1)) ∈ β„‚)
162 peano2cn 11383 . . . . . . . . . . . . . . 15 ((Οˆβ€˜π‘₯) ∈ β„‚ β†’ ((Οˆβ€˜π‘₯) + 1) ∈ β„‚)
163154, 162syl 17 . . . . . . . . . . . . . 14 (π‘₯ ∈ (1[,)+∞) β†’ ((Οˆβ€˜π‘₯) + 1) ∈ β„‚)
164161, 163, 155subdid 11667 . . . . . . . . . . . . 13 (π‘₯ ∈ (1[,)+∞) β†’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· (((Οˆβ€˜π‘₯) + 1) βˆ’ ((βŒŠβ€˜π‘₯) + 1))) = (((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜π‘₯) + 1)) βˆ’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((βŒŠβ€˜π‘₯) + 1))))
16525nnne0d 12259 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1[,)+∞) β†’ ((βŒŠβ€˜π‘₯) + 1) β‰  0)
166163, 155, 165divrec2d 11991 . . . . . . . . . . . . . . 15 (π‘₯ ∈ (1[,)+∞) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) = ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜π‘₯) + 1)))
167166eqcomd 2739 . . . . . . . . . . . . . 14 (π‘₯ ∈ (1[,)+∞) β†’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜π‘₯) + 1)) = (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)))
168155, 165recid2d 11983 . . . . . . . . . . . . . 14 (π‘₯ ∈ (1[,)+∞) β†’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((βŒŠβ€˜π‘₯) + 1)) = 1)
169167, 168oveq12d 7424 . . . . . . . . . . . . 13 (π‘₯ ∈ (1[,)+∞) β†’ (((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜π‘₯) + 1)) βˆ’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((βŒŠβ€˜π‘₯) + 1))) = ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))
170159, 164, 1693eqtrd 2777 . . . . . . . . . . . 12 (π‘₯ ∈ (1[,)+∞) β†’ ((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))) = ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))
17128mul01i 11401 . . . . . . . . . . . . 13 (1 Β· 0) = 0
172171a1i 11 . . . . . . . . . . . 12 (π‘₯ ∈ (1[,)+∞) β†’ (1 Β· 0) = 0)
173170, 172oveq12d 7424 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ (((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))) βˆ’ (1 Β· 0)) = (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) βˆ’ 0))
17430subid1d 11557 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) βˆ’ 0) = ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))
175173, 174eqtrd 2773 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ (((1 / ((βŒŠβ€˜π‘₯) + 1)) Β· ((Οˆβ€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))) βˆ’ (1 Β· 0)) = ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))
17697, 41syl 17 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· (𝑛 + 1)) ∈ β„•)
177176nnrecred 12260 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / (𝑛 Β· (𝑛 + 1))) ∈ ℝ)
178177recnd 11239 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / (𝑛 Β· (𝑛 + 1))) ∈ β„‚)
17997, 38syl 17 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜π‘›) ∈ ℝ)
180179recnd 11239 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜π‘›) ∈ β„‚)
181178, 180mulneg1d 11664 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (-(1 / (𝑛 Β· (𝑛 + 1))) Β· (π‘…β€˜π‘›)) = -((1 / (𝑛 Β· (𝑛 + 1))) Β· (π‘…β€˜π‘›)))
18298, 112mulcld 11231 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· 1) ∈ β„‚)
18398, 131mulcld 11231 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· (𝑛 + 1)) ∈ β„‚)
184176nnne0d 12259 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· (𝑛 + 1)) β‰  0)
185131, 182, 183, 184divsubdird 12026 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) βˆ’ (𝑛 Β· 1)) / (𝑛 Β· (𝑛 + 1))) = (((𝑛 + 1) / (𝑛 Β· (𝑛 + 1))) βˆ’ ((𝑛 Β· 1) / (𝑛 Β· (𝑛 + 1)))))
18698mulridd 11228 . . . . . . . . . . . . . . . . . . . 20 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· 1) = 𝑛)
187186oveq2d 7422 . . . . . . . . . . . . . . . . . . 19 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ (𝑛 Β· 1)) = ((𝑛 + 1) βˆ’ 𝑛))
188187, 134eqtrd 2773 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ (𝑛 Β· 1)) = 1)
189188oveq1d 7421 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) βˆ’ (𝑛 Β· 1)) / (𝑛 Β· (𝑛 + 1))) = (1 / (𝑛 Β· (𝑛 + 1))))
190131mulridd 11228 . . . . . . . . . . . . . . . . . . . 20 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) Β· 1) = (𝑛 + 1))
191131, 98mulcomd 11232 . . . . . . . . . . . . . . . . . . . 20 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) Β· 𝑛) = (𝑛 Β· (𝑛 + 1)))
192190, 191oveq12d 7424 . . . . . . . . . . . . . . . . . . 19 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) Β· 1) / ((𝑛 + 1) Β· 𝑛)) = ((𝑛 + 1) / (𝑛 Β· (𝑛 + 1))))
19397, 39syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 + 1) ∈ β„•)
194193nnne0d 12259 . . . . . . . . . . . . . . . . . . . 20 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 + 1) β‰  0)
195112, 98, 131, 142, 194divcan5d 12013 . . . . . . . . . . . . . . . . . . 19 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) Β· 1) / ((𝑛 + 1) Β· 𝑛)) = (1 / 𝑛))
196192, 195eqtr3d 2775 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) / (𝑛 Β· (𝑛 + 1))) = (1 / 𝑛))
197112, 131, 98, 194, 142divcan5d 12013 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 Β· 1) / (𝑛 Β· (𝑛 + 1))) = (1 / (𝑛 + 1)))
198196, 197oveq12d 7424 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((𝑛 + 1) / (𝑛 Β· (𝑛 + 1))) βˆ’ ((𝑛 Β· 1) / (𝑛 Β· (𝑛 + 1)))) = ((1 / 𝑛) βˆ’ (1 / (𝑛 + 1))))
199185, 189, 1983eqtr3d 2781 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / (𝑛 Β· (𝑛 + 1))) = ((1 / 𝑛) βˆ’ (1 / (𝑛 + 1))))
200199negeqd 11451 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ -(1 / (𝑛 Β· (𝑛 + 1))) = -((1 / 𝑛) βˆ’ (1 / (𝑛 + 1))))
20197nnrecred 12260 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / 𝑛) ∈ ℝ)
202201recnd 11239 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / 𝑛) ∈ β„‚)
203193nnrecred 12260 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / (𝑛 + 1)) ∈ ℝ)
204203recnd 11239 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / (𝑛 + 1)) ∈ β„‚)
205202, 204negsubdi2d 11584 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ -((1 / 𝑛) βˆ’ (1 / (𝑛 + 1))) = ((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)))
206200, 205eqtr2d 2774 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) = -(1 / (𝑛 Β· (𝑛 + 1))))
20797nnrpd 13011 . . . . . . . . . . . . . . . . 17 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ ℝ+)
208100, 207eqeltrd 2834 . . . . . . . . . . . . . . . 16 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ 1) ∈ ℝ+)
20935pntrval 27055 . . . . . . . . . . . . . . . 16 (((𝑛 + 1) βˆ’ 1) ∈ ℝ+ β†’ (π‘…β€˜((𝑛 + 1) βˆ’ 1)) = ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)))
210208, 209syl 17 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜((𝑛 + 1) βˆ’ 1)) = ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)))
211100fveq2d 6893 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜((𝑛 + 1) βˆ’ 1)) = (π‘…β€˜π‘›))
212210, 211eqtr3d 2775 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1)) = (π‘…β€˜π‘›))
213206, 212oveq12d 7424 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) Β· ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1))) = (-(1 / (𝑛 Β· (𝑛 + 1))) Β· (π‘…β€˜π‘›)))
214180, 183, 184divrec2d 11991 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) = ((1 / (𝑛 Β· (𝑛 + 1))) Β· (π‘…β€˜π‘›)))
215214negeqd 11451 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ -((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) = -((1 / (𝑛 Β· (𝑛 + 1))) Β· (π‘…β€˜π‘›)))
216181, 213, 2153eqtr4d 2783 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) Β· ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1))) = -((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
21796, 216sumeq12rdv 15650 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))(((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) Β· ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))-((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
218 fzfid 13935 . . . . . . . . . . . 12 (π‘₯ ∈ (1[,)+∞) β†’ (1...(βŒŠβ€˜π‘₯)) ∈ Fin)
21997, 42syl 17 . . . . . . . . . . . . 13 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ ℝ)
220219recnd 11239 . . . . . . . . . . . 12 ((π‘₯ ∈ (1[,)+∞) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) ∈ β„‚)
221218, 220fsumneg 15730 . . . . . . . . . . 11 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))-((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))) = -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
222217, 221eqtrd 2773 . . . . . . . . . 10 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))(((1 / (𝑛 + 1)) βˆ’ (1 / 𝑛)) Β· ((Οˆβ€˜((𝑛 + 1) βˆ’ 1)) βˆ’ ((𝑛 + 1) βˆ’ 1))) = -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
223175, 222oveq12d 7424 . . . . . . . . 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 2781 . . . . . . . 8 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) = (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) βˆ’ -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))))
22530, 46subnegd 11575 . . . . . . . 8 (π‘₯ ∈ (1[,)+∞) β†’ (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) βˆ’ -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) = (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))))
226224, 225eqtrd 2773 . . . . . . 7 (π‘₯ ∈ (1[,)+∞) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) = (((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))))
22730, 46, 226mvrladdd 11624 . . . . . 6 (π‘₯ ∈ (1[,)+∞) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) βˆ’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1)) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
228227mpteq2ia 5251 . . . . 5 (π‘₯ ∈ (1[,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) βˆ’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))) = (π‘₯ ∈ (1[,)+∞) ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
229 fzfid 13935 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (1...(βŒŠβ€˜π‘₯)) ∈ Fin)
23032adantl 483 . . . . . . . . . . 11 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„•)
231230, 115syl 17 . . . . . . . . . 10 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Ξ›β€˜π‘›) ∈ ℝ)
232231, 139syl 17 . . . . . . . . 9 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ›β€˜π‘›) βˆ’ 1) ∈ ℝ)
233232, 230nndivred 12263 . . . . . . . 8 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) ∈ ℝ)
234229, 233fsumrecl 15677 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) ∈ ℝ)
235 rpre 12979 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ+ β†’ π‘₯ ∈ ℝ)
236235adantl 483 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ π‘₯ ∈ ℝ)
237236, 17syl 17 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (Οˆβ€˜π‘₯) ∈ ℝ)
238237, 19syl 17 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Οˆβ€˜π‘₯) + 1) ∈ ℝ)
239 rprege0 12986 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ+ β†’ (π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯))
240239, 22syl 17 . . . . . . . . . . 11 (π‘₯ ∈ ℝ+ β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
241240adantl 483 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
242241, 24syl 17 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„•)
243238, 242nndivred 12263 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ)
244 peano2rem 11524 . . . . . . . 8 ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ β†’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) ∈ ℝ)
245243, 244syl 17 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1) ∈ ℝ)
246 reex 11198 . . . . . . . . . . . 12 ℝ ∈ V
247246, 14ssexi 5322 . . . . . . . . . . 11 ℝ+ ∈ V
248247a1i 11 . . . . . . . . . 10 (⊀ β†’ ℝ+ ∈ V)
249231, 230nndivred 12263 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ›β€˜π‘›) / 𝑛) ∈ ℝ)
250249recnd 11239 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((Ξ›β€˜π‘›) / 𝑛) ∈ β„‚)
251229, 250fsumcl 15676 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) ∈ β„‚)
252 relogcl 26076 . . . . . . . . . . . . 13 (π‘₯ ∈ ℝ+ β†’ (logβ€˜π‘₯) ∈ ℝ)
253252adantl 483 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (logβ€˜π‘₯) ∈ ℝ)
254253recnd 11239 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (logβ€˜π‘₯) ∈ β„‚)
255251, 254subcld 11568 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯)) ∈ β„‚)
256230nnrecred 12260 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / 𝑛) ∈ ℝ)
257229, 256fsumrecl 15677 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ∈ ℝ)
258257, 253resubcld 11639 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)) ∈ ℝ)
259 eqidd 2734 . . . . . . . . . 10 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) = (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))))
260 eqidd 2734 . . . . . . . . . 10 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) = (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))))
261248, 255, 258, 259, 260offval2 7687 . . . . . . . . 9 (⊀ β†’ ((π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∘f βˆ’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))) = (π‘₯ ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))))
262256recnd 11239 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (1 / 𝑛) ∈ β„‚)
263229, 250, 262fsumsub 15731 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) / 𝑛) βˆ’ (1 / 𝑛)) = (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛)))
264231recnd 11239 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (Ξ›β€˜π‘›) ∈ β„‚)
265 1cnd 11206 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ∈ β„‚)
266230nncnd 12225 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„‚)
267230nnne0d 12259 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 β‰  0)
268264, 265, 266, 267divsubdird 12026 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ ℝ+) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) = (((Ξ›β€˜π‘›) / 𝑛) βˆ’ (1 / 𝑛)))
269268sumeq2dv 15646 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) / 𝑛) βˆ’ (1 / 𝑛)))
270257recnd 11239 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ∈ β„‚)
271251, 270, 254nnncan2d 11603 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) = (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛)))
272263, 269, 2713eqtr4rd 2784 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛))
273272mpteq2dva 5248 . . . . . . . . 9 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))) = (π‘₯ ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛)))
274261, 273eqtrd 2773 . . . . . . . 8 (⊀ β†’ ((π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∘f βˆ’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))) = (π‘₯ ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛)))
275 vmadivsum 26975 . . . . . . . . 9 (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∈ 𝑂(1)
27614a1i 11 . . . . . . . . . 10 (⊀ β†’ ℝ+ βŠ† ℝ)
277258recnd 11239 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)) ∈ β„‚)
278 1red 11212 . . . . . . . . . 10 (⊀ β†’ 1 ∈ ℝ)
279 harmoniclbnd 26503 . . . . . . . . . . . . . 14 (π‘₯ ∈ ℝ+ β†’ (logβ€˜π‘₯) ≀ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛))
280279adantl 483 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (logβ€˜π‘₯) ≀ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛))
281253, 257, 280abssubge0d 15375 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) = (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))
282281adantrr 716 . . . . . . . . . . 11 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) = (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))
283235ad2antrl 727 . . . . . . . . . . . . 13 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ π‘₯ ∈ ℝ)
284 simprr 772 . . . . . . . . . . . . 13 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ 1 ≀ π‘₯)
285 harmonicubnd 26504 . . . . . . . . . . . . 13 ((π‘₯ ∈ ℝ ∧ 1 ≀ π‘₯) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ≀ ((logβ€˜π‘₯) + 1))
286283, 284, 285syl2anc 585 . . . . . . . . . . . 12 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ≀ ((logβ€˜π‘₯) + 1))
287 1red 11212 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ 1 ∈ ℝ)
288257, 253, 287lesubadd2d 11810 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)) ≀ 1 ↔ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ≀ ((logβ€˜π‘₯) + 1)))
289288adantrr 716 . . . . . . . . . . . 12 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)) ≀ 1 ↔ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) ≀ ((logβ€˜π‘₯) + 1)))
290286, 289mpbird 257 . . . . . . . . . . 11 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)) ≀ 1)
291282, 290eqbrtrd 5170 . . . . . . . . . 10 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) ≀ 1)
292276, 277, 278, 278, 291elo1d 15477 . . . . . . . . 9 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) ∈ 𝑂(1))
293 o1sub 15557 . . . . . . . . 9 (((π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∈ 𝑂(1) ∧ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯))) ∈ 𝑂(1)) β†’ ((π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∘f βˆ’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))) ∈ 𝑂(1))
294275, 292, 293sylancr 588 . . . . . . . 8 (⊀ β†’ ((π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((Ξ›β€˜π‘›) / 𝑛) βˆ’ (logβ€˜π‘₯))) ∘f βˆ’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(1 / 𝑛) βˆ’ (logβ€˜π‘₯)))) ∈ 𝑂(1))
295274, 294eqeltrrd 2835 . . . . . . 7 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛)) ∈ 𝑂(1))
296243recnd 11239 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ∈ β„‚)
297 1cnd 11206 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ 1 ∈ β„‚)
298237recnd 11239 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (Οˆβ€˜π‘₯) ∈ β„‚)
299 rpcnne0 12989 . . . . . . . . . . . . 13 (π‘₯ ∈ ℝ+ β†’ (π‘₯ ∈ β„‚ ∧ π‘₯ β‰  0))
300299adantl 483 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (π‘₯ ∈ β„‚ ∧ π‘₯ β‰  0))
301 divdir 11894 . . . . . . . . . . . 12 (((Οˆβ€˜π‘₯) ∈ β„‚ ∧ 1 ∈ β„‚ ∧ (π‘₯ ∈ β„‚ ∧ π‘₯ β‰  0)) β†’ (((Οˆβ€˜π‘₯) + 1) / π‘₯) = (((Οˆβ€˜π‘₯) / π‘₯) + (1 / π‘₯)))
302298, 297, 300, 301syl3anc 1372 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / π‘₯) = (((Οˆβ€˜π‘₯) / π‘₯) + (1 / π‘₯)))
303302mpteq2dva 5248 . . . . . . . . . 10 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) + 1) / π‘₯)) = (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) / π‘₯) + (1 / π‘₯))))
304 simpr 486 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ π‘₯ ∈ ℝ+)
305237, 304rerpdivcld 13044 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Οˆβ€˜π‘₯) / π‘₯) ∈ ℝ)
306 rpreccl 12997 . . . . . . . . . . . . 13 (π‘₯ ∈ ℝ+ β†’ (1 / π‘₯) ∈ ℝ+)
307306adantl 483 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (1 / π‘₯) ∈ ℝ+)
308 eqidd 2734 . . . . . . . . . . . 12 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) = (π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)))
309 eqidd 2734 . . . . . . . . . . . 12 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) = (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)))
310248, 305, 307, 308, 309offval2 7687 . . . . . . . . . . 11 (⊀ β†’ ((π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) ∘f + (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯))) = (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) / π‘₯) + (1 / π‘₯))))
311 chpo1ub 26973 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) ∈ 𝑂(1)
312 divrcnv 15795 . . . . . . . . . . . . . 14 (1 ∈ β„‚ β†’ (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) β‡π‘Ÿ 0)
31328, 312ax-mp 5 . . . . . . . . . . . . 13 (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) β‡π‘Ÿ 0
314 rlimo1 15558 . . . . . . . . . . . . 13 ((π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) β‡π‘Ÿ 0 β†’ (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) ∈ 𝑂(1))
315313, 314mp1i 13 . . . . . . . . . . . 12 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) ∈ 𝑂(1))
316 o1add 15555 . . . . . . . . . . . 12 (((π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) ∈ 𝑂(1) ∧ (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯)) ∈ 𝑂(1)) β†’ ((π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) ∘f + (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯))) ∈ 𝑂(1))
317311, 315, 316sylancr 588 . . . . . . . . . . 11 (⊀ β†’ ((π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) ∘f + (π‘₯ ∈ ℝ+ ↦ (1 / π‘₯))) ∈ 𝑂(1))
318310, 317eqeltrrd 2835 . . . . . . . . . 10 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) / π‘₯) + (1 / π‘₯))) ∈ 𝑂(1))
319303, 318eqeltrd 2834 . . . . . . . . 9 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) + 1) / π‘₯)) ∈ 𝑂(1))
320238, 304rerpdivcld 13044 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / π‘₯) ∈ ℝ)
321 chpge0 26620 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ ℝ β†’ 0 ≀ (Οˆβ€˜π‘₯))
322236, 321syl 17 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ 0 ≀ (Οˆβ€˜π‘₯))
323237, 322ge0p1rpd 13043 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((Οˆβ€˜π‘₯) + 1) ∈ ℝ+)
324323rprege0d 13020 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 ≀ ((Οˆβ€˜π‘₯) + 1)))
325242nnrpd 13011 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ ℝ+)
326325rpregt0d 13019 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((βŒŠβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 < ((βŒŠβ€˜π‘₯) + 1)))
327 divge0 12080 . . . . . . . . . . . . 13 (((((Οˆβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 ≀ ((Οˆβ€˜π‘₯) + 1)) ∧ (((βŒŠβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 < ((βŒŠβ€˜π‘₯) + 1))) β†’ 0 ≀ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)))
328324, 326, 327syl2anc 585 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ 0 ≀ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)))
329243, 328absidd 15366 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1))) = (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)))
330320recnd 11239 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / π‘₯) ∈ β„‚)
331330abscld 15380 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / π‘₯)) ∈ ℝ)
332 fllep1 13763 . . . . . . . . . . . . . 14 (π‘₯ ∈ ℝ β†’ π‘₯ ≀ ((βŒŠβ€˜π‘₯) + 1))
333236, 332syl 17 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ π‘₯ ≀ ((βŒŠβ€˜π‘₯) + 1))
334 rpregt0 12985 . . . . . . . . . . . . . . 15 (π‘₯ ∈ ℝ+ β†’ (π‘₯ ∈ ℝ ∧ 0 < π‘₯))
335334adantl 483 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (π‘₯ ∈ ℝ ∧ 0 < π‘₯))
336323rpregt0d 13019 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 < ((Οˆβ€˜π‘₯) + 1)))
337 lediv2 12101 . . . . . . . . . . . . . 14 (((π‘₯ ∈ ℝ ∧ 0 < π‘₯) ∧ (((βŒŠβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 < ((βŒŠβ€˜π‘₯) + 1)) ∧ (((Οˆβ€˜π‘₯) + 1) ∈ ℝ ∧ 0 < ((Οˆβ€˜π‘₯) + 1))) β†’ (π‘₯ ≀ ((βŒŠβ€˜π‘₯) + 1) ↔ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ≀ (((Οˆβ€˜π‘₯) + 1) / π‘₯)))
338335, 326, 336, 337syl3anc 1372 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (π‘₯ ≀ ((βŒŠβ€˜π‘₯) + 1) ↔ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ≀ (((Οˆβ€˜π‘₯) + 1) / π‘₯)))
339333, 338mpbid 231 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ≀ (((Οˆβ€˜π‘₯) + 1) / π‘₯))
340320leabsd 15358 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / π‘₯) ≀ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / π‘₯)))
341243, 320, 331, 339, 340letrd 11368 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) ≀ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / π‘₯)))
342329, 341eqbrtrd 5170 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ ℝ+) β†’ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1))) ≀ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / π‘₯)))
343342adantrr 716 . . . . . . . . 9 ((⊀ ∧ (π‘₯ ∈ ℝ+ ∧ 1 ≀ π‘₯)) β†’ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1))) ≀ (absβ€˜(((Οˆβ€˜π‘₯) + 1) / π‘₯)))
344278, 319, 320, 296, 343o1le 15596 . . . . . . . 8 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1))) ∈ 𝑂(1))
345 o1const 15561 . . . . . . . . . 10 ((ℝ+ βŠ† ℝ ∧ 1 ∈ β„‚) β†’ (π‘₯ ∈ ℝ+ ↦ 1) ∈ 𝑂(1))
34614, 28, 345mp2an 691 . . . . . . . . 9 (π‘₯ ∈ ℝ+ ↦ 1) ∈ 𝑂(1)
347346a1i 11 . . . . . . . 8 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ 1) ∈ 𝑂(1))
348296, 297, 344, 347o1sub2 15567 . . . . . . 7 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1)) ∈ 𝑂(1))
349234, 245, 295, 348o1sub2 15567 . . . . . 6 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) βˆ’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))) ∈ 𝑂(1))
35013, 349o1res2 15504 . . . . 5 (⊀ β†’ (π‘₯ ∈ (1[,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) βˆ’ 1) / 𝑛) βˆ’ ((((Οˆβ€˜π‘₯) + 1) / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 1))) ∈ 𝑂(1))
351228, 350eqeltrrid 2839 . . . 4 (⊀ β†’ (π‘₯ ∈ (1[,)+∞) ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) ∈ 𝑂(1))
35216, 351eqeltrd 2834 . . 3 (⊀ β†’ ((π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) β†Ύ (1[,)+∞)) ∈ 𝑂(1))
353 eqid 2733 . . . . . 6 (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) = (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1))))
354353, 45fmpti 7109 . . . . 5 (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))):β„βŸΆβ„‚
355354a1i 11 . . . 4 (⊀ β†’ (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))):β„βŸΆβ„‚)
356 ssidd 4005 . . . 4 (⊀ β†’ ℝ βŠ† ℝ)
357355, 356, 278o1resb 15507 . . 3 (⊀ β†’ ((π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) ∈ 𝑂(1) ↔ ((π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) β†Ύ (1[,)+∞)) ∈ 𝑂(1)))
358352, 357mpbird 257 . 2 (⊀ β†’ (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) ∈ 𝑂(1))
359358mptru 1549 1 (π‘₯ ∈ ℝ ↦ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((π‘…β€˜π‘›) / (𝑛 Β· (𝑛 + 1)))) ∈ 𝑂(1)
Colors of variables: wff setvar class
Syntax hints:   ↔ wb 205   ∧ wa 397   = wceq 1542  βŠ€wtru 1543   ∈ wcel 2107   β‰  wne 2941  Vcvv 3475   βŠ† wss 3948   class class class wbr 5148   ↦ cmpt 5231   β†Ύ cres 5678  βŸΆwf 6537  β€˜cfv 6541  (class class class)co 7406   ∘f cof 7665  β„‚cc 11105  β„cr 11106  0cc0 11107  1c1 11108   + caddc 11110   Β· cmul 11112  +∞cpnf 11242   < clt 11245   ≀ cle 11246   βˆ’ cmin 11441  -cneg 11442   / cdiv 11868  β„•cn 12209  2c2 12264  β„•0cn0 12469  β„€cz 12555  β„€β‰₯cuz 12819  β„+crp 12971  [,)cico 13323  ...cfz 13481  ..^cfzo 13624  βŒŠcfl 13752  abscabs 15178   β‡π‘Ÿ crli 15426  π‘‚(1)co1 15427  Ξ£csu 15629  logclog 26055  Ξ›cvma 26586  Οˆcchp 26587
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-iin 5000  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-of 7667  df-om 7853  df-1st 7972  df-2nd 7973  df-supp 8144  df-frecs 8263  df-wrecs 8294  df-recs 8368  df-rdg 8407  df-1o 8463  df-2o 8464  df-oadd 8467  df-er 8700  df-map 8819  df-pm 8820  df-ixp 8889  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-fsupp 9359  df-fi 9403  df-sup 9434  df-inf 9435  df-oi 9502  df-dju 9893  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-xnn0 12542  df-z 12556  df-dec 12675  df-uz 12820  df-q 12930  df-rp 12972  df-xneg 13089  df-xadd 13090  df-xmul 13091  df-ioo 13325  df-ioc 13326  df-ico 13327  df-icc 13328  df-fz 13482  df-fzo 13625  df-fl 13754  df-mod 13832  df-seq 13964  df-exp 14025  df-fac 14231  df-bc 14260  df-hash 14288  df-shft 15011  df-cj 15043  df-re 15044  df-im 15045  df-sqrt 15179  df-abs 15180  df-limsup 15412  df-clim 15429  df-rlim 15430  df-o1 15431  df-lo1 15432  df-sum 15630  df-ef 16008  df-e 16009  df-sin 16010  df-cos 16011  df-tan 16012  df-pi 16013  df-dvds 16195  df-gcd 16433  df-prm 16606  df-pc 16767  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-hom 17218  df-cco 17219  df-rest 17365  df-topn 17366  df-0g 17384  df-gsum 17385  df-topgen 17386  df-pt 17387  df-prds 17390  df-xrs 17445  df-qtop 17450  df-imas 17451  df-xps 17453  df-mre 17527  df-mrc 17528  df-acs 17530  df-mgm 18558  df-sgrp 18607  df-mnd 18623  df-submnd 18669  df-mulg 18946  df-cntz 19176  df-cmn 19645  df-psmet 20929  df-xmet 20930  df-met 20931  df-bl 20932  df-mopn 20933  df-fbas 20934  df-fg 20935  df-cnfld 20938  df-top 22388  df-topon 22405  df-topsp 22427  df-bases 22441  df-cld 22515  df-ntr 22516  df-cls 22517  df-nei 22594  df-lp 22632  df-perf 22633  df-cn 22723  df-cnp 22724  df-haus 22811  df-cmp 22883  df-tx 23058  df-hmeo 23251  df-fil 23342  df-fm 23434  df-flim 23435  df-flf 23436  df-xms 23818  df-ms 23819  df-tms 23820  df-cncf 24386  df-limc 25375  df-dv 25376  df-ulm 25881  df-log 26057  df-cxp 26058  df-atan 26362  df-em 26487  df-cht 26591  df-vma 26592  df-chp 26593  df-ppi 26594
This theorem is referenced by:  pntrsumbnd  27059
  Copyright terms: Public domain W3C validator