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

Theorem pntrlog2bndlem4 27072
Description: Lemma for pntrlog2bnd 27076. Bound on the difference between the Selberg function and its approximation, inside a sum. (Contributed by Mario Carneiro, 31-May-2016.)
Hypotheses
Ref Expression
pntsval.1 𝑆 = (π‘Ž ∈ ℝ ↦ Σ𝑖 ∈ (1...(βŒŠβ€˜π‘Ž))((Ξ›β€˜π‘–) Β· ((logβ€˜π‘–) + (Οˆβ€˜(π‘Ž / 𝑖)))))
pntrlog2bnd.r 𝑅 = (π‘Ž ∈ ℝ+ ↦ ((Οˆβ€˜π‘Ž) βˆ’ π‘Ž))
pntrlog2bnd.t 𝑇 = (π‘Ž ∈ ℝ ↦ if(π‘Ž ∈ ℝ+, (π‘Ž Β· (logβ€˜π‘Ž)), 0))
Assertion
Ref Expression
pntrlog2bndlem4 (π‘₯ ∈ (1(,)+∞) ↦ ((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ ((2 / (logβ€˜π‘₯)) Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / π‘₯)) ∈ ≀𝑂(1)
Distinct variable groups:   𝑖,π‘Ž,𝑛,π‘₯   𝑆,𝑛,π‘₯   𝑅,𝑛,π‘₯   𝑇,𝑛
Allowed substitution hints:   𝑅(𝑖,π‘Ž)   𝑆(𝑖,π‘Ž)   𝑇(π‘₯,𝑖,π‘Ž)

Proof of Theorem pntrlog2bndlem4
Dummy variables 𝑐 π‘š 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elioore 13350 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ (1(,)+∞) β†’ π‘₯ ∈ ℝ)
21adantl 482 . . . . . . . . . . . . . . . . . . 19 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ π‘₯ ∈ ℝ)
3 1rp 12974 . . . . . . . . . . . . . . . . . . . 20 1 ∈ ℝ+
43a1i 11 . . . . . . . . . . . . . . . . . . 19 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 1 ∈ ℝ+)
5 1red 11211 . . . . . . . . . . . . . . . . . . . 20 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 1 ∈ ℝ)
6 eliooord 13379 . . . . . . . . . . . . . . . . . . . . . 22 (π‘₯ ∈ (1(,)+∞) β†’ (1 < π‘₯ ∧ π‘₯ < +∞))
76adantl 482 . . . . . . . . . . . . . . . . . . . . 21 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (1 < π‘₯ ∧ π‘₯ < +∞))
87simpld 495 . . . . . . . . . . . . . . . . . . . 20 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 1 < π‘₯)
95, 2, 8ltled 11358 . . . . . . . . . . . . . . . . . . 19 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 1 ≀ π‘₯)
102, 4, 9rpgecld 13051 . . . . . . . . . . . . . . . . . 18 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ π‘₯ ∈ ℝ+)
1110rprege0d 13019 . . . . . . . . . . . . . . . . . . . . 21 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯))
12 flge0nn0 13781 . . . . . . . . . . . . . . . . . . . . 21 ((π‘₯ ∈ ℝ ∧ 0 ≀ π‘₯) β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
1311, 12syl 17 . . . . . . . . . . . . . . . . . . . 20 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (βŒŠβ€˜π‘₯) ∈ β„•0)
14 nn0p1nn 12507 . . . . . . . . . . . . . . . . . . . 20 ((βŒŠβ€˜π‘₯) ∈ β„•0 β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„•)
1513, 14syl 17 . . . . . . . . . . . . . . . . . . 19 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„•)
1615nnrpd 13010 . . . . . . . . . . . . . . . . . 18 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ ℝ+)
1710, 16rpdivcld 13029 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ+)
18 pntrlog2bnd.r . . . . . . . . . . . . . . . . . 18 𝑅 = (π‘Ž ∈ ℝ+ ↦ ((Οˆβ€˜π‘Ž) βˆ’ π‘Ž))
1918pntrval 27054 . . . . . . . . . . . . . . . . 17 ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ+ β†’ (π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1))) = ((Οˆβ€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1))) βˆ’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1))))
2017, 19syl 17 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1))) = ((Οˆβ€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1))) βˆ’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1))))
212, 15nndivred 12262 . . . . . . . . . . . . . . . . . . 19 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ)
22 2re 12282 . . . . . . . . . . . . . . . . . . . 20 2 ∈ ℝ
2322a1i 11 . . . . . . . . . . . . . . . . . . 19 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 2 ∈ ℝ)
24 flltp1 13761 . . . . . . . . . . . . . . . . . . . . . 22 (π‘₯ ∈ ℝ β†’ π‘₯ < ((βŒŠβ€˜π‘₯) + 1))
252, 24syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ π‘₯ < ((βŒŠβ€˜π‘₯) + 1))
2615nncnd 12224 . . . . . . . . . . . . . . . . . . . . . 22 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ β„‚)
2726mulridd 11227 . . . . . . . . . . . . . . . . . . . . 21 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((βŒŠβ€˜π‘₯) + 1) Β· 1) = ((βŒŠβ€˜π‘₯) + 1))
2825, 27breqtrrd 5175 . . . . . . . . . . . . . . . . . . . 20 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ π‘₯ < (((βŒŠβ€˜π‘₯) + 1) Β· 1))
292, 5, 16ltdivmuld 13063 . . . . . . . . . . . . . . . . . . . 20 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) < 1 ↔ π‘₯ < (((βŒŠβ€˜π‘₯) + 1) Β· 1)))
3028, 29mpbird 256 . . . . . . . . . . . . . . . . . . 19 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) < 1)
31 1lt2 12379 . . . . . . . . . . . . . . . . . . . 20 1 < 2
3231a1i 11 . . . . . . . . . . . . . . . . . . 19 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 1 < 2)
3321, 5, 23, 30, 32lttrd 11371 . . . . . . . . . . . . . . . . . 18 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) < 2)
34 chpeq0 26700 . . . . . . . . . . . . . . . . . . 19 ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) ∈ ℝ β†’ ((Οˆβ€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1))) = 0 ↔ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) < 2))
3521, 34syl 17 . . . . . . . . . . . . . . . . . 18 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((Οˆβ€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1))) = 0 ↔ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) < 2))
3633, 35mpbird 256 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (Οˆβ€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1))) = 0)
3736oveq1d 7420 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((Οˆβ€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1))) βˆ’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1))) = (0 βˆ’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1))))
3820, 37eqtrd 2772 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1))) = (0 βˆ’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1))))
3938fveq2d 6892 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))) = (absβ€˜(0 βˆ’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))))
40 0red 11213 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 0 ∈ ℝ)
4117rpge0d 13016 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 0 ≀ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))
4240, 21, 41abssuble0d 15375 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(0 βˆ’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))) = ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 0))
4321recnd 11238 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) ∈ β„‚)
4443subid1d 11556 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) βˆ’ 0) = (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))
4539, 42, 443eqtrd 2776 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))) = (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))
4613nn0red 12529 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (βŒŠβ€˜π‘₯) ∈ ℝ)
47 pntsval.1 . . . . . . . . . . . . . . . . 17 𝑆 = (π‘Ž ∈ ℝ ↦ Σ𝑖 ∈ (1...(βŒŠβ€˜π‘Ž))((Ξ›β€˜π‘–) Β· ((logβ€˜π‘–) + (Οˆβ€˜(π‘Ž / 𝑖)))))
4847pntsval2 27068 . . . . . . . . . . . . . . . 16 ((βŒŠβ€˜π‘₯) ∈ ℝ β†’ (π‘†β€˜(βŒŠβ€˜π‘₯)) = Σ𝑛 ∈ (1...(βŒŠβ€˜(βŒŠβ€˜π‘₯)))(((Ξ›β€˜π‘›) Β· (logβ€˜π‘›)) + Ξ£π‘š ∈ {𝑦 ∈ β„• ∣ 𝑦 βˆ₯ 𝑛} ((Ξ›β€˜π‘š) Β· (Ξ›β€˜(𝑛 / π‘š)))))
4946, 48syl 17 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘†β€˜(βŒŠβ€˜π‘₯)) = Σ𝑛 ∈ (1...(βŒŠβ€˜(βŒŠβ€˜π‘₯)))(((Ξ›β€˜π‘›) Β· (logβ€˜π‘›)) + Ξ£π‘š ∈ {𝑦 ∈ β„• ∣ 𝑦 βˆ₯ 𝑛} ((Ξ›β€˜π‘š) Β· (Ξ›β€˜(𝑛 / π‘š)))))
5013nn0cnd 12530 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (βŒŠβ€˜π‘₯) ∈ β„‚)
51 1cnd 11205 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 1 ∈ β„‚)
5250, 51pncand 11568 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((βŒŠβ€˜π‘₯) + 1) βˆ’ 1) = (βŒŠβ€˜π‘₯))
5352fveq2d 6892 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = (π‘†β€˜(βŒŠβ€˜π‘₯)))
5447pntsval2 27068 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ ℝ β†’ (π‘†β€˜π‘₯) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) Β· (logβ€˜π‘›)) + Ξ£π‘š ∈ {𝑦 ∈ β„• ∣ 𝑦 βˆ₯ 𝑛} ((Ξ›β€˜π‘š) Β· (Ξ›β€˜(𝑛 / π‘š)))))
552, 54syl 17 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘†β€˜π‘₯) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) Β· (logβ€˜π‘›)) + Ξ£π‘š ∈ {𝑦 ∈ β„• ∣ 𝑦 βˆ₯ 𝑛} ((Ξ›β€˜π‘š) Β· (Ξ›β€˜(𝑛 / π‘š)))))
56 flidm 13770 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ ℝ β†’ (βŒŠβ€˜(βŒŠβ€˜π‘₯)) = (βŒŠβ€˜π‘₯))
572, 56syl 17 . . . . . . . . . . . . . . . . . 18 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (βŒŠβ€˜(βŒŠβ€˜π‘₯)) = (βŒŠβ€˜π‘₯))
5857oveq2d 7421 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (1...(βŒŠβ€˜(βŒŠβ€˜π‘₯))) = (1...(βŒŠβ€˜π‘₯)))
5958sumeq1d 15643 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜(βŒŠβ€˜π‘₯)))(((Ξ›β€˜π‘›) Β· (logβ€˜π‘›)) + Ξ£π‘š ∈ {𝑦 ∈ β„• ∣ 𝑦 βˆ₯ 𝑛} ((Ξ›β€˜π‘š) Β· (Ξ›β€˜(𝑛 / π‘š)))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((Ξ›β€˜π‘›) Β· (logβ€˜π‘›)) + Ξ£π‘š ∈ {𝑦 ∈ β„• ∣ 𝑦 βˆ₯ 𝑛} ((Ξ›β€˜π‘š) Β· (Ξ›β€˜(𝑛 / π‘š)))))
6055, 59eqtr4d 2775 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘†β€˜π‘₯) = Σ𝑛 ∈ (1...(βŒŠβ€˜(βŒŠβ€˜π‘₯)))(((Ξ›β€˜π‘›) Β· (logβ€˜π‘›)) + Ξ£π‘š ∈ {𝑦 ∈ β„• ∣ 𝑦 βˆ₯ 𝑛} ((Ξ›β€˜π‘š) Β· (Ξ›β€˜(𝑛 / π‘š)))))
6149, 53, 603eqtr4d 2782 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = (π‘†β€˜π‘₯))
6252fveq2d 6892 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) = (π‘‡β€˜(βŒŠβ€˜π‘₯)))
6362oveq2d 7421 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (2 Β· (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))) = (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))
6461, 63oveq12d 7423 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)))) = ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))))
6545, 64oveq12d 7423 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))) Β· ((π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))))) = ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))))
662recnd 11238 . . . . . . . . . . . . . . . . . . 19 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ π‘₯ ∈ β„‚)
6766div1d 11978 . . . . . . . . . . . . . . . . . 18 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ / 1) = π‘₯)
6867fveq2d 6892 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘…β€˜(π‘₯ / 1)) = (π‘…β€˜π‘₯))
6918pntrf 27055 . . . . . . . . . . . . . . . . . . 19 𝑅:ℝ+βŸΆβ„
7069ffvelcdmi 7082 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ ℝ+ β†’ (π‘…β€˜π‘₯) ∈ ℝ)
7110, 70syl 17 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘…β€˜π‘₯) ∈ ℝ)
7268, 71eqeltrd 2833 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘…β€˜(π‘₯ / 1)) ∈ ℝ)
7372recnd 11238 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘…β€˜(π‘₯ / 1)) ∈ β„‚)
7473abscld 15379 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(π‘…β€˜(π‘₯ / 1))) ∈ ℝ)
7574recnd 11238 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(π‘…β€˜(π‘₯ / 1))) ∈ β„‚)
7675mul01d 11409 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 1))) Β· 0) = 0)
7765, 76oveq12d 7423 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((absβ€˜(π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))) Β· ((π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))))) βˆ’ ((absβ€˜(π‘…β€˜(π‘₯ / 1))) Β· 0)) = (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) βˆ’ 0))
7847pntsf 27065 . . . . . . . . . . . . . . . . 17 𝑆:β„βŸΆβ„
7978ffvelcdmi 7082 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ ℝ β†’ (π‘†β€˜π‘₯) ∈ ℝ)
802, 79syl 17 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘†β€˜π‘₯) ∈ ℝ)
81 pntrlog2bnd.t . . . . . . . . . . . . . . . . . . 19 𝑇 = (π‘Ž ∈ ℝ ↦ if(π‘Ž ∈ ℝ+, (π‘Ž Β· (logβ€˜π‘Ž)), 0))
82 relogcl 26075 . . . . . . . . . . . . . . . . . . . . 21 (π‘Ž ∈ ℝ+ β†’ (logβ€˜π‘Ž) ∈ ℝ)
83 remulcl 11191 . . . . . . . . . . . . . . . . . . . . 21 ((π‘Ž ∈ ℝ ∧ (logβ€˜π‘Ž) ∈ ℝ) β†’ (π‘Ž Β· (logβ€˜π‘Ž)) ∈ ℝ)
8482, 83sylan2 593 . . . . . . . . . . . . . . . . . . . 20 ((π‘Ž ∈ ℝ ∧ π‘Ž ∈ ℝ+) β†’ (π‘Ž Β· (logβ€˜π‘Ž)) ∈ ℝ)
85 0red 11213 . . . . . . . . . . . . . . . . . . . 20 ((π‘Ž ∈ ℝ ∧ Β¬ π‘Ž ∈ ℝ+) β†’ 0 ∈ ℝ)
8684, 85ifclda 4562 . . . . . . . . . . . . . . . . . . 19 (π‘Ž ∈ ℝ β†’ if(π‘Ž ∈ ℝ+, (π‘Ž Β· (logβ€˜π‘Ž)), 0) ∈ ℝ)
8781, 86fmpti 7108 . . . . . . . . . . . . . . . . . 18 𝑇:β„βŸΆβ„
8887ffvelcdmi 7082 . . . . . . . . . . . . . . . . 17 ((βŒŠβ€˜π‘₯) ∈ ℝ β†’ (π‘‡β€˜(βŒŠβ€˜π‘₯)) ∈ ℝ)
8946, 88syl 17 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘‡β€˜(βŒŠβ€˜π‘₯)) ∈ ℝ)
9023, 89remulcld 11240 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) ∈ ℝ)
9180, 90resubcld 11638 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) ∈ ℝ)
9221, 91remulcld 11240 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) ∈ ℝ)
9392recnd 11238 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) ∈ β„‚)
9493subid1d 11556 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) βˆ’ 0) = ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))))
9577, 94eqtrd 2772 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((absβ€˜(π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))) Β· ((π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))))) βˆ’ ((absβ€˜(π‘…β€˜(π‘₯ / 1))) Β· 0)) = ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))))
962flcld 13759 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (βŒŠβ€˜π‘₯) ∈ β„€)
97 fzval3 13697 . . . . . . . . . . . . . 14 ((βŒŠβ€˜π‘₯) ∈ β„€ β†’ (1...(βŒŠβ€˜π‘₯)) = (1..^((βŒŠβ€˜π‘₯) + 1)))
9896, 97syl 17 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (1...(βŒŠβ€˜π‘₯)) = (1..^((βŒŠβ€˜π‘₯) + 1)))
9998eqcomd 2738 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (1..^((βŒŠβ€˜π‘₯) + 1)) = (1...(βŒŠβ€˜π‘₯)))
10010adantr 481 . . . . . . . . . . . . . . . . . . . . 21 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ π‘₯ ∈ ℝ+)
101 elfznn 13526 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 ∈ (1...(βŒŠβ€˜π‘₯)) β†’ 𝑛 ∈ β„•)
102101adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„•)
103102nnrpd 13010 . . . . . . . . . . . . . . . . . . . . 21 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ ℝ+)
104100, 103rpdivcld 13029 . . . . . . . . . . . . . . . . . . . 20 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘₯ / 𝑛) ∈ ℝ+)
10569ffvelcdmi 7082 . . . . . . . . . . . . . . . . . . . 20 ((π‘₯ / 𝑛) ∈ ℝ+ β†’ (π‘…β€˜(π‘₯ / 𝑛)) ∈ ℝ)
106104, 105syl 17 . . . . . . . . . . . . . . . . . . 19 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜(π‘₯ / 𝑛)) ∈ ℝ)
107106recnd 11238 . . . . . . . . . . . . . . . . . 18 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜(π‘₯ / 𝑛)) ∈ β„‚)
108107abscld 15379 . . . . . . . . . . . . . . . . 17 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) ∈ ℝ)
109108recnd 11238 . . . . . . . . . . . . . . . 16 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) ∈ β„‚)
1103a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ∈ ℝ+)
111103, 110rpaddcld 13027 . . . . . . . . . . . . . . . . . . . . 21 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 + 1) ∈ ℝ+)
112100, 111rpdivcld 13029 . . . . . . . . . . . . . . . . . . . 20 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘₯ / (𝑛 + 1)) ∈ ℝ+)
11369ffvelcdmi 7082 . . . . . . . . . . . . . . . . . . . 20 ((π‘₯ / (𝑛 + 1)) ∈ ℝ+ β†’ (π‘…β€˜(π‘₯ / (𝑛 + 1))) ∈ ℝ)
114112, 113syl 17 . . . . . . . . . . . . . . . . . . 19 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜(π‘₯ / (𝑛 + 1))) ∈ ℝ)
115114recnd 11238 . . . . . . . . . . . . . . . . . 18 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜(π‘₯ / (𝑛 + 1))) ∈ β„‚)
116115abscld 15379 . . . . . . . . . . . . . . . . 17 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) ∈ ℝ)
117116recnd 11238 . . . . . . . . . . . . . . . 16 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) ∈ β„‚)
118109, 117negsubdi2d 11583 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ -((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) = ((absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛)))))
119118eqcomd 2738 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛)))) = -((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))))
120102nncnd 12224 . . . . . . . . . . . . . . . . 17 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„‚)
121 1cnd 11205 . . . . . . . . . . . . . . . . 17 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ∈ β„‚)
122120, 121pncand 11568 . . . . . . . . . . . . . . . 16 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝑛 + 1) βˆ’ 1) = 𝑛)
123122fveq2d 6892 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘†β€˜((𝑛 + 1) βˆ’ 1)) = (π‘†β€˜π‘›))
124122fveq2d 6892 . . . . . . . . . . . . . . . . 17 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘‡β€˜((𝑛 + 1) βˆ’ 1)) = (π‘‡β€˜π‘›))
125 rpre 12978 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ℝ+ β†’ 𝑛 ∈ ℝ)
126 eleq1 2821 . . . . . . . . . . . . . . . . . . . . . 22 (π‘Ž = 𝑛 β†’ (π‘Ž ∈ ℝ+ ↔ 𝑛 ∈ ℝ+))
127 id 22 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘Ž = 𝑛 β†’ π‘Ž = 𝑛)
128 fveq2 6888 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘Ž = 𝑛 β†’ (logβ€˜π‘Ž) = (logβ€˜π‘›))
129127, 128oveq12d 7423 . . . . . . . . . . . . . . . . . . . . . 22 (π‘Ž = 𝑛 β†’ (π‘Ž Β· (logβ€˜π‘Ž)) = (𝑛 Β· (logβ€˜π‘›)))
130126, 129ifbieq1d 4551 . . . . . . . . . . . . . . . . . . . . 21 (π‘Ž = 𝑛 β†’ if(π‘Ž ∈ ℝ+, (π‘Ž Β· (logβ€˜π‘Ž)), 0) = if(𝑛 ∈ ℝ+, (𝑛 Β· (logβ€˜π‘›)), 0))
131 ovex 7438 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 Β· (logβ€˜π‘›)) ∈ V
132 c0ex 11204 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ V
133131, 132ifex 4577 . . . . . . . . . . . . . . . . . . . . 21 if(𝑛 ∈ ℝ+, (𝑛 Β· (logβ€˜π‘›)), 0) ∈ V
134130, 81, 133fvmpt 6995 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ℝ β†’ (π‘‡β€˜π‘›) = if(𝑛 ∈ ℝ+, (𝑛 Β· (logβ€˜π‘›)), 0))
135125, 134syl 17 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ ℝ+ β†’ (π‘‡β€˜π‘›) = if(𝑛 ∈ ℝ+, (𝑛 Β· (logβ€˜π‘›)), 0))
136 iftrue 4533 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ ℝ+ β†’ if(𝑛 ∈ ℝ+, (𝑛 Β· (logβ€˜π‘›)), 0) = (𝑛 Β· (logβ€˜π‘›)))
137135, 136eqtrd 2772 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ ℝ+ β†’ (π‘‡β€˜π‘›) = (𝑛 Β· (logβ€˜π‘›)))
138103, 137syl 17 . . . . . . . . . . . . . . . . 17 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘‡β€˜π‘›) = (𝑛 Β· (logβ€˜π‘›)))
139124, 138eqtrd 2772 . . . . . . . . . . . . . . . 16 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘‡β€˜((𝑛 + 1) βˆ’ 1)) = (𝑛 Β· (logβ€˜π‘›)))
140139oveq2d 7421 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1))) = (2 Β· (𝑛 Β· (logβ€˜π‘›))))
141123, 140oveq12d 7423 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))) = ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))
142119, 141oveq12d 7423 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛)))) Β· ((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1))))) = (-((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))))
143108, 116resubcld 11638 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) ∈ ℝ)
144143recnd 11238 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) ∈ β„‚)
145102nnred 12223 . . . . . . . . . . . . . . . . 17 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ ℝ)
14678ffvelcdmi 7082 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℝ β†’ (π‘†β€˜π‘›) ∈ ℝ)
147145, 146syl 17 . . . . . . . . . . . . . . . 16 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘†β€˜π‘›) ∈ ℝ)
14822a1i 11 . . . . . . . . . . . . . . . . 17 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 2 ∈ ℝ)
149103relogcld 26122 . . . . . . . . . . . . . . . . . 18 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (logβ€˜π‘›) ∈ ℝ)
150145, 149remulcld 11240 . . . . . . . . . . . . . . . . 17 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· (logβ€˜π‘›)) ∈ ℝ)
151148, 150remulcld 11240 . . . . . . . . . . . . . . . 16 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· (𝑛 Β· (logβ€˜π‘›))) ∈ ℝ)
152147, 151resubcld 11638 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))) ∈ ℝ)
153152recnd 11238 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))) ∈ β„‚)
154144, 153mulneg1d 11663 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (-((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) = -(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))))
155142, 154eqtrd 2772 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛)))) Β· ((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1))))) = -(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))))
15699, 155sumeq12rdv 15649 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))(((absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛)))) Β· ((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1))))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))-(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))))
157 fzfid 13934 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (1...(βŒŠβ€˜π‘₯)) ∈ Fin)
158143, 152remulcld 11240 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) ∈ ℝ)
159158recnd 11238 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) ∈ β„‚)
160157, 159fsumneg 15729 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))-(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) = -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))))
161156, 160eqtrd 2772 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))(((absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛)))) Β· ((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1))))) = -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))))
16295, 161oveq12d 7423 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((absβ€˜(π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))) Β· ((π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))))) βˆ’ ((absβ€˜(π‘…β€˜(π‘₯ / 1))) Β· 0)) βˆ’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))(((absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛)))) Β· ((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))))) = (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) βˆ’ -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))))
163 oveq2 7413 . . . . . . . . . . . . . 14 (π‘š = 𝑛 β†’ (π‘₯ / π‘š) = (π‘₯ / 𝑛))
164163fveq2d 6892 . . . . . . . . . . . . 13 (π‘š = 𝑛 β†’ (π‘…β€˜(π‘₯ / π‘š)) = (π‘…β€˜(π‘₯ / 𝑛)))
165164fveq2d 6892 . . . . . . . . . . . 12 (π‘š = 𝑛 β†’ (absβ€˜(π‘…β€˜(π‘₯ / π‘š))) = (absβ€˜(π‘…β€˜(π‘₯ / 𝑛))))
166 fvoveq1 7428 . . . . . . . . . . . . 13 (π‘š = 𝑛 β†’ (π‘†β€˜(π‘š βˆ’ 1)) = (π‘†β€˜(𝑛 βˆ’ 1)))
167 fvoveq1 7428 . . . . . . . . . . . . . 14 (π‘š = 𝑛 β†’ (π‘‡β€˜(π‘š βˆ’ 1)) = (π‘‡β€˜(𝑛 βˆ’ 1)))
168167oveq2d 7421 . . . . . . . . . . . . 13 (π‘š = 𝑛 β†’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1))) = (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1))))
169166, 168oveq12d 7423 . . . . . . . . . . . 12 (π‘š = 𝑛 β†’ ((π‘†β€˜(π‘š βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1)))) = ((π‘†β€˜(𝑛 βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1)))))
170165, 169jca 512 . . . . . . . . . . 11 (π‘š = 𝑛 β†’ ((absβ€˜(π‘…β€˜(π‘₯ / π‘š))) = (absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) ∧ ((π‘†β€˜(π‘š βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1)))) = ((π‘†β€˜(𝑛 βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1))))))
171 oveq2 7413 . . . . . . . . . . . . . 14 (π‘š = (𝑛 + 1) β†’ (π‘₯ / π‘š) = (π‘₯ / (𝑛 + 1)))
172171fveq2d 6892 . . . . . . . . . . . . 13 (π‘š = (𝑛 + 1) β†’ (π‘…β€˜(π‘₯ / π‘š)) = (π‘…β€˜(π‘₯ / (𝑛 + 1))))
173172fveq2d 6892 . . . . . . . . . . . 12 (π‘š = (𝑛 + 1) β†’ (absβ€˜(π‘…β€˜(π‘₯ / π‘š))) = (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))))
174 fvoveq1 7428 . . . . . . . . . . . . 13 (π‘š = (𝑛 + 1) β†’ (π‘†β€˜(π‘š βˆ’ 1)) = (π‘†β€˜((𝑛 + 1) βˆ’ 1)))
175 fvoveq1 7428 . . . . . . . . . . . . . 14 (π‘š = (𝑛 + 1) β†’ (π‘‡β€˜(π‘š βˆ’ 1)) = (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))
176175oveq2d 7421 . . . . . . . . . . . . 13 (π‘š = (𝑛 + 1) β†’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1))) = (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1))))
177174, 176oveq12d 7423 . . . . . . . . . . . 12 (π‘š = (𝑛 + 1) β†’ ((π‘†β€˜(π‘š βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1)))) = ((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))))
178173, 177jca 512 . . . . . . . . . . 11 (π‘š = (𝑛 + 1) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / π‘š))) = (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) ∧ ((π‘†β€˜(π‘š βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1)))) = ((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1))))))
179 oveq2 7413 . . . . . . . . . . . . . 14 (π‘š = 1 β†’ (π‘₯ / π‘š) = (π‘₯ / 1))
180179fveq2d 6892 . . . . . . . . . . . . 13 (π‘š = 1 β†’ (π‘…β€˜(π‘₯ / π‘š)) = (π‘…β€˜(π‘₯ / 1)))
181180fveq2d 6892 . . . . . . . . . . . 12 (π‘š = 1 β†’ (absβ€˜(π‘…β€˜(π‘₯ / π‘š))) = (absβ€˜(π‘…β€˜(π‘₯ / 1))))
182 oveq1 7412 . . . . . . . . . . . . . . . . 17 (π‘š = 1 β†’ (π‘š βˆ’ 1) = (1 βˆ’ 1))
183 1m1e0 12280 . . . . . . . . . . . . . . . . 17 (1 βˆ’ 1) = 0
184182, 183eqtrdi 2788 . . . . . . . . . . . . . . . 16 (π‘š = 1 β†’ (π‘š βˆ’ 1) = 0)
185184fveq2d 6892 . . . . . . . . . . . . . . 15 (π‘š = 1 β†’ (π‘†β€˜(π‘š βˆ’ 1)) = (π‘†β€˜0))
186 0re 11212 . . . . . . . . . . . . . . . 16 0 ∈ ℝ
187 fveq2 6888 . . . . . . . . . . . . . . . . . . . . . 22 (π‘Ž = 0 β†’ (βŒŠβ€˜π‘Ž) = (βŒŠβ€˜0))
188 0z 12565 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ β„€
189 flid 13769 . . . . . . . . . . . . . . . . . . . . . . 23 (0 ∈ β„€ β†’ (βŒŠβ€˜0) = 0)
190188, 189ax-mp 5 . . . . . . . . . . . . . . . . . . . . . 22 (βŒŠβ€˜0) = 0
191187, 190eqtrdi 2788 . . . . . . . . . . . . . . . . . . . . 21 (π‘Ž = 0 β†’ (βŒŠβ€˜π‘Ž) = 0)
192191oveq2d 7421 . . . . . . . . . . . . . . . . . . . 20 (π‘Ž = 0 β†’ (1...(βŒŠβ€˜π‘Ž)) = (1...0))
193 fz10 13518 . . . . . . . . . . . . . . . . . . . 20 (1...0) = βˆ…
194192, 193eqtrdi 2788 . . . . . . . . . . . . . . . . . . 19 (π‘Ž = 0 β†’ (1...(βŒŠβ€˜π‘Ž)) = βˆ…)
195194sumeq1d 15643 . . . . . . . . . . . . . . . . . 18 (π‘Ž = 0 β†’ Σ𝑖 ∈ (1...(βŒŠβ€˜π‘Ž))((Ξ›β€˜π‘–) Β· ((logβ€˜π‘–) + (Οˆβ€˜(π‘Ž / 𝑖)))) = Σ𝑖 ∈ βˆ… ((Ξ›β€˜π‘–) Β· ((logβ€˜π‘–) + (Οˆβ€˜(π‘Ž / 𝑖)))))
196 sum0 15663 . . . . . . . . . . . . . . . . . 18 Σ𝑖 ∈ βˆ… ((Ξ›β€˜π‘–) Β· ((logβ€˜π‘–) + (Οˆβ€˜(π‘Ž / 𝑖)))) = 0
197195, 196eqtrdi 2788 . . . . . . . . . . . . . . . . 17 (π‘Ž = 0 β†’ Σ𝑖 ∈ (1...(βŒŠβ€˜π‘Ž))((Ξ›β€˜π‘–) Β· ((logβ€˜π‘–) + (Οˆβ€˜(π‘Ž / 𝑖)))) = 0)
198197, 47, 132fvmpt 6995 . . . . . . . . . . . . . . . 16 (0 ∈ ℝ β†’ (π‘†β€˜0) = 0)
199186, 198ax-mp 5 . . . . . . . . . . . . . . 15 (π‘†β€˜0) = 0
200185, 199eqtrdi 2788 . . . . . . . . . . . . . 14 (π‘š = 1 β†’ (π‘†β€˜(π‘š βˆ’ 1)) = 0)
201184fveq2d 6892 . . . . . . . . . . . . . . . . 17 (π‘š = 1 β†’ (π‘‡β€˜(π‘š βˆ’ 1)) = (π‘‡β€˜0))
202 rpne0 12986 . . . . . . . . . . . . . . . . . . . . 21 (π‘Ž ∈ ℝ+ β†’ π‘Ž β‰  0)
203202necon2bi 2971 . . . . . . . . . . . . . . . . . . . 20 (π‘Ž = 0 β†’ Β¬ π‘Ž ∈ ℝ+)
204203iffalsed 4538 . . . . . . . . . . . . . . . . . . 19 (π‘Ž = 0 β†’ if(π‘Ž ∈ ℝ+, (π‘Ž Β· (logβ€˜π‘Ž)), 0) = 0)
205204, 81, 132fvmpt 6995 . . . . . . . . . . . . . . . . . 18 (0 ∈ ℝ β†’ (π‘‡β€˜0) = 0)
206186, 205ax-mp 5 . . . . . . . . . . . . . . . . 17 (π‘‡β€˜0) = 0
207201, 206eqtrdi 2788 . . . . . . . . . . . . . . . 16 (π‘š = 1 β†’ (π‘‡β€˜(π‘š βˆ’ 1)) = 0)
208207oveq2d 7421 . . . . . . . . . . . . . . 15 (π‘š = 1 β†’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1))) = (2 Β· 0))
209 2t0e0 12377 . . . . . . . . . . . . . . 15 (2 Β· 0) = 0
210208, 209eqtrdi 2788 . . . . . . . . . . . . . 14 (π‘š = 1 β†’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1))) = 0)
211200, 210oveq12d 7423 . . . . . . . . . . . . 13 (π‘š = 1 β†’ ((π‘†β€˜(π‘š βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1)))) = (0 βˆ’ 0))
212 0m0e0 12328 . . . . . . . . . . . . 13 (0 βˆ’ 0) = 0
213211, 212eqtrdi 2788 . . . . . . . . . . . 12 (π‘š = 1 β†’ ((π‘†β€˜(π‘š βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1)))) = 0)
214181, 213jca 512 . . . . . . . . . . 11 (π‘š = 1 β†’ ((absβ€˜(π‘…β€˜(π‘₯ / π‘š))) = (absβ€˜(π‘…β€˜(π‘₯ / 1))) ∧ ((π‘†β€˜(π‘š βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1)))) = 0))
215 oveq2 7413 . . . . . . . . . . . . . 14 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (π‘₯ / π‘š) = (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))
216215fveq2d 6892 . . . . . . . . . . . . 13 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (π‘…β€˜(π‘₯ / π‘š)) = (π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1))))
217216fveq2d 6892 . . . . . . . . . . . 12 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (absβ€˜(π‘…β€˜(π‘₯ / π‘š))) = (absβ€˜(π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))))
218 fvoveq1 7428 . . . . . . . . . . . . 13 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (π‘†β€˜(π‘š βˆ’ 1)) = (π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)))
219 fvoveq1 7428 . . . . . . . . . . . . . 14 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (π‘‡β€˜(π‘š βˆ’ 1)) = (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)))
220219oveq2d 7421 . . . . . . . . . . . . 13 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1))) = (2 Β· (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))))
221218, 220oveq12d 7423 . . . . . . . . . . . 12 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ ((π‘†β€˜(π‘š βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1)))) = ((π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)))))
222217, 221jca 512 . . . . . . . . . . 11 (π‘š = ((βŒŠβ€˜π‘₯) + 1) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / π‘š))) = (absβ€˜(π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))) ∧ ((π‘†β€˜(π‘š βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1)))) = ((π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))))))
223 nnuz 12861 . . . . . . . . . . . 12 β„• = (β„€β‰₯β€˜1)
22415, 223eleqtrdi 2843 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((βŒŠβ€˜π‘₯) + 1) ∈ (β„€β‰₯β€˜1))
22510adantr 481 . . . . . . . . . . . . . . . 16 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ π‘₯ ∈ ℝ+)
226 elfznn 13526 . . . . . . . . . . . . . . . . . 18 (π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1)) β†’ π‘š ∈ β„•)
227226adantl 482 . . . . . . . . . . . . . . . . 17 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ π‘š ∈ β„•)
228227nnrpd 13010 . . . . . . . . . . . . . . . 16 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ π‘š ∈ ℝ+)
229225, 228rpdivcld 13029 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (π‘₯ / π‘š) ∈ ℝ+)
23069ffvelcdmi 7082 . . . . . . . . . . . . . . 15 ((π‘₯ / π‘š) ∈ ℝ+ β†’ (π‘…β€˜(π‘₯ / π‘š)) ∈ ℝ)
231229, 230syl 17 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (π‘…β€˜(π‘₯ / π‘š)) ∈ ℝ)
232231recnd 11238 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (π‘…β€˜(π‘₯ / π‘š)) ∈ β„‚)
233232abscld 15379 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (absβ€˜(π‘…β€˜(π‘₯ / π‘š))) ∈ ℝ)
234233recnd 11238 . . . . . . . . . . 11 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (absβ€˜(π‘…β€˜(π‘₯ / π‘š))) ∈ β„‚)
235227nnred 12223 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ π‘š ∈ ℝ)
236 1red 11211 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ 1 ∈ ℝ)
237235, 236resubcld 11638 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (π‘š βˆ’ 1) ∈ ℝ)
23878ffvelcdmi 7082 . . . . . . . . . . . . . 14 ((π‘š βˆ’ 1) ∈ ℝ β†’ (π‘†β€˜(π‘š βˆ’ 1)) ∈ ℝ)
239237, 238syl 17 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (π‘†β€˜(π‘š βˆ’ 1)) ∈ ℝ)
24022a1i 11 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ 2 ∈ ℝ)
24187ffvelcdmi 7082 . . . . . . . . . . . . . . 15 ((π‘š βˆ’ 1) ∈ ℝ β†’ (π‘‡β€˜(π‘š βˆ’ 1)) ∈ ℝ)
242237, 241syl 17 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (π‘‡β€˜(π‘š βˆ’ 1)) ∈ ℝ)
243240, 242remulcld 11240 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1))) ∈ ℝ)
244239, 243resubcld 11638 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ ((π‘†β€˜(π‘š βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1)))) ∈ ℝ)
245244recnd 11238 . . . . . . . . . . 11 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ π‘š ∈ (1...((βŒŠβ€˜π‘₯) + 1))) β†’ ((π‘†β€˜(π‘š βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(π‘š βˆ’ 1)))) ∈ β„‚)
246170, 178, 214, 222, 224, 234, 245fsumparts 15748 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))) βˆ’ ((π‘†β€˜(𝑛 βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1)))))) = ((((absβ€˜(π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))) Β· ((π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))))) βˆ’ ((absβ€˜(π‘…β€˜(π‘₯ / 1))) Β· 0)) βˆ’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))(((absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛)))) Β· ((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))))))
247147recnd 11238 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘†β€˜π‘›) ∈ β„‚)
24887ffvelcdmi 7082 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℝ β†’ (π‘‡β€˜π‘›) ∈ ℝ)
249145, 248syl 17 . . . . . . . . . . . . . . . 16 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘‡β€˜π‘›) ∈ ℝ)
250148, 249remulcld 11240 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· (π‘‡β€˜π‘›)) ∈ ℝ)
251250recnd 11238 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· (π‘‡β€˜π‘›)) ∈ β„‚)
252 1red 11211 . . . . . . . . . . . . . . . . 17 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ∈ ℝ)
253145, 252resubcld 11638 . . . . . . . . . . . . . . . 16 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 βˆ’ 1) ∈ ℝ)
25478ffvelcdmi 7082 . . . . . . . . . . . . . . . 16 ((𝑛 βˆ’ 1) ∈ ℝ β†’ (π‘†β€˜(𝑛 βˆ’ 1)) ∈ ℝ)
255253, 254syl 17 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘†β€˜(𝑛 βˆ’ 1)) ∈ ℝ)
256255recnd 11238 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘†β€˜(𝑛 βˆ’ 1)) ∈ β„‚)
25787ffvelcdmi 7082 . . . . . . . . . . . . . . . . 17 ((𝑛 βˆ’ 1) ∈ ℝ β†’ (π‘‡β€˜(𝑛 βˆ’ 1)) ∈ ℝ)
258253, 257syl 17 . . . . . . . . . . . . . . . 16 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘‡β€˜(𝑛 βˆ’ 1)) ∈ ℝ)
259148, 258remulcld 11240 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1))) ∈ ℝ)
260259recnd 11238 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1))) ∈ β„‚)
261247, 251, 256, 260sub4d 11616 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((π‘†β€˜π‘›) βˆ’ (2 Β· (π‘‡β€˜π‘›))) βˆ’ ((π‘†β€˜(𝑛 βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1))))) = (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ ((2 Β· (π‘‡β€˜π‘›)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1))))))
262124oveq2d 7421 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1))) = (2 Β· (π‘‡β€˜π‘›)))
263123, 262oveq12d 7423 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))) = ((π‘†β€˜π‘›) βˆ’ (2 Β· (π‘‡β€˜π‘›))))
264263oveq1d 7420 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))) βˆ’ ((π‘†β€˜(𝑛 βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1))))) = (((π‘†β€˜π‘›) βˆ’ (2 Β· (π‘‡β€˜π‘›))) βˆ’ ((π‘†β€˜(𝑛 βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1))))))
265 2cnd 12286 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 2 ∈ β„‚)
266249recnd 11238 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘‡β€˜π‘›) ∈ β„‚)
267258recnd 11238 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘‡β€˜(𝑛 βˆ’ 1)) ∈ β„‚)
268265, 266, 267subdid 11666 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))) = ((2 Β· (π‘‡β€˜π‘›)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1)))))
269268oveq2d 7421 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))) = (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ ((2 Β· (π‘‡β€˜π‘›)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1))))))
270261, 264, 2693eqtr4d 2782 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))) βˆ’ ((π‘†β€˜(𝑛 βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1))))) = (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))
271270oveq2d 7421 . . . . . . . . . . 11 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))) βˆ’ ((π‘†β€˜(𝑛 βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1)))))) = ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))))
27299, 271sumeq12rdv 15649 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))) βˆ’ ((π‘†β€˜(𝑛 βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(𝑛 βˆ’ 1)))))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))))
273246, 272eqtr3d 2774 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((absβ€˜(π‘…β€˜(π‘₯ / ((βŒŠβ€˜π‘₯) + 1)))) Β· ((π‘†β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜(((βŒŠβ€˜π‘₯) + 1) βˆ’ 1))))) βˆ’ ((absβ€˜(π‘…β€˜(π‘₯ / 1))) Β· 0)) βˆ’ Σ𝑛 ∈ (1..^((βŒŠβ€˜π‘₯) + 1))(((absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛)))) Β· ((π‘†β€˜((𝑛 + 1) βˆ’ 1)) βˆ’ (2 Β· (π‘‡β€˜((𝑛 + 1) βˆ’ 1)))))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))))
274157, 159fsumcl 15675 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) ∈ β„‚)
27593, 274subnegd 11574 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) βˆ’ -Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) = (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))))
276162, 273, 2753eqtr3rd 2781 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))))
27710relogcld 26122 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (logβ€˜π‘₯) ∈ ℝ)
278277recnd 11238 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (logβ€˜π‘₯) ∈ β„‚)
27966, 278mulcomd 11231 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ Β· (logβ€˜π‘₯)) = ((logβ€˜π‘₯) Β· π‘₯))
280276, 279oveq12d 7423 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯))) = (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / ((logβ€˜π‘₯) Β· π‘₯)))
281147, 255resubcld 11638 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) ∈ ℝ)
282249, 258resubcld 11638 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))) ∈ ℝ)
283148, 282remulcld 11240 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))) ∈ ℝ)
284281, 283resubcld 11638 . . . . . . . . . . 11 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))) ∈ ℝ)
285108, 284remulcld 11240 . . . . . . . . . 10 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) ∈ ℝ)
286157, 285fsumrecl 15676 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) ∈ ℝ)
287286recnd 11238 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) ∈ β„‚)
2882, 8rplogcld 26128 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (logβ€˜π‘₯) ∈ ℝ+)
289288rpne0d 13017 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (logβ€˜π‘₯) β‰  0)
29010rpne0d 13017 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ π‘₯ β‰  0)
291287, 278, 66, 289, 290divdiv1d 12017 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯)) / π‘₯) = (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / ((logβ€˜π‘₯) Β· π‘₯)))
292280, 291eqtr4d 2775 . . . . . 6 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯))) = ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯)) / π‘₯))
293292oveq2d 7421 . . . . 5 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) / π‘₯) + ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯)))) = (((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) / π‘₯) + ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯)) / π‘₯)))
29471recnd 11238 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘…β€˜π‘₯) ∈ β„‚)
295294abscld 15379 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(π‘…β€˜π‘₯)) ∈ ℝ)
296295, 277remulcld 11240 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) ∈ ℝ)
297108, 281remulcld 11240 . . . . . . . . . 10 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) ∈ ℝ)
298157, 297fsumrecl 15676 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) ∈ ℝ)
299298, 288rerpdivcld 13043 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯)) ∈ ℝ)
300296, 299resubcld 11638 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) ∈ ℝ)
301300recnd 11238 . . . . . 6 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) ∈ β„‚)
302287, 278, 289divcld 11986 . . . . . 6 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯)) ∈ β„‚)
303301, 302, 66, 290divdird 12024 . . . . 5 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) + (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯))) / π‘₯) = (((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) / π‘₯) + ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯)) / π‘₯)))
304296recnd 11238 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) ∈ β„‚)
305299recnd 11238 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯)) ∈ β„‚)
306304, 305, 302subsubd 11595 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯)))) = ((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) + (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯))))
307 2cnd 12286 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 2 ∈ β„‚)
308266, 267subcld 11567 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))) ∈ β„‚)
309109, 308mulcld 11230 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))) ∈ β„‚)
310157, 307, 309fsummulc2 15726 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (2 Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(2 Β· ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))
311281recnd 11238 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) ∈ β„‚)
312265, 308mulcld 11230 . . . . . . . . . . . . . . 15 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))) ∈ β„‚)
313311, 312nncand 11572 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) = (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))
314313oveq2d 7421 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))) = ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))
315284recnd 11238 . . . . . . . . . . . . . 14 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))) ∈ β„‚)
316109, 311, 315subdid 11666 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))) = (((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) βˆ’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))))
317109, 265, 308mul12d 11419 . . . . . . . . . . . . 13 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))) = (2 Β· ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))
318314, 316, 3173eqtr3d 2780 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) βˆ’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))) = (2 Β· ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))
319318sumeq2dv 15645 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) βˆ’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(2 Β· ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))
320297recnd 11238 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) ∈ β„‚)
321285recnd 11238 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) ∈ β„‚)
322157, 320, 321fsumsub 15730 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) βˆ’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))) = (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) βˆ’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))))
323310, 319, 3223eqtr2rd 2779 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) βˆ’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))) = (2 Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))
324323oveq1d 7420 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) βˆ’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))) / (logβ€˜π‘₯)) = ((2 Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))) / (logβ€˜π‘₯)))
325298recnd 11238 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) ∈ β„‚)
326325, 287, 278, 289divsubdird 12025 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) βˆ’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))) / (logβ€˜π‘₯)) = ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯))))
327108, 282remulcld 11240 . . . . . . . . . . . 12 (((⊀ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))) ∈ ℝ)
328157, 327fsumrecl 15676 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))) ∈ ℝ)
329328recnd 11238 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))) ∈ β„‚)
330307, 329, 278, 289div23d 12023 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((2 Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))) / (logβ€˜π‘₯)) = ((2 / (logβ€˜π‘₯)) Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))
331324, 326, 3303eqtr3d 2780 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯))) = ((2 / (logβ€˜π‘₯)) Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1))))))
332331oveq2d 7421 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ ((Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯)))) = (((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ ((2 / (logβ€˜π‘₯)) Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))))
333306, 332eqtr3d 2774 . . . . . 6 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) + (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯))) = (((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ ((2 / (logβ€˜π‘₯)) Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))))
334333oveq1d 7420 . . . . 5 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) + (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· (((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1))) βˆ’ (2 Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / (logβ€˜π‘₯))) / π‘₯) = ((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ ((2 / (logβ€˜π‘₯)) Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / π‘₯))
335293, 303, 3343eqtr2d 2778 . . . 4 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) / π‘₯) + ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯)))) = ((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ ((2 / (logβ€˜π‘₯)) Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / π‘₯))
336335mpteq2dva 5247 . . 3 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) / π‘₯) + ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯))))) = (π‘₯ ∈ (1(,)+∞) ↦ ((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ ((2 / (logβ€˜π‘₯)) Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / π‘₯)))
337300, 10rerpdivcld 13043 . . . 4 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) / π‘₯) ∈ ℝ)
338157, 158fsumrecl 15676 . . . . . 6 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) ∈ ℝ)
33992, 338readdcld 11239 . . . . 5 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) ∈ ℝ)
34010, 288rpmulcld 13028 . . . . 5 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ Β· (logβ€˜π‘₯)) ∈ ℝ+)
341339, 340rerpdivcld 13043 . . . 4 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯))) ∈ ℝ)
34247, 18pntrlog2bndlem1 27069 . . . . 5 (π‘₯ ∈ (1(,)+∞) ↦ ((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) / π‘₯)) ∈ ≀𝑂(1)
343342a1i 11 . . . 4 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ ((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) / π‘₯)) ∈ ≀𝑂(1))
344340rpcnd 13014 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ Β· (logβ€˜π‘₯)) ∈ β„‚)
345340rpne0d 13017 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ Β· (logβ€˜π‘₯)) β‰  0)
34693, 274, 344, 345divdird 12024 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯))) = ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) / (π‘₯ Β· (logβ€˜π‘₯))) + (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))))
34791recnd 11238 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) ∈ β„‚)
34843, 347, 344, 345divassd 12021 . . . . . . . 8 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) / (π‘₯ Β· (logβ€˜π‘₯))) = ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯)))))
349348oveq1d 7420 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) / (π‘₯ Β· (logβ€˜π‘₯))) + (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) = (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯)))) + (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))))
350346, 349eqtrd 2772 . . . . . 6 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯))) = (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯)))) + (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))))
351350mpteq2dva 5247 . . . . 5 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯)))) = (π‘₯ ∈ (1(,)+∞) ↦ (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯)))) + (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯))))))
35291, 340rerpdivcld 13043 . . . . . . 7 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯))) ∈ ℝ)
35321, 352remulcld 11240 . . . . . 6 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ ℝ)
354338, 340rerpdivcld 13043 . . . . . 6 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯))) ∈ ℝ)
355 ioossre 13381 . . . . . . . . 9 (1(,)+∞) βŠ† ℝ
356355a1i 11 . . . . . . . 8 (⊀ β†’ (1(,)+∞) βŠ† ℝ)
357 1red 11211 . . . . . . . 8 (⊀ β†’ 1 ∈ ℝ)
35821, 5, 30ltled 11358 . . . . . . . . 9 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) ≀ 1)
359358adantrr 715 . . . . . . . 8 ((⊀ ∧ (π‘₯ ∈ (1(,)+∞) ∧ 1 ≀ π‘₯)) β†’ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) ≀ 1)
360356, 21, 357, 357, 359ello1d 15463 . . . . . . 7 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (π‘₯ / ((βŒŠβ€˜π‘₯) + 1))) ∈ ≀𝑂(1))
36180recnd 11238 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘†β€˜π‘₯) ∈ β„‚)
36290recnd 11238 . . . . . . . . . . 11 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) ∈ β„‚)
363361, 362, 344, 345divsubdird 12025 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯))) = (((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯))) βˆ’ ((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯)))))
364363mpteq2dva 5247 . . . . . . . . 9 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯)))) = (π‘₯ ∈ (1(,)+∞) ↦ (((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯))) βˆ’ ((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯))))))
36580, 340rerpdivcld 13043 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯))) ∈ ℝ)
36690, 340rerpdivcld 13043 . . . . . . . . . 10 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯))) ∈ ℝ)
367 2cnd 12286 . . . . . . . . . . . 12 (⊀ β†’ 2 ∈ β„‚)
368 o1const 15560 . . . . . . . . . . . 12 (((1(,)+∞) βŠ† ℝ ∧ 2 ∈ β„‚) β†’ (π‘₯ ∈ (1(,)+∞) ↦ 2) ∈ 𝑂(1))
369355, 367, 368sylancr 587 . . . . . . . . . . 11 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ 2) ∈ 𝑂(1))
370365recnd 11238 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯))) ∈ β„‚)
37180, 10rerpdivcld 13043 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘†β€˜π‘₯) / π‘₯) ∈ ℝ)
372371recnd 11238 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((π‘†β€˜π‘₯) / π‘₯) ∈ β„‚)
373307, 278mulcld 11230 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (2 Β· (logβ€˜π‘₯)) ∈ β„‚)
374372, 373, 278, 289divsubdird 12025 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((π‘†β€˜π‘₯) / π‘₯) βˆ’ (2 Β· (logβ€˜π‘₯))) / (logβ€˜π‘₯)) = ((((π‘†β€˜π‘₯) / π‘₯) / (logβ€˜π‘₯)) βˆ’ ((2 Β· (logβ€˜π‘₯)) / (logβ€˜π‘₯))))
37523, 277remulcld 11240 . . . . . . . . . . . . . . . . . 18 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (2 Β· (logβ€˜π‘₯)) ∈ ℝ)
376371, 375resubcld 11638 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((π‘†β€˜π‘₯) / π‘₯) βˆ’ (2 Β· (logβ€˜π‘₯))) ∈ ℝ)
377376recnd 11238 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((π‘†β€˜π‘₯) / π‘₯) βˆ’ (2 Β· (logβ€˜π‘₯))) ∈ β„‚)
378377, 278, 289divrecd 11989 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((π‘†β€˜π‘₯) / π‘₯) βˆ’ (2 Β· (logβ€˜π‘₯))) / (logβ€˜π‘₯)) = ((((π‘†β€˜π‘₯) / π‘₯) βˆ’ (2 Β· (logβ€˜π‘₯))) Β· (1 / (logβ€˜π‘₯))))
379361, 66, 278, 290, 289divdiv1d 12017 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((π‘†β€˜π‘₯) / π‘₯) / (logβ€˜π‘₯)) = ((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯))))
380307, 278, 289divcan4d 11992 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((2 Β· (logβ€˜π‘₯)) / (logβ€˜π‘₯)) = 2)
381379, 380oveq12d 7423 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((((π‘†β€˜π‘₯) / π‘₯) / (logβ€˜π‘₯)) βˆ’ ((2 Β· (logβ€˜π‘₯)) / (logβ€˜π‘₯))) = (((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯))) βˆ’ 2))
382374, 378, 3813eqtr3rd 2781 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯))) βˆ’ 2) = ((((π‘†β€˜π‘₯) / π‘₯) βˆ’ (2 Β· (logβ€˜π‘₯))) Β· (1 / (logβ€˜π‘₯))))
383382mpteq2dva 5247 . . . . . . . . . . . . 13 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯))) βˆ’ 2)) = (π‘₯ ∈ (1(,)+∞) ↦ ((((π‘†β€˜π‘₯) / π‘₯) βˆ’ (2 Β· (logβ€˜π‘₯))) Β· (1 / (logβ€˜π‘₯)))))
3845, 288rerpdivcld 13043 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (1 / (logβ€˜π‘₯)) ∈ ℝ)
38510ex 413 . . . . . . . . . . . . . . . 16 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) β†’ π‘₯ ∈ ℝ+))
386385ssrdv 3987 . . . . . . . . . . . . . . 15 (⊀ β†’ (1(,)+∞) βŠ† ℝ+)
38747selbergs 27066 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ ℝ+ ↦ (((π‘†β€˜π‘₯) / π‘₯) βˆ’ (2 Β· (logβ€˜π‘₯)))) ∈ 𝑂(1)
388387a1i 11 . . . . . . . . . . . . . . 15 (⊀ β†’ (π‘₯ ∈ ℝ+ ↦ (((π‘†β€˜π‘₯) / π‘₯) βˆ’ (2 Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
389386, 388o1res2 15503 . . . . . . . . . . . . . 14 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (((π‘†β€˜π‘₯) / π‘₯) βˆ’ (2 Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
390 divlogrlim 26134 . . . . . . . . . . . . . . 15 (π‘₯ ∈ (1(,)+∞) ↦ (1 / (logβ€˜π‘₯))) β‡π‘Ÿ 0
391 rlimo1 15557 . . . . . . . . . . . . . . 15 ((π‘₯ ∈ (1(,)+∞) ↦ (1 / (logβ€˜π‘₯))) β‡π‘Ÿ 0 β†’ (π‘₯ ∈ (1(,)+∞) ↦ (1 / (logβ€˜π‘₯))) ∈ 𝑂(1))
392390, 391mp1i 13 . . . . . . . . . . . . . 14 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (1 / (logβ€˜π‘₯))) ∈ 𝑂(1))
393376, 384, 389, 392o1mul2 15565 . . . . . . . . . . . . 13 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ ((((π‘†β€˜π‘₯) / π‘₯) βˆ’ (2 Β· (logβ€˜π‘₯))) Β· (1 / (logβ€˜π‘₯)))) ∈ 𝑂(1))
394383, 393eqeltrd 2833 . . . . . . . . . . . 12 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯))) βˆ’ 2)) ∈ 𝑂(1))
395370, 307, 394o1dif 15570 . . . . . . . . . . 11 (⊀ β†’ ((π‘₯ ∈ (1(,)+∞) ↦ ((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1) ↔ (π‘₯ ∈ (1(,)+∞) ↦ 2) ∈ 𝑂(1)))
396369, 395mpbird 256 . . . . . . . . . 10 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ ((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
39722a1i 11 . . . . . . . . . . . 12 (⊀ β†’ 2 ∈ ℝ)
3982, 277remulcld 11240 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ Β· (logβ€˜π‘₯)) ∈ ℝ)
399 2rp 12975 . . . . . . . . . . . . . . . . 17 2 ∈ ℝ+
400399a1i 11 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 2 ∈ ℝ+)
401400rpge0d 13016 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 0 ≀ 2)
402 flge1nn 13782 . . . . . . . . . . . . . . . . . . 19 ((π‘₯ ∈ ℝ ∧ 1 ≀ π‘₯) β†’ (βŒŠβ€˜π‘₯) ∈ β„•)
4032, 9, 402syl2anc 584 . . . . . . . . . . . . . . . . . 18 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (βŒŠβ€˜π‘₯) ∈ β„•)
404403nnrpd 13010 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (βŒŠβ€˜π‘₯) ∈ ℝ+)
405 rpre 12978 . . . . . . . . . . . . . . . . . . 19 ((βŒŠβ€˜π‘₯) ∈ ℝ+ β†’ (βŒŠβ€˜π‘₯) ∈ ℝ)
406 eleq1 2821 . . . . . . . . . . . . . . . . . . . . 21 (π‘Ž = (βŒŠβ€˜π‘₯) β†’ (π‘Ž ∈ ℝ+ ↔ (βŒŠβ€˜π‘₯) ∈ ℝ+))
407 id 22 . . . . . . . . . . . . . . . . . . . . . 22 (π‘Ž = (βŒŠβ€˜π‘₯) β†’ π‘Ž = (βŒŠβ€˜π‘₯))
408 fveq2 6888 . . . . . . . . . . . . . . . . . . . . . 22 (π‘Ž = (βŒŠβ€˜π‘₯) β†’ (logβ€˜π‘Ž) = (logβ€˜(βŒŠβ€˜π‘₯)))
409407, 408oveq12d 7423 . . . . . . . . . . . . . . . . . . . . 21 (π‘Ž = (βŒŠβ€˜π‘₯) β†’ (π‘Ž Β· (logβ€˜π‘Ž)) = ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))))
410406, 409ifbieq1d 4551 . . . . . . . . . . . . . . . . . . . 20 (π‘Ž = (βŒŠβ€˜π‘₯) β†’ if(π‘Ž ∈ ℝ+, (π‘Ž Β· (logβ€˜π‘Ž)), 0) = if((βŒŠβ€˜π‘₯) ∈ ℝ+, ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))), 0))
411 ovex 7438 . . . . . . . . . . . . . . . . . . . . 21 ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))) ∈ V
412411, 132ifex 4577 . . . . . . . . . . . . . . . . . . . 20 if((βŒŠβ€˜π‘₯) ∈ ℝ+, ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))), 0) ∈ V
413410, 81, 412fvmpt 6995 . . . . . . . . . . . . . . . . . . 19 ((βŒŠβ€˜π‘₯) ∈ ℝ β†’ (π‘‡β€˜(βŒŠβ€˜π‘₯)) = if((βŒŠβ€˜π‘₯) ∈ ℝ+, ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))), 0))
414405, 413syl 17 . . . . . . . . . . . . . . . . . 18 ((βŒŠβ€˜π‘₯) ∈ ℝ+ β†’ (π‘‡β€˜(βŒŠβ€˜π‘₯)) = if((βŒŠβ€˜π‘₯) ∈ ℝ+, ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))), 0))
415 iftrue 4533 . . . . . . . . . . . . . . . . . 18 ((βŒŠβ€˜π‘₯) ∈ ℝ+ β†’ if((βŒŠβ€˜π‘₯) ∈ ℝ+, ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))), 0) = ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))))
416414, 415eqtrd 2772 . . . . . . . . . . . . . . . . 17 ((βŒŠβ€˜π‘₯) ∈ ℝ+ β†’ (π‘‡β€˜(βŒŠβ€˜π‘₯)) = ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))))
417404, 416syl 17 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘‡β€˜(βŒŠβ€˜π‘₯)) = ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))))
418404relogcld 26122 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (logβ€˜(βŒŠβ€˜π‘₯)) ∈ ℝ)
41913nn0ge0d 12531 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 0 ≀ (βŒŠβ€˜π‘₯))
420403nnge1d 12256 . . . . . . . . . . . . . . . . . 18 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 1 ≀ (βŒŠβ€˜π‘₯))
42146, 420logge0d 26129 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 0 ≀ (logβ€˜(βŒŠβ€˜π‘₯)))
422 flle 13760 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ ℝ β†’ (βŒŠβ€˜π‘₯) ≀ π‘₯)
4232, 422syl 17 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (βŒŠβ€˜π‘₯) ≀ π‘₯)
424404, 10logled 26126 . . . . . . . . . . . . . . . . . 18 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((βŒŠβ€˜π‘₯) ≀ π‘₯ ↔ (logβ€˜(βŒŠβ€˜π‘₯)) ≀ (logβ€˜π‘₯)))
425423, 424mpbid 231 . . . . . . . . . . . . . . . . 17 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (logβ€˜(βŒŠβ€˜π‘₯)) ≀ (logβ€˜π‘₯))
42646, 2, 418, 277, 419, 421, 423, 425lemul12ad 12152 . . . . . . . . . . . . . . . 16 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))) ≀ (π‘₯ Β· (logβ€˜π‘₯)))
427417, 426eqbrtrd 5169 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘‡β€˜(βŒŠβ€˜π‘₯)) ≀ (π‘₯ Β· (logβ€˜π‘₯)))
42889, 398, 23, 401, 427lemul2ad 12150 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) ≀ (2 Β· (π‘₯ Β· (logβ€˜π‘₯))))
42990, 23, 340ledivmul2d 13066 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯))) ≀ 2 ↔ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) ≀ (2 Β· (π‘₯ Β· (logβ€˜π‘₯)))))
430428, 429mpbird 256 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯))) ≀ 2)
431430adantrr 715 . . . . . . . . . . . 12 ((⊀ ∧ (π‘₯ ∈ (1(,)+∞) ∧ 1 ≀ π‘₯)) β†’ ((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯))) ≀ 2)
432356, 366, 357, 397, 431ello1d 15463 . . . . . . . . . . 11 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ ((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ ≀𝑂(1))
433 0red 11213 . . . . . . . . . . . 12 (⊀ β†’ 0 ∈ ℝ)
43446, 418, 419, 421mulge0d 11787 . . . . . . . . . . . . . . 15 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 0 ≀ ((βŒŠβ€˜π‘₯) Β· (logβ€˜(βŒŠβ€˜π‘₯))))
435434, 417breqtrrd 5175 . . . . . . . . . . . . . 14 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 0 ≀ (π‘‡β€˜(βŒŠβ€˜π‘₯)))
43623, 89, 401, 435mulge0d 11787 . . . . . . . . . . . . 13 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 0 ≀ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))
43790, 340, 436divge0d 13052 . . . . . . . . . . . 12 ((⊀ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 0 ≀ ((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯))))
438366, 433, 437o1lo12 15478 . . . . . . . . . . 11 (⊀ β†’ ((π‘₯ ∈ (1(,)+∞) ↦ ((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1) ↔ (π‘₯ ∈ (1(,)+∞) ↦ ((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ ≀𝑂(1)))
439432, 438mpbird 256 . . . . . . . . . 10 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ ((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
440365, 366, 396, 439o1sub2 15566 . . . . . . . . 9 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (((π‘†β€˜π‘₯) / (π‘₯ Β· (logβ€˜π‘₯))) βˆ’ ((2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))) / (π‘₯ Β· (logβ€˜π‘₯))))) ∈ 𝑂(1))
441364, 440eqeltrd 2833 . . . . . . . 8 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
442352, 441o1lo1d 15479 . . . . . . 7 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ ≀𝑂(1))
44321, 352, 360, 442, 41lo1mul 15568 . . . . . 6 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ ((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯))))) ∈ ≀𝑂(1))
44447selbergsb 27067 . . . . . . . 8 βˆƒπ‘ ∈ ℝ+ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜(((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦)))) ≀ 𝑐
445 simpl 483 . . . . . . . . . 10 ((𝑐 ∈ ℝ+ ∧ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜(((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦)))) ≀ 𝑐) β†’ 𝑐 ∈ ℝ+)
446 simpr 485 . . . . . . . . . 10 ((𝑐 ∈ ℝ+ ∧ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜(((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦)))) ≀ 𝑐) β†’ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜(((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦)))) ≀ 𝑐)
44747, 18, 445, 446pntrlog2bndlem3 27071 . . . . . . . . 9 ((𝑐 ∈ ℝ+ ∧ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜(((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦)))) ≀ 𝑐) β†’ (π‘₯ ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
448447rexlimiva 3147 . . . . . . . 8 (βˆƒπ‘ ∈ ℝ+ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜(((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦)))) ≀ 𝑐 β†’ (π‘₯ ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
449444, 448mp1i 13 . . . . . . 7 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
450354, 449o1lo1d 15479 . . . . . 6 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ ≀𝑂(1))
451353, 354, 443, 450lo1add 15567 . . . . 5 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· (((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯)))) / (π‘₯ Β· (logβ€˜π‘₯)))) + (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯))))) ∈ ≀𝑂(1))
452351, 451eqeltrd 2833 . . . 4 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ ≀𝑂(1))
453337, 341, 343, 452lo1add 15567 . . 3 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘†β€˜π‘›) βˆ’ (π‘†β€˜(𝑛 βˆ’ 1)))) / (logβ€˜π‘₯))) / π‘₯) + ((((π‘₯ / ((βŒŠβ€˜π‘₯) + 1)) Β· ((π‘†β€˜π‘₯) βˆ’ (2 Β· (π‘‡β€˜(βŒŠβ€˜π‘₯))))) + Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯))))) ∈ ≀𝑂(1))
454336, 453eqeltrrd 2834 . 2 (⊀ β†’ (π‘₯ ∈ (1(,)+∞) ↦ ((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ ((2 / (logβ€˜π‘₯)) Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / π‘₯)) ∈ ≀𝑂(1))
455454mptru 1548 1 (π‘₯ ∈ (1(,)+∞) ↦ ((((absβ€˜(π‘…β€˜π‘₯)) Β· (logβ€˜π‘₯)) βˆ’ ((2 / (logβ€˜π‘₯)) Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) Β· ((π‘‡β€˜π‘›) βˆ’ (π‘‡β€˜(𝑛 βˆ’ 1)))))) / π‘₯)) ∈ ≀𝑂(1)
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   ↔ wb 205   ∧ wa 396   = wceq 1541  βŠ€wtru 1542   ∈ wcel 2106  βˆ€wral 3061  βˆƒwrex 3070  {crab 3432   βŠ† wss 3947  βˆ…c0 4321  ifcif 4527   class class class wbr 5147   ↦ cmpt 5230  β€˜cfv 6540  (class class class)co 7405  β„‚cc 11104  β„cr 11105  0cc0 11106  1c1 11107   + caddc 11109   Β· cmul 11111  +∞cpnf 11241   < clt 11244   ≀ cle 11245   βˆ’ cmin 11440  -cneg 11441   / cdiv 11867  β„•cn 12208  2c2 12263  β„•0cn0 12468  β„€cz 12554  β„€β‰₯cuz 12818  β„+crp 12970  (,)cioo 13320  [,)cico 13322  ...cfz 13480  ..^cfzo 13623  βŒŠcfl 13751  abscabs 15177   β‡π‘Ÿ crli 15425  π‘‚(1)co1 15426  β‰€π‘‚(1)clo1 15427  Ξ£csu 15628   βˆ₯ cdvds 16193  logclog 26054  Ξ›cvma 26585  Οˆcchp 26586
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  ax-inf2 9632  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184  ax-addf 11185  ax-mulf 11186
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-tp 4632  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-iin 4999  df-disj 5113  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-se 5631  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-of 7666  df-om 7852  df-1st 7971  df-2nd 7972  df-supp 8143  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-2o 8463  df-oadd 8466  df-er 8699  df-map 8818  df-pm 8819  df-ixp 8888  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fsupp 9358  df-fi 9402  df-sup 9433  df-inf 9434  df-oi 9501  df-dju 9892  df-card 9930  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 16766  df-struct 17076  df-sets 17093  df-slot 17111  df-ndx 17123  df-base 17141  df-ress 17170  df-plusg 17206  df-mulr 17207  df-starv 17208  df-sca 17209  df-vsca 17210  df-ip 17211  df-tset 17212  df-ple 17213  df-ds 17215  df-unif 17216  df-hom 17217  df-cco 17218  df-rest 17364  df-topn 17365  df-0g 17383  df-gsum 17384  df-topgen 17385  df-pt 17386  df-prds 17389  df-xrs 17444  df-qtop 17449  df-imas 17450  df-xps 17452  df-mre 17526  df-mrc 17527  df-acs 17529  df-mgm 18557  df-sgrp 18606  df-mnd 18622  df-submnd 18668  df-mulg 18945  df-cntz 19175  df-cmn 19644  df-psmet 20928  df-xmet 20929  df-met 20930  df-bl 20931  df-mopn 20932  df-fbas 20933  df-fg 20934  df-cnfld 20937  df-top 22387  df-topon 22404  df-topsp 22426  df-bases 22440  df-cld 22514  df-ntr 22515  df-cls 22516  df-nei 22593  df-lp 22631  df-perf 22632  df-cn 22722  df-cnp 22723  df-haus 22810  df-cmp 22882  df-tx 23057  df-hmeo 23250  df-fil 23341  df-fm 23433  df-flim 23434  df-flf 23435  df-xms 23817  df-ms 23818  df-tms 23819  df-cncf 24385  df-limc 25374  df-dv 25375  df-ulm 25880  df-log 26056  df-cxp 26057  df-atan 26361  df-em 26486  df-cht 26590  df-vma 26591  df-chp 26592  df-ppi 26593  df-mu 26594
This theorem is referenced by:  pntrlog2bndlem5  27073
  Copyright terms: Public domain W3C validator