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

Theorem dvfsumlem3 25344
Description: Lemma for dvfsumrlim 25347. (Contributed by Mario Carneiro, 17-May-2016.)
Hypotheses
Ref Expression
dvfsum.s 𝑆 = (𝑇(,)+∞)
dvfsum.z 𝑍 = (ℤ𝑀)
dvfsum.m (𝜑𝑀 ∈ ℤ)
dvfsum.d (𝜑𝐷 ∈ ℝ)
dvfsum.md (𝜑𝑀 ≤ (𝐷 + 1))
dvfsum.t (𝜑𝑇 ∈ ℝ)
dvfsum.a ((𝜑𝑥𝑆) → 𝐴 ∈ ℝ)
dvfsum.b1 ((𝜑𝑥𝑆) → 𝐵𝑉)
dvfsum.b2 ((𝜑𝑥𝑍) → 𝐵 ∈ ℝ)
dvfsum.b3 (𝜑 → (ℝ D (𝑥𝑆𝐴)) = (𝑥𝑆𝐵))
dvfsum.c (𝑥 = 𝑘𝐵 = 𝐶)
dvfsum.u (𝜑𝑈 ∈ ℝ*)
dvfsum.l ((𝜑 ∧ (𝑥𝑆𝑘𝑆) ∧ (𝐷𝑥𝑥𝑘𝑘𝑈)) → 𝐶𝐵)
dvfsum.h 𝐻 = (𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))
dvfsumlem1.1 (𝜑𝑋𝑆)
dvfsumlem1.2 (𝜑𝑌𝑆)
dvfsumlem1.3 (𝜑𝐷𝑋)
dvfsumlem1.4 (𝜑𝑋𝑌)
dvfsumlem1.5 (𝜑𝑌𝑈)
Assertion
Ref Expression
dvfsumlem3 (𝜑 → ((𝐻𝑌) ≤ (𝐻𝑋) ∧ ((𝐻𝑋) − 𝑋 / 𝑥𝐵) ≤ ((𝐻𝑌) − 𝑌 / 𝑥𝐵)))
Distinct variable groups:   𝐵,𝑘   𝑥,𝐶   𝑥,𝑘,𝐷   𝜑,𝑘,𝑥   𝑆,𝑘,𝑥   𝑘,𝑀,𝑥   𝑥,𝑇   𝑘,𝑌,𝑥   𝑥,𝑍   𝑈,𝑘,𝑥   𝑘,𝑋,𝑥
Allowed substitution hints:   𝐴(𝑥,𝑘)   𝐵(𝑥)   𝐶(𝑘)   𝑇(𝑘)   𝐻(𝑥,𝑘)   𝑉(𝑥,𝑘)   𝑍(𝑘)

Proof of Theorem dvfsumlem3
Dummy variables 𝑦 𝑚 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 dvfsum.s . . . 4 𝑆 = (𝑇(,)+∞)
2 ioossre 13279 . . . 4 (𝑇(,)+∞) ⊆ ℝ
31, 2eqsstri 3976 . . 3 𝑆 ⊆ ℝ
4 dvfsumlem1.2 . . 3 (𝜑𝑌𝑆)
53, 4sselid 3940 . 2 (𝜑𝑌 ∈ ℝ)
6 dvfsumlem1.1 . . . 4 (𝜑𝑋𝑆)
73, 6sselid 3940 . . 3 (𝜑𝑋 ∈ ℝ)
8 reflcl 13655 . . 3 (𝑋 ∈ ℝ → (⌊‘𝑋) ∈ ℝ)
9 peano2re 11286 . . 3 ((⌊‘𝑋) ∈ ℝ → ((⌊‘𝑋) + 1) ∈ ℝ)
107, 8, 93syl 18 . 2 (𝜑 → ((⌊‘𝑋) + 1) ∈ ℝ)
11 dvfsum.z . . 3 𝑍 = (ℤ𝑀)
12 dvfsum.m . . . 4 (𝜑𝑀 ∈ ℤ)
1312adantr 481 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → 𝑀 ∈ ℤ)
14 dvfsum.d . . . 4 (𝜑𝐷 ∈ ℝ)
1514adantr 481 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → 𝐷 ∈ ℝ)
16 dvfsum.md . . . 4 (𝜑𝑀 ≤ (𝐷 + 1))
1716adantr 481 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → 𝑀 ≤ (𝐷 + 1))
18 dvfsum.t . . . 4 (𝜑𝑇 ∈ ℝ)
1918adantr 481 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → 𝑇 ∈ ℝ)
20 dvfsum.a . . . 4 ((𝜑𝑥𝑆) → 𝐴 ∈ ℝ)
2120adantlr 713 . . 3 (((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) ∧ 𝑥𝑆) → 𝐴 ∈ ℝ)
22 dvfsum.b1 . . . 4 ((𝜑𝑥𝑆) → 𝐵𝑉)
2322adantlr 713 . . 3 (((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) ∧ 𝑥𝑆) → 𝐵𝑉)
24 dvfsum.b2 . . . 4 ((𝜑𝑥𝑍) → 𝐵 ∈ ℝ)
2524adantlr 713 . . 3 (((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) ∧ 𝑥𝑍) → 𝐵 ∈ ℝ)
26 dvfsum.b3 . . . 4 (𝜑 → (ℝ D (𝑥𝑆𝐴)) = (𝑥𝑆𝐵))
2726adantr 481 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → (ℝ D (𝑥𝑆𝐴)) = (𝑥𝑆𝐵))
28 dvfsum.c . . 3 (𝑥 = 𝑘𝐵 = 𝐶)
29 dvfsum.u . . . 4 (𝜑𝑈 ∈ ℝ*)
3029adantr 481 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → 𝑈 ∈ ℝ*)
31 dvfsum.l . . . 4 ((𝜑 ∧ (𝑥𝑆𝑘𝑆) ∧ (𝐷𝑥𝑥𝑘𝑘𝑈)) → 𝐶𝐵)
32313adant1r 1177 . . 3 (((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) ∧ (𝑥𝑆𝑘𝑆) ∧ (𝐷𝑥𝑥𝑘𝑘𝑈)) → 𝐶𝐵)
33 dvfsum.h . . 3 𝐻 = (𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))
346adantr 481 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → 𝑋𝑆)
354adantr 481 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → 𝑌𝑆)
36 dvfsumlem1.3 . . . 4 (𝜑𝐷𝑋)
3736adantr 481 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → 𝐷𝑋)
38 dvfsumlem1.4 . . . 4 (𝜑𝑋𝑌)
3938adantr 481 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → 𝑋𝑌)
40 dvfsumlem1.5 . . . 4 (𝜑𝑌𝑈)
4140adantr 481 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → 𝑌𝑈)
42 simpr 485 . . 3 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → 𝑌 ≤ ((⌊‘𝑋) + 1))
431, 11, 13, 15, 17, 19, 21, 23, 25, 27, 28, 30, 32, 33, 34, 35, 37, 39, 41, 42dvfsumlem2 25343 . 2 ((𝜑𝑌 ≤ ((⌊‘𝑋) + 1)) → ((𝐻𝑌) ≤ (𝐻𝑋) ∧ ((𝐻𝑋) − 𝑋 / 𝑥𝐵) ≤ ((𝐻𝑌) − 𝑌 / 𝑥𝐵)))
443a1i 11 . . . . . . . . . . 11 (𝜑𝑆 ⊆ ℝ)
4544sselda 3942 . . . . . . . . . 10 ((𝜑𝑥𝑆) → 𝑥 ∈ ℝ)
46 reflcl 13655 . . . . . . . . . . 11 (𝑥 ∈ ℝ → (⌊‘𝑥) ∈ ℝ)
4745, 46syl 17 . . . . . . . . . 10 ((𝜑𝑥𝑆) → (⌊‘𝑥) ∈ ℝ)
4845, 47resubcld 11541 . . . . . . . . 9 ((𝜑𝑥𝑆) → (𝑥 − (⌊‘𝑥)) ∈ ℝ)
4944, 20, 22, 26dvmptrecl 25340 . . . . . . . . 9 ((𝜑𝑥𝑆) → 𝐵 ∈ ℝ)
5048, 49remulcld 11143 . . . . . . . 8 ((𝜑𝑥𝑆) → ((𝑥 − (⌊‘𝑥)) · 𝐵) ∈ ℝ)
51 fzfid 13832 . . . . . . . . . 10 ((𝜑𝑥𝑆) → (𝑀...(⌊‘𝑥)) ∈ Fin)
5224ralrimiva 3141 . . . . . . . . . . . 12 (𝜑 → ∀𝑥𝑍 𝐵 ∈ ℝ)
5352adantr 481 . . . . . . . . . . 11 ((𝜑𝑥𝑆) → ∀𝑥𝑍 𝐵 ∈ ℝ)
54 elfzuz 13391 . . . . . . . . . . . 12 (𝑘 ∈ (𝑀...(⌊‘𝑥)) → 𝑘 ∈ (ℤ𝑀))
5554, 11eleqtrrdi 2849 . . . . . . . . . . 11 (𝑘 ∈ (𝑀...(⌊‘𝑥)) → 𝑘𝑍)
5628eleq1d 2822 . . . . . . . . . . . 12 (𝑥 = 𝑘 → (𝐵 ∈ ℝ ↔ 𝐶 ∈ ℝ))
5756rspccva 3578 . . . . . . . . . . 11 ((∀𝑥𝑍 𝐵 ∈ ℝ ∧ 𝑘𝑍) → 𝐶 ∈ ℝ)
5853, 55, 57syl2an 596 . . . . . . . . . 10 (((𝜑𝑥𝑆) ∧ 𝑘 ∈ (𝑀...(⌊‘𝑥))) → 𝐶 ∈ ℝ)
5951, 58fsumrecl 15579 . . . . . . . . 9 ((𝜑𝑥𝑆) → Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶 ∈ ℝ)
6059, 20resubcld 11541 . . . . . . . 8 ((𝜑𝑥𝑆) → (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴) ∈ ℝ)
6150, 60readdcld 11142 . . . . . . 7 ((𝜑𝑥𝑆) → (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)) ∈ ℝ)
6261, 33fmptd 7058 . . . . . 6 (𝜑𝐻:𝑆⟶ℝ)
6362adantr 481 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝐻:𝑆⟶ℝ)
644adantr 481 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑌𝑆)
6563, 64ffvelcdmd 7032 . . . 4 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (𝐻𝑌) ∈ ℝ)
665adantr 481 . . . . . . . 8 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑌 ∈ ℝ)
67 reflcl 13655 . . . . . . . 8 (𝑌 ∈ ℝ → (⌊‘𝑌) ∈ ℝ)
6866, 67syl 17 . . . . . . 7 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (⌊‘𝑌) ∈ ℝ)
6918adantr 481 . . . . . . . 8 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑇 ∈ ℝ)
707adantr 481 . . . . . . . . 9 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑋 ∈ ℝ)
7170, 8, 93syl 18 . . . . . . . 8 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((⌊‘𝑋) + 1) ∈ ℝ)
726, 1eleqtrdi 2848 . . . . . . . . . . . 12 (𝜑𝑋 ∈ (𝑇(,)+∞))
7318rexrd 11163 . . . . . . . . . . . . 13 (𝜑𝑇 ∈ ℝ*)
74 elioopnf 13314 . . . . . . . . . . . . 13 (𝑇 ∈ ℝ* → (𝑋 ∈ (𝑇(,)+∞) ↔ (𝑋 ∈ ℝ ∧ 𝑇 < 𝑋)))
7573, 74syl 17 . . . . . . . . . . . 12 (𝜑 → (𝑋 ∈ (𝑇(,)+∞) ↔ (𝑋 ∈ ℝ ∧ 𝑇 < 𝑋)))
7672, 75mpbid 231 . . . . . . . . . . 11 (𝜑 → (𝑋 ∈ ℝ ∧ 𝑇 < 𝑋))
7776simprd 496 . . . . . . . . . 10 (𝜑𝑇 < 𝑋)
78 fllep1 13660 . . . . . . . . . . 11 (𝑋 ∈ ℝ → 𝑋 ≤ ((⌊‘𝑋) + 1))
797, 78syl 17 . . . . . . . . . 10 (𝜑𝑋 ≤ ((⌊‘𝑋) + 1))
8018, 7, 10, 77, 79ltletrd 11273 . . . . . . . . 9 (𝜑𝑇 < ((⌊‘𝑋) + 1))
8180adantr 481 . . . . . . . 8 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑇 < ((⌊‘𝑋) + 1))
82 simpr 485 . . . . . . . . 9 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((⌊‘𝑋) + 1) ≤ 𝑌)
8370flcld 13657 . . . . . . . . . . 11 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (⌊‘𝑋) ∈ ℤ)
8483peano2zd 12568 . . . . . . . . . 10 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((⌊‘𝑋) + 1) ∈ ℤ)
85 flge 13664 . . . . . . . . . 10 ((𝑌 ∈ ℝ ∧ ((⌊‘𝑋) + 1) ∈ ℤ) → (((⌊‘𝑋) + 1) ≤ 𝑌 ↔ ((⌊‘𝑋) + 1) ≤ (⌊‘𝑌)))
8666, 84, 85syl2anc 584 . . . . . . . . 9 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (((⌊‘𝑋) + 1) ≤ 𝑌 ↔ ((⌊‘𝑋) + 1) ≤ (⌊‘𝑌)))
8782, 86mpbid 231 . . . . . . . 8 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((⌊‘𝑋) + 1) ≤ (⌊‘𝑌))
8869, 71, 68, 81, 87ltletrd 11273 . . . . . . 7 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑇 < (⌊‘𝑌))
8973adantr 481 . . . . . . . 8 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑇 ∈ ℝ*)
90 elioopnf 13314 . . . . . . . 8 (𝑇 ∈ ℝ* → ((⌊‘𝑌) ∈ (𝑇(,)+∞) ↔ ((⌊‘𝑌) ∈ ℝ ∧ 𝑇 < (⌊‘𝑌))))
9189, 90syl 17 . . . . . . 7 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((⌊‘𝑌) ∈ (𝑇(,)+∞) ↔ ((⌊‘𝑌) ∈ ℝ ∧ 𝑇 < (⌊‘𝑌))))
9268, 88, 91mpbir2and 711 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (⌊‘𝑌) ∈ (𝑇(,)+∞))
9392, 1eleqtrrdi 2849 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (⌊‘𝑌) ∈ 𝑆)
9463, 93ffvelcdmd 7032 . . . 4 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (𝐻‘(⌊‘𝑌)) ∈ ℝ)
956adantr 481 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑋𝑆)
9663, 95ffvelcdmd 7032 . . . 4 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (𝐻𝑋) ∈ ℝ)
9712adantr 481 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑀 ∈ ℤ)
9814adantr 481 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝐷 ∈ ℝ)
9916adantr 481 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑀 ≤ (𝐷 + 1))
10020adantlr 713 . . . . . 6 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑥𝑆) → 𝐴 ∈ ℝ)
10122adantlr 713 . . . . . 6 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑥𝑆) → 𝐵𝑉)
10224adantlr 713 . . . . . 6 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑥𝑍) → 𝐵 ∈ ℝ)
10326adantr 481 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (ℝ D (𝑥𝑆𝐴)) = (𝑥𝑆𝐵))
10429adantr 481 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑈 ∈ ℝ*)
105313adant1r 1177 . . . . . 6 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ (𝑥𝑆𝑘𝑆) ∧ (𝐷𝑥𝑥𝑘𝑘𝑈)) → 𝐶𝐵)
10636adantr 481 . . . . . . . 8 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝐷𝑋)
10770, 78syl 17 . . . . . . . 8 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑋 ≤ ((⌊‘𝑋) + 1))
10898, 70, 71, 106, 107letrd 11270 . . . . . . 7 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝐷 ≤ ((⌊‘𝑋) + 1))
10998, 71, 68, 108, 87letrd 11270 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝐷 ≤ (⌊‘𝑌))
110 flle 13658 . . . . . . 7 (𝑌 ∈ ℝ → (⌊‘𝑌) ≤ 𝑌)
11166, 110syl 17 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (⌊‘𝑌) ≤ 𝑌)
11240adantr 481 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑌𝑈)
113 fllep1 13660 . . . . . . . 8 (𝑌 ∈ ℝ → 𝑌 ≤ ((⌊‘𝑌) + 1))
11466, 113syl 17 . . . . . . 7 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑌 ≤ ((⌊‘𝑌) + 1))
115 flidm 13668 . . . . . . . . 9 (𝑌 ∈ ℝ → (⌊‘(⌊‘𝑌)) = (⌊‘𝑌))
11666, 115syl 17 . . . . . . . 8 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (⌊‘(⌊‘𝑌)) = (⌊‘𝑌))
117116oveq1d 7366 . . . . . . 7 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((⌊‘(⌊‘𝑌)) + 1) = ((⌊‘𝑌) + 1))
118114, 117breqtrrd 5131 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑌 ≤ ((⌊‘(⌊‘𝑌)) + 1))
1191, 11, 97, 98, 99, 69, 100, 101, 102, 103, 28, 104, 105, 33, 93, 64, 109, 111, 112, 118dvfsumlem2 25343 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻𝑌) ≤ (𝐻‘(⌊‘𝑌)) ∧ ((𝐻‘(⌊‘𝑌)) − (⌊‘𝑌) / 𝑥𝐵) ≤ ((𝐻𝑌) − 𝑌 / 𝑥𝐵)))
120119simpld 495 . . . 4 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (𝐻𝑌) ≤ (𝐻‘(⌊‘𝑌)))
121 elioopnf 13314 . . . . . . . . . 10 (𝑇 ∈ ℝ* → (((⌊‘𝑋) + 1) ∈ (𝑇(,)+∞) ↔ (((⌊‘𝑋) + 1) ∈ ℝ ∧ 𝑇 < ((⌊‘𝑋) + 1))))
12273, 121syl 17 . . . . . . . . 9 (𝜑 → (((⌊‘𝑋) + 1) ∈ (𝑇(,)+∞) ↔ (((⌊‘𝑋) + 1) ∈ ℝ ∧ 𝑇 < ((⌊‘𝑋) + 1))))
12310, 80, 122mpbir2and 711 . . . . . . . 8 (𝜑 → ((⌊‘𝑋) + 1) ∈ (𝑇(,)+∞))
124123, 1eleqtrrdi 2849 . . . . . . 7 (𝜑 → ((⌊‘𝑋) + 1) ∈ 𝑆)
125124adantr 481 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((⌊‘𝑋) + 1) ∈ 𝑆)
12663, 125ffvelcdmd 7032 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (𝐻‘((⌊‘𝑋) + 1)) ∈ ℝ)
12766flcld 13657 . . . . . . 7 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (⌊‘𝑌) ∈ ℤ)
128 eluz2 12727 . . . . . . 7 ((⌊‘𝑌) ∈ (ℤ‘((⌊‘𝑋) + 1)) ↔ (((⌊‘𝑋) + 1) ∈ ℤ ∧ (⌊‘𝑌) ∈ ℤ ∧ ((⌊‘𝑋) + 1) ≤ (⌊‘𝑌)))
12984, 127, 87, 128syl3anbrc 1343 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (⌊‘𝑌) ∈ (ℤ‘((⌊‘𝑋) + 1)))
13063adantr 481 . . . . . . 7 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → 𝐻:𝑆⟶ℝ)
131 elfzelz 13395 . . . . . . . . . . 11 (𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌)) → 𝑚 ∈ ℤ)
132131adantl 482 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → 𝑚 ∈ ℤ)
133132zred 12565 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → 𝑚 ∈ ℝ)
13469adantr 481 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → 𝑇 ∈ ℝ)
13571adantr 481 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → ((⌊‘𝑋) + 1) ∈ ℝ)
13680ad2antrr 724 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → 𝑇 < ((⌊‘𝑋) + 1))
137 elfzle1 13398 . . . . . . . . . . 11 (𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌)) → ((⌊‘𝑋) + 1) ≤ 𝑚)
138137adantl 482 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → ((⌊‘𝑋) + 1) ≤ 𝑚)
139134, 135, 133, 136, 138ltletrd 11273 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → 𝑇 < 𝑚)
14073ad2antrr 724 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → 𝑇 ∈ ℝ*)
141 elioopnf 13314 . . . . . . . . . 10 (𝑇 ∈ ℝ* → (𝑚 ∈ (𝑇(,)+∞) ↔ (𝑚 ∈ ℝ ∧ 𝑇 < 𝑚)))
142140, 141syl 17 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → (𝑚 ∈ (𝑇(,)+∞) ↔ (𝑚 ∈ ℝ ∧ 𝑇 < 𝑚)))
143133, 139, 142mpbir2and 711 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → 𝑚 ∈ (𝑇(,)+∞))
144143, 1eleqtrrdi 2849 . . . . . . 7 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → 𝑚𝑆)
145130, 144ffvelcdmd 7032 . . . . . 6 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → (𝐻𝑚) ∈ ℝ)
14697adantr 481 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑀 ∈ ℤ)
14798adantr 481 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝐷 ∈ ℝ)
14816ad2antrr 724 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑀 ≤ (𝐷 + 1))
14969adantr 481 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑇 ∈ ℝ)
150100adantlr 713 . . . . . . . 8 ((((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) ∧ 𝑥𝑆) → 𝐴 ∈ ℝ)
151101adantlr 713 . . . . . . . 8 ((((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) ∧ 𝑥𝑆) → 𝐵𝑉)
152102adantlr 713 . . . . . . . 8 ((((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) ∧ 𝑥𝑍) → 𝐵 ∈ ℝ)
153103adantr 481 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (ℝ D (𝑥𝑆𝐴)) = (𝑥𝑆𝐵))
154104adantr 481 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑈 ∈ ℝ*)
1551053adant1r 1177 . . . . . . . 8 ((((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) ∧ (𝑥𝑆𝑘𝑆) ∧ (𝐷𝑥𝑥𝑘𝑘𝑈)) → 𝐶𝐵)
156 elfzelz 13395 . . . . . . . . . . . 12 (𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1)) → 𝑚 ∈ ℤ)
157156adantl 482 . . . . . . . . . . 11 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑚 ∈ ℤ)
158157zred 12565 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑚 ∈ ℝ)
15971adantr 481 . . . . . . . . . . 11 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → ((⌊‘𝑋) + 1) ∈ ℝ)
16080ad2antrr 724 . . . . . . . . . . 11 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑇 < ((⌊‘𝑋) + 1))
161 elfzle1 13398 . . . . . . . . . . . 12 (𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1)) → ((⌊‘𝑋) + 1) ≤ 𝑚)
162161adantl 482 . . . . . . . . . . 11 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → ((⌊‘𝑋) + 1) ≤ 𝑚)
163149, 159, 158, 160, 162ltletrd 11273 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑇 < 𝑚)
164149rexrd 11163 . . . . . . . . . . 11 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑇 ∈ ℝ*)
165164, 141syl 17 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (𝑚 ∈ (𝑇(,)+∞) ↔ (𝑚 ∈ ℝ ∧ 𝑇 < 𝑚)))
166158, 163, 165mpbir2and 711 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑚 ∈ (𝑇(,)+∞))
167166, 1eleqtrrdi 2849 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑚𝑆)
168 peano2re 11286 . . . . . . . . . . 11 (𝑚 ∈ ℝ → (𝑚 + 1) ∈ ℝ)
169158, 168syl 17 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (𝑚 + 1) ∈ ℝ)
170158lep1d 12044 . . . . . . . . . . 11 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑚 ≤ (𝑚 + 1))
171149, 158, 169, 163, 170ltletrd 11273 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑇 < (𝑚 + 1))
172 elioopnf 13314 . . . . . . . . . . 11 (𝑇 ∈ ℝ* → ((𝑚 + 1) ∈ (𝑇(,)+∞) ↔ ((𝑚 + 1) ∈ ℝ ∧ 𝑇 < (𝑚 + 1))))
173164, 172syl 17 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → ((𝑚 + 1) ∈ (𝑇(,)+∞) ↔ ((𝑚 + 1) ∈ ℝ ∧ 𝑇 < (𝑚 + 1))))
174169, 171, 173mpbir2and 711 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (𝑚 + 1) ∈ (𝑇(,)+∞))
175174, 1eleqtrrdi 2849 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (𝑚 + 1) ∈ 𝑆)
176108adantr 481 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝐷 ≤ ((⌊‘𝑋) + 1))
177147, 159, 158, 176, 162letrd 11270 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝐷𝑚)
178169rexrd 11163 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (𝑚 + 1) ∈ ℝ*)
17968rexrd 11163 . . . . . . . . . 10 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (⌊‘𝑌) ∈ ℝ*)
180179adantr 481 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (⌊‘𝑌) ∈ ℝ*)
181 elfzle2 13399 . . . . . . . . . . 11 (𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1)) → 𝑚 ≤ ((⌊‘𝑌) − 1))
182181adantl 482 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑚 ≤ ((⌊‘𝑌) − 1))
183 1red 11114 . . . . . . . . . . 11 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 1 ∈ ℝ)
18466adantr 481 . . . . . . . . . . . 12 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑌 ∈ ℝ)
185184, 67syl 17 . . . . . . . . . . 11 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (⌊‘𝑌) ∈ ℝ)
186 leaddsub 11589 . . . . . . . . . . 11 ((𝑚 ∈ ℝ ∧ 1 ∈ ℝ ∧ (⌊‘𝑌) ∈ ℝ) → ((𝑚 + 1) ≤ (⌊‘𝑌) ↔ 𝑚 ≤ ((⌊‘𝑌) − 1)))
187158, 183, 185, 186syl3anc 1371 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → ((𝑚 + 1) ≤ (⌊‘𝑌) ↔ 𝑚 ≤ ((⌊‘𝑌) − 1)))
188182, 187mpbird 256 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (𝑚 + 1) ≤ (⌊‘𝑌))
18966rexrd 11163 . . . . . . . . . . 11 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑌 ∈ ℝ*)
190179, 189, 104, 111, 112xrletrd 13035 . . . . . . . . . 10 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (⌊‘𝑌) ≤ 𝑈)
191190adantr 481 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (⌊‘𝑌) ≤ 𝑈)
192178, 180, 154, 188, 191xrletrd 13035 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (𝑚 + 1) ≤ 𝑈)
193 flid 13667 . . . . . . . . . . . 12 (𝑚 ∈ ℤ → (⌊‘𝑚) = 𝑚)
194157, 193syl 17 . . . . . . . . . . 11 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (⌊‘𝑚) = 𝑚)
195194eqcomd 2743 . . . . . . . . . 10 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → 𝑚 = (⌊‘𝑚))
196195oveq1d 7366 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (𝑚 + 1) = ((⌊‘𝑚) + 1))
197169, 196eqled 11216 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (𝑚 + 1) ≤ ((⌊‘𝑚) + 1))
1981, 11, 146, 147, 148, 149, 150, 151, 152, 153, 28, 154, 155, 33, 167, 175, 177, 170, 192, 197dvfsumlem2 25343 . . . . . . 7 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → ((𝐻‘(𝑚 + 1)) ≤ (𝐻𝑚) ∧ ((𝐻𝑚) − 𝑚 / 𝑥𝐵) ≤ ((𝐻‘(𝑚 + 1)) − (𝑚 + 1) / 𝑥𝐵)))
199198simpld 495 . . . . . 6 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → (𝐻‘(𝑚 + 1)) ≤ (𝐻𝑚))
200129, 145, 199monoord2 13893 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (𝐻‘(⌊‘𝑌)) ≤ (𝐻‘((⌊‘𝑋) + 1)))
20171rexrd 11163 . . . . . . . 8 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((⌊‘𝑋) + 1) ∈ ℝ*)
202201, 179, 104, 87, 190xrletrd 13035 . . . . . . 7 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((⌊‘𝑋) + 1) ≤ 𝑈)
20371leidd 11679 . . . . . . 7 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((⌊‘𝑋) + 1) ≤ ((⌊‘𝑋) + 1))
2041, 11, 97, 98, 99, 69, 100, 101, 102, 103, 28, 104, 105, 33, 95, 125, 106, 107, 202, 203dvfsumlem2 25343 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻‘((⌊‘𝑋) + 1)) ≤ (𝐻𝑋) ∧ ((𝐻𝑋) − 𝑋 / 𝑥𝐵) ≤ ((𝐻‘((⌊‘𝑋) + 1)) − ((⌊‘𝑋) + 1) / 𝑥𝐵)))
205204simpld 495 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (𝐻‘((⌊‘𝑋) + 1)) ≤ (𝐻𝑋))
20694, 126, 96, 200, 205letrd 11270 . . . 4 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (𝐻‘(⌊‘𝑌)) ≤ (𝐻𝑋))
20765, 94, 96, 120, 206letrd 11270 . . 3 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (𝐻𝑌) ≤ (𝐻𝑋))
208 csbeq1 3856 . . . . . . 7 (𝑚 = 𝑋𝑚 / 𝑥𝐵 = 𝑋 / 𝑥𝐵)
209208eleq1d 2822 . . . . . 6 (𝑚 = 𝑋 → (𝑚 / 𝑥𝐵 ∈ ℝ ↔ 𝑋 / 𝑥𝐵 ∈ ℝ))
21049ralrimiva 3141 . . . . . . . . 9 (𝜑 → ∀𝑥𝑆 𝐵 ∈ ℝ)
211210adantr 481 . . . . . . . 8 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ∀𝑥𝑆 𝐵 ∈ ℝ)
212 nfcsb1v 3878 . . . . . . . . . 10 𝑥𝑚 / 𝑥𝐵
213212nfel1 2921 . . . . . . . . 9 𝑥𝑚 / 𝑥𝐵 ∈ ℝ
214 csbeq1a 3867 . . . . . . . . . 10 (𝑥 = 𝑚𝐵 = 𝑚 / 𝑥𝐵)
215214eleq1d 2822 . . . . . . . . 9 (𝑥 = 𝑚 → (𝐵 ∈ ℝ ↔ 𝑚 / 𝑥𝐵 ∈ ℝ))
216213, 215rspc 3567 . . . . . . . 8 (𝑚𝑆 → (∀𝑥𝑆 𝐵 ∈ ℝ → 𝑚 / 𝑥𝐵 ∈ ℝ))
217211, 216mpan9 507 . . . . . . 7 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚𝑆) → 𝑚 / 𝑥𝐵 ∈ ℝ)
218217ralrimiva 3141 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ∀𝑚𝑆 𝑚 / 𝑥𝐵 ∈ ℝ)
219209, 218, 95rspcdva 3580 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑋 / 𝑥𝐵 ∈ ℝ)
22096, 219resubcld 11541 . . . 4 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻𝑋) − 𝑋 / 𝑥𝐵) ∈ ℝ)
221 csbeq1 3856 . . . . . . 7 (𝑚 = (⌊‘𝑌) → 𝑚 / 𝑥𝐵 = (⌊‘𝑌) / 𝑥𝐵)
222221eleq1d 2822 . . . . . 6 (𝑚 = (⌊‘𝑌) → (𝑚 / 𝑥𝐵 ∈ ℝ ↔ (⌊‘𝑌) / 𝑥𝐵 ∈ ℝ))
223222, 218, 93rspcdva 3580 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → (⌊‘𝑌) / 𝑥𝐵 ∈ ℝ)
22494, 223resubcld 11541 . . . 4 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻‘(⌊‘𝑌)) − (⌊‘𝑌) / 𝑥𝐵) ∈ ℝ)
225 csbeq1 3856 . . . . . . 7 (𝑚 = 𝑌𝑚 / 𝑥𝐵 = 𝑌 / 𝑥𝐵)
226225eleq1d 2822 . . . . . 6 (𝑚 = 𝑌 → (𝑚 / 𝑥𝐵 ∈ ℝ ↔ 𝑌 / 𝑥𝐵 ∈ ℝ))
227226, 218, 64rspcdva 3580 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → 𝑌 / 𝑥𝐵 ∈ ℝ)
22865, 227resubcld 11541 . . . 4 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻𝑌) − 𝑌 / 𝑥𝐵) ∈ ℝ)
229 csbeq1 3856 . . . . . . . 8 (𝑚 = ((⌊‘𝑋) + 1) → 𝑚 / 𝑥𝐵 = ((⌊‘𝑋) + 1) / 𝑥𝐵)
230229eleq1d 2822 . . . . . . 7 (𝑚 = ((⌊‘𝑋) + 1) → (𝑚 / 𝑥𝐵 ∈ ℝ ↔ ((⌊‘𝑋) + 1) / 𝑥𝐵 ∈ ℝ))
231230, 218, 125rspcdva 3580 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((⌊‘𝑋) + 1) / 𝑥𝐵 ∈ ℝ)
232126, 231resubcld 11541 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻‘((⌊‘𝑋) + 1)) − ((⌊‘𝑋) + 1) / 𝑥𝐵) ∈ ℝ)
233204simprd 496 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻𝑋) − 𝑋 / 𝑥𝐵) ≤ ((𝐻‘((⌊‘𝑋) + 1)) − ((⌊‘𝑋) + 1) / 𝑥𝐵))
234 fveq2 6839 . . . . . . . . . . 11 (𝑦 = 𝑚 → (𝐻𝑦) = (𝐻𝑚))
235 csbeq1 3856 . . . . . . . . . . 11 (𝑦 = 𝑚𝑦 / 𝑥𝐵 = 𝑚 / 𝑥𝐵)
236234, 235oveq12d 7369 . . . . . . . . . 10 (𝑦 = 𝑚 → ((𝐻𝑦) − 𝑦 / 𝑥𝐵) = ((𝐻𝑚) − 𝑚 / 𝑥𝐵))
237 eqid 2737 . . . . . . . . . 10 (𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵)) = (𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))
238 ovex 7384 . . . . . . . . . 10 ((𝐻𝑦) − 𝑦 / 𝑥𝐵) ∈ V
239236, 237, 238fvmpt3i 6950 . . . . . . . . 9 (𝑚 ∈ V → ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘𝑚) = ((𝐻𝑚) − 𝑚 / 𝑥𝐵))
240239elv 3449 . . . . . . . 8 ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘𝑚) = ((𝐻𝑚) − 𝑚 / 𝑥𝐵)
241144, 217syldan 591 . . . . . . . . 9 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → 𝑚 / 𝑥𝐵 ∈ ℝ)
242145, 241resubcld 11541 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → ((𝐻𝑚) − 𝑚 / 𝑥𝐵) ∈ ℝ)
243240, 242eqeltrid 2842 . . . . . . 7 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...(⌊‘𝑌))) → ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘𝑚) ∈ ℝ)
244198simprd 496 . . . . . . . 8 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → ((𝐻𝑚) − 𝑚 / 𝑥𝐵) ≤ ((𝐻‘(𝑚 + 1)) − (𝑚 + 1) / 𝑥𝐵))
245 ovex 7384 . . . . . . . . 9 (𝑚 + 1) ∈ V
246 fveq2 6839 . . . . . . . . . . 11 (𝑦 = (𝑚 + 1) → (𝐻𝑦) = (𝐻‘(𝑚 + 1)))
247 csbeq1 3856 . . . . . . . . . . 11 (𝑦 = (𝑚 + 1) → 𝑦 / 𝑥𝐵 = (𝑚 + 1) / 𝑥𝐵)
248246, 247oveq12d 7369 . . . . . . . . . 10 (𝑦 = (𝑚 + 1) → ((𝐻𝑦) − 𝑦 / 𝑥𝐵) = ((𝐻‘(𝑚 + 1)) − (𝑚 + 1) / 𝑥𝐵))
249248, 237, 238fvmpt3i 6950 . . . . . . . . 9 ((𝑚 + 1) ∈ V → ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘(𝑚 + 1)) = ((𝐻‘(𝑚 + 1)) − (𝑚 + 1) / 𝑥𝐵))
250245, 249ax-mp 5 . . . . . . . 8 ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘(𝑚 + 1)) = ((𝐻‘(𝑚 + 1)) − (𝑚 + 1) / 𝑥𝐵)
251244, 240, 2503brtr4g 5137 . . . . . . 7 (((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) ∧ 𝑚 ∈ (((⌊‘𝑋) + 1)...((⌊‘𝑌) − 1))) → ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘𝑚) ≤ ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘(𝑚 + 1)))
252129, 243, 251monoord 13892 . . . . . 6 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘((⌊‘𝑋) + 1)) ≤ ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘(⌊‘𝑌)))
253 ovex 7384 . . . . . . 7 ((⌊‘𝑋) + 1) ∈ V
254 fveq2 6839 . . . . . . . . 9 (𝑦 = ((⌊‘𝑋) + 1) → (𝐻𝑦) = (𝐻‘((⌊‘𝑋) + 1)))
255 csbeq1 3856 . . . . . . . . 9 (𝑦 = ((⌊‘𝑋) + 1) → 𝑦 / 𝑥𝐵 = ((⌊‘𝑋) + 1) / 𝑥𝐵)
256254, 255oveq12d 7369 . . . . . . . 8 (𝑦 = ((⌊‘𝑋) + 1) → ((𝐻𝑦) − 𝑦 / 𝑥𝐵) = ((𝐻‘((⌊‘𝑋) + 1)) − ((⌊‘𝑋) + 1) / 𝑥𝐵))
257256, 237, 238fvmpt3i 6950 . . . . . . 7 (((⌊‘𝑋) + 1) ∈ V → ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘((⌊‘𝑋) + 1)) = ((𝐻‘((⌊‘𝑋) + 1)) − ((⌊‘𝑋) + 1) / 𝑥𝐵))
258253, 257ax-mp 5 . . . . . 6 ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘((⌊‘𝑋) + 1)) = ((𝐻‘((⌊‘𝑋) + 1)) − ((⌊‘𝑋) + 1) / 𝑥𝐵)
259 fvex 6852 . . . . . . 7 (⌊‘𝑌) ∈ V
260 fveq2 6839 . . . . . . . . 9 (𝑦 = (⌊‘𝑌) → (𝐻𝑦) = (𝐻‘(⌊‘𝑌)))
261 csbeq1 3856 . . . . . . . . 9 (𝑦 = (⌊‘𝑌) → 𝑦 / 𝑥𝐵 = (⌊‘𝑌) / 𝑥𝐵)
262260, 261oveq12d 7369 . . . . . . . 8 (𝑦 = (⌊‘𝑌) → ((𝐻𝑦) − 𝑦 / 𝑥𝐵) = ((𝐻‘(⌊‘𝑌)) − (⌊‘𝑌) / 𝑥𝐵))
263262, 237, 238fvmpt3i 6950 . . . . . . 7 ((⌊‘𝑌) ∈ V → ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘(⌊‘𝑌)) = ((𝐻‘(⌊‘𝑌)) − (⌊‘𝑌) / 𝑥𝐵))
264259, 263ax-mp 5 . . . . . 6 ((𝑦 ∈ V ↦ ((𝐻𝑦) − 𝑦 / 𝑥𝐵))‘(⌊‘𝑌)) = ((𝐻‘(⌊‘𝑌)) − (⌊‘𝑌) / 𝑥𝐵)
265252, 258, 2643brtr3g 5136 . . . . 5 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻‘((⌊‘𝑋) + 1)) − ((⌊‘𝑋) + 1) / 𝑥𝐵) ≤ ((𝐻‘(⌊‘𝑌)) − (⌊‘𝑌) / 𝑥𝐵))
266220, 232, 224, 233, 265letrd 11270 . . . 4 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻𝑋) − 𝑋 / 𝑥𝐵) ≤ ((𝐻‘(⌊‘𝑌)) − (⌊‘𝑌) / 𝑥𝐵))
267119simprd 496 . . . 4 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻‘(⌊‘𝑌)) − (⌊‘𝑌) / 𝑥𝐵) ≤ ((𝐻𝑌) − 𝑌 / 𝑥𝐵))
268220, 224, 228, 266, 267letrd 11270 . . 3 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻𝑋) − 𝑋 / 𝑥𝐵) ≤ ((𝐻𝑌) − 𝑌 / 𝑥𝐵))
269207, 268jca 512 . 2 ((𝜑 ∧ ((⌊‘𝑋) + 1) ≤ 𝑌) → ((𝐻𝑌) ≤ (𝐻𝑋) ∧ ((𝐻𝑋) − 𝑋 / 𝑥𝐵) ≤ ((𝐻𝑌) − 𝑌 / 𝑥𝐵)))
2705, 10, 43, 269lecasei 11219 1 (𝜑 → ((𝐻𝑌) ≤ (𝐻𝑋) ∧ ((𝐻𝑋) − 𝑋 / 𝑥𝐵) ≤ ((𝐻𝑌) − 𝑌 / 𝑥𝐵)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396  w3a 1087   = wceq 1541  wcel 2106  wral 3062  Vcvv 3443  csb 3853  wss 3908   class class class wbr 5103  cmpt 5186  wf 6489  cfv 6493  (class class class)co 7351  cr 11008  1c1 11010   + caddc 11012   · cmul 11014  +∞cpnf 11144  *cxr 11146   < clt 11147  cle 11148  cmin 11343  cz 12457  cuz 12721  (,)cioo 13218  ...cfz 13378  cfl 13649  Σcsu 15530   D cdv 25179
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 2708  ax-rep 5240  ax-sep 5254  ax-nul 5261  ax-pow 5318  ax-pr 5382  ax-un 7664  ax-inf2 9535  ax-cnex 11065  ax-resscn 11066  ax-1cn 11067  ax-icn 11068  ax-addcl 11069  ax-addrcl 11070  ax-mulcl 11071  ax-mulrcl 11072  ax-mulcom 11073  ax-addass 11074  ax-mulass 11075  ax-distr 11076  ax-i2m1 11077  ax-1ne0 11078  ax-1rid 11079  ax-rnegex 11080  ax-rrecex 11081  ax-cnre 11082  ax-pre-lttri 11083  ax-pre-lttrn 11084  ax-pre-ltadd 11085  ax-pre-mulgt0 11086  ax-pre-sup 11087  ax-addf 11088  ax-mulf 11089
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 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2887  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3351  df-reu 3352  df-rab 3406  df-v 3445  df-sbc 3738  df-csb 3854  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3927  df-nul 4281  df-if 4485  df-pw 4560  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4864  df-int 4906  df-iun 4954  df-iin 4955  df-br 5104  df-opab 5166  df-mpt 5187  df-tr 5221  df-id 5529  df-eprel 5535  df-po 5543  df-so 5544  df-fr 5586  df-se 5587  df-we 5588  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6251  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6445  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-isom 6502  df-riota 7307  df-ov 7354  df-oprab 7355  df-mpo 7356  df-of 7609  df-om 7795  df-1st 7913  df-2nd 7914  df-supp 8085  df-frecs 8204  df-wrecs 8235  df-recs 8309  df-rdg 8348  df-1o 8404  df-2o 8405  df-er 8606  df-map 8725  df-pm 8726  df-ixp 8794  df-en 8842  df-dom 8843  df-sdom 8844  df-fin 8845  df-fsupp 9264  df-fi 9305  df-sup 9336  df-inf 9337  df-oi 9404  df-card 9833  df-pnf 11149  df-mnf 11150  df-xr 11151  df-ltxr 11152  df-le 11153  df-sub 11345  df-neg 11346  df-div 11771  df-nn 12112  df-2 12174  df-3 12175  df-4 12176  df-5 12177  df-6 12178  df-7 12179  df-8 12180  df-9 12181  df-n0 12372  df-z 12458  df-dec 12577  df-uz 12722  df-q 12828  df-rp 12870  df-xneg 12987  df-xadd 12988  df-xmul 12989  df-ioo 13222  df-ico 13224  df-icc 13225  df-fz 13379  df-fzo 13522  df-fl 13651  df-seq 13861  df-exp 13922  df-hash 14185  df-cj 14944  df-re 14945  df-im 14946  df-sqrt 15080  df-abs 15081  df-clim 15330  df-sum 15531  df-struct 16979  df-sets 16996  df-slot 17014  df-ndx 17026  df-base 17044  df-ress 17073  df-plusg 17106  df-mulr 17107  df-starv 17108  df-sca 17109  df-vsca 17110  df-ip 17111  df-tset 17112  df-ple 17113  df-ds 17115  df-unif 17116  df-hom 17117  df-cco 17118  df-rest 17264  df-topn 17265  df-0g 17283  df-gsum 17284  df-topgen 17285  df-pt 17286  df-prds 17289  df-xrs 17344  df-qtop 17349  df-imas 17350  df-xps 17352  df-mre 17426  df-mrc 17427  df-acs 17429  df-mgm 18457  df-sgrp 18506  df-mnd 18517  df-submnd 18562  df-mulg 18832  df-cntz 19056  df-cmn 19523  df-psmet 20741  df-xmet 20742  df-met 20743  df-bl 20744  df-mopn 20745  df-fbas 20746  df-fg 20747  df-cnfld 20750  df-top 22195  df-topon 22212  df-topsp 22234  df-bases 22248  df-cld 22322  df-ntr 22323  df-cls 22324  df-nei 22401  df-lp 22439  df-perf 22440  df-cn 22530  df-cnp 22531  df-haus 22618  df-cmp 22690  df-tx 22865  df-hmeo 23058  df-fil 23149  df-fm 23241  df-flim 23242  df-flf 23243  df-xms 23625  df-ms 23626  df-tms 23627  df-cncf 24193  df-limc 25182  df-dv 25183
This theorem is referenced by:  dvfsumlem4  25345  dvfsum2  25350
  Copyright terms: Public domain W3C validator