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

Theorem dvfsumlem4 24543
Description: Lemma for dvfsumrlim 24545. (Contributed by Mario Carneiro, 18-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 ((𝜑 ∧ (𝑥𝑆𝑘𝑆) ∧ (𝐷𝑥𝑥𝑘𝑘𝑈)) → 𝐶𝐵)
dvfsumlem4.g 𝐺 = (𝑥𝑆 ↦ (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴))
dvfsumlem4.0 ((𝜑 ∧ (𝑥𝑆𝐷𝑥𝑥𝑈)) → 0 ≤ 𝐵)
dvfsumlem4.1 (𝜑𝑋𝑆)
dvfsumlem4.2 (𝜑𝑌𝑆)
dvfsumlem4.3 (𝜑𝐷𝑋)
dvfsumlem4.4 (𝜑𝑋𝑌)
dvfsumlem4.5 (𝜑𝑌𝑈)
Assertion
Ref Expression
dvfsumlem4 (𝜑 → (abs‘((𝐺𝑌) − (𝐺𝑋))) ≤ 𝑋 / 𝑥𝐵)
Distinct variable groups:   𝐵,𝑘   𝑥,𝐶   𝑥,𝑘,𝐷   𝜑,𝑘,𝑥   𝑆,𝑘,𝑥   𝑘,𝑀,𝑥   𝑥,𝑇   𝑘,𝑌,𝑥   𝑥,𝑍   𝑈,𝑘,𝑥   𝑘,𝑋,𝑥
Allowed substitution hints:   𝐴(𝑥,𝑘)   𝐵(𝑥)   𝐶(𝑘)   𝑇(𝑘)   𝐺(𝑥,𝑘)   𝑉(𝑥,𝑘)   𝑍(𝑘)

Proof of Theorem dvfsumlem4
Dummy variable 𝑚 is distinct from all other variables.
StepHypRef Expression
1 dvfsumlem4.2 . . . . 5 (𝜑𝑌𝑆)
2 fzfid 13334 . . . . . . 7 (𝜑 → (𝑀...(⌊‘𝑌)) ∈ Fin)
3 dvfsum.b2 . . . . . . . . 9 ((𝜑𝑥𝑍) → 𝐵 ∈ ℝ)
43ralrimiva 3186 . . . . . . . 8 (𝜑 → ∀𝑥𝑍 𝐵 ∈ ℝ)
5 elfzuz 12897 . . . . . . . . 9 (𝑘 ∈ (𝑀...(⌊‘𝑌)) → 𝑘 ∈ (ℤ𝑀))
6 dvfsum.z . . . . . . . . 9 𝑍 = (ℤ𝑀)
75, 6syl6eleqr 2928 . . . . . . . 8 (𝑘 ∈ (𝑀...(⌊‘𝑌)) → 𝑘𝑍)
8 dvfsum.c . . . . . . . . . 10 (𝑥 = 𝑘𝐵 = 𝐶)
98eleq1d 2901 . . . . . . . . 9 (𝑥 = 𝑘 → (𝐵 ∈ ℝ ↔ 𝐶 ∈ ℝ))
109rspccva 3625 . . . . . . . 8 ((∀𝑥𝑍 𝐵 ∈ ℝ ∧ 𝑘𝑍) → 𝐶 ∈ ℝ)
114, 7, 10syl2an 595 . . . . . . 7 ((𝜑𝑘 ∈ (𝑀...(⌊‘𝑌))) → 𝐶 ∈ ℝ)
122, 11fsumrecl 15083 . . . . . 6 (𝜑 → Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶 ∈ ℝ)
13 dvfsum.a . . . . . . . 8 ((𝜑𝑥𝑆) → 𝐴 ∈ ℝ)
1413ralrimiva 3186 . . . . . . 7 (𝜑 → ∀𝑥𝑆 𝐴 ∈ ℝ)
15 nfcsb1v 3910 . . . . . . . . 9 𝑥𝑌 / 𝑥𝐴
1615nfel1 2998 . . . . . . . 8 𝑥𝑌 / 𝑥𝐴 ∈ ℝ
17 csbeq1a 3900 . . . . . . . . 9 (𝑥 = 𝑌𝐴 = 𝑌 / 𝑥𝐴)
1817eleq1d 2901 . . . . . . . 8 (𝑥 = 𝑌 → (𝐴 ∈ ℝ ↔ 𝑌 / 𝑥𝐴 ∈ ℝ))
1916, 18rspc 3614 . . . . . . 7 (𝑌𝑆 → (∀𝑥𝑆 𝐴 ∈ ℝ → 𝑌 / 𝑥𝐴 ∈ ℝ))
201, 14, 19sylc 65 . . . . . 6 (𝜑𝑌 / 𝑥𝐴 ∈ ℝ)
2112, 20resubcld 11060 . . . . 5 (𝜑 → (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) ∈ ℝ)
22 nfcv 2981 . . . . . 6 𝑥𝑌
23 nfcv 2981 . . . . . . 7 𝑥Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶
24 nfcv 2981 . . . . . . 7 𝑥
2523, 24, 15nfov 7181 . . . . . 6 𝑥𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)
26 fveq2 6666 . . . . . . . . 9 (𝑥 = 𝑌 → (⌊‘𝑥) = (⌊‘𝑌))
2726oveq2d 7167 . . . . . . . 8 (𝑥 = 𝑌 → (𝑀...(⌊‘𝑥)) = (𝑀...(⌊‘𝑌)))
2827sumeq1d 15050 . . . . . . 7 (𝑥 = 𝑌 → Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶 = Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶)
2928, 17oveq12d 7169 . . . . . 6 (𝑥 = 𝑌 → (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴) = (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴))
30 dvfsumlem4.g . . . . . 6 𝐺 = (𝑥𝑆 ↦ (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴))
3122, 25, 29, 30fvmptf 6784 . . . . 5 ((𝑌𝑆 ∧ (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) ∈ ℝ) → (𝐺𝑌) = (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴))
321, 21, 31syl2anc 584 . . . 4 (𝜑 → (𝐺𝑌) = (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴))
33 dvfsumlem4.1 . . . . 5 (𝜑𝑋𝑆)
34 fzfid 13334 . . . . . . 7 (𝜑 → (𝑀...(⌊‘𝑋)) ∈ Fin)
35 elfzuz 12897 . . . . . . . . 9 (𝑘 ∈ (𝑀...(⌊‘𝑋)) → 𝑘 ∈ (ℤ𝑀))
3635, 6syl6eleqr 2928 . . . . . . . 8 (𝑘 ∈ (𝑀...(⌊‘𝑋)) → 𝑘𝑍)
374, 36, 10syl2an 595 . . . . . . 7 ((𝜑𝑘 ∈ (𝑀...(⌊‘𝑋))) → 𝐶 ∈ ℝ)
3834, 37fsumrecl 15083 . . . . . 6 (𝜑 → Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶 ∈ ℝ)
39 nfcsb1v 3910 . . . . . . . . 9 𝑥𝑋 / 𝑥𝐴
4039nfel1 2998 . . . . . . . 8 𝑥𝑋 / 𝑥𝐴 ∈ ℝ
41 csbeq1a 3900 . . . . . . . . 9 (𝑥 = 𝑋𝐴 = 𝑋 / 𝑥𝐴)
4241eleq1d 2901 . . . . . . . 8 (𝑥 = 𝑋 → (𝐴 ∈ ℝ ↔ 𝑋 / 𝑥𝐴 ∈ ℝ))
4340, 42rspc 3614 . . . . . . 7 (𝑋𝑆 → (∀𝑥𝑆 𝐴 ∈ ℝ → 𝑋 / 𝑥𝐴 ∈ ℝ))
4433, 14, 43sylc 65 . . . . . 6 (𝜑𝑋 / 𝑥𝐴 ∈ ℝ)
4538, 44resubcld 11060 . . . . 5 (𝜑 → (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) ∈ ℝ)
46 nfcv 2981 . . . . . 6 𝑥𝑋
47 nfcv 2981 . . . . . . 7 𝑥Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶
4847, 24, 39nfov 7181 . . . . . 6 𝑥𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)
49 fveq2 6666 . . . . . . . . 9 (𝑥 = 𝑋 → (⌊‘𝑥) = (⌊‘𝑋))
5049oveq2d 7167 . . . . . . . 8 (𝑥 = 𝑋 → (𝑀...(⌊‘𝑥)) = (𝑀...(⌊‘𝑋)))
5150sumeq1d 15050 . . . . . . 7 (𝑥 = 𝑋 → Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶 = Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶)
5251, 41oveq12d 7169 . . . . . 6 (𝑥 = 𝑋 → (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴) = (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴))
5346, 48, 52, 30fvmptf 6784 . . . . 5 ((𝑋𝑆 ∧ (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) ∈ ℝ) → (𝐺𝑋) = (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴))
5433, 45, 53syl2anc 584 . . . 4 (𝜑 → (𝐺𝑋) = (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴))
5532, 54oveq12d 7169 . . 3 (𝜑 → ((𝐺𝑌) − (𝐺𝑋)) = ((Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) − (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)))
5655fveq2d 6670 . 2 (𝜑 → (abs‘((𝐺𝑌) − (𝐺𝑋))) = (abs‘((Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) − (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴))))
57 dvfsum.s . . . . . . . . . . 11 𝑆 = (𝑇(,)+∞)
58 ioossre 12791 . . . . . . . . . . 11 (𝑇(,)+∞) ⊆ ℝ
5957, 58eqsstri 4004 . . . . . . . . . 10 𝑆 ⊆ ℝ
6059a1i 11 . . . . . . . . 9 (𝜑𝑆 ⊆ ℝ)
61 dvfsum.b1 . . . . . . . . 9 ((𝜑𝑥𝑆) → 𝐵𝑉)
62 dvfsum.b3 . . . . . . . . 9 (𝜑 → (ℝ D (𝑥𝑆𝐴)) = (𝑥𝑆𝐵))
6360, 13, 61, 62dvmptrecl 24538 . . . . . . . 8 ((𝜑𝑥𝑆) → 𝐵 ∈ ℝ)
6463ralrimiva 3186 . . . . . . 7 (𝜑 → ∀𝑥𝑆 𝐵 ∈ ℝ)
65 nfv 1908 . . . . . . . 8 𝑚 𝐵 ∈ ℝ
66 nfcsb1v 3910 . . . . . . . . 9 𝑥𝑚 / 𝑥𝐵
6766nfel1 2998 . . . . . . . 8 𝑥𝑚 / 𝑥𝐵 ∈ ℝ
68 csbeq1a 3900 . . . . . . . . 9 (𝑥 = 𝑚𝐵 = 𝑚 / 𝑥𝐵)
6968eleq1d 2901 . . . . . . . 8 (𝑥 = 𝑚 → (𝐵 ∈ ℝ ↔ 𝑚 / 𝑥𝐵 ∈ ℝ))
7065, 67, 69cbvralw 3446 . . . . . . 7 (∀𝑥𝑆 𝐵 ∈ ℝ ↔ ∀𝑚𝑆 𝑚 / 𝑥𝐵 ∈ ℝ)
7164, 70sylib 219 . . . . . 6 (𝜑 → ∀𝑚𝑆 𝑚 / 𝑥𝐵 ∈ ℝ)
72 csbeq1 3889 . . . . . . . 8 (𝑚 = 𝑋𝑚 / 𝑥𝐵 = 𝑋 / 𝑥𝐵)
7372eleq1d 2901 . . . . . . 7 (𝑚 = 𝑋 → (𝑚 / 𝑥𝐵 ∈ ℝ ↔ 𝑋 / 𝑥𝐵 ∈ ℝ))
7473rspcv 3621 . . . . . 6 (𝑋𝑆 → (∀𝑚𝑆 𝑚 / 𝑥𝐵 ∈ ℝ → 𝑋 / 𝑥𝐵 ∈ ℝ))
7533, 71, 74sylc 65 . . . . 5 (𝜑𝑋 / 𝑥𝐵 ∈ ℝ)
7645, 75resubcld 11060 . . . 4 (𝜑 → ((Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) − 𝑋 / 𝑥𝐵) ∈ ℝ)
7759, 33sseldi 3968 . . . . . . . 8 (𝜑𝑋 ∈ ℝ)
78 reflcl 13159 . . . . . . . . 9 (𝑋 ∈ ℝ → (⌊‘𝑋) ∈ ℝ)
7977, 78syl 17 . . . . . . . 8 (𝜑 → (⌊‘𝑋) ∈ ℝ)
8077, 79resubcld 11060 . . . . . . 7 (𝜑 → (𝑋 − (⌊‘𝑋)) ∈ ℝ)
8180, 75remulcld 10663 . . . . . 6 (𝜑 → ((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) ∈ ℝ)
8281, 45readdcld 10662 . . . . 5 (𝜑 → (((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)) ∈ ℝ)
8382, 75resubcld 11060 . . . 4 (𝜑 → ((((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)) − 𝑋 / 𝑥𝐵) ∈ ℝ)
84 fracge0 13167 . . . . . . . 8 (𝑋 ∈ ℝ → 0 ≤ (𝑋 − (⌊‘𝑋)))
8577, 84syl 17 . . . . . . 7 (𝜑 → 0 ≤ (𝑋 − (⌊‘𝑋)))
86 dvfsumlem4.3 . . . . . . . . 9 (𝜑𝐷𝑋)
8777rexrd 10683 . . . . . . . . . 10 (𝜑𝑋 ∈ ℝ*)
8859, 1sseldi 3968 . . . . . . . . . . 11 (𝜑𝑌 ∈ ℝ)
8988rexrd 10683 . . . . . . . . . 10 (𝜑𝑌 ∈ ℝ*)
90 dvfsum.u . . . . . . . . . 10 (𝜑𝑈 ∈ ℝ*)
91 dvfsumlem4.4 . . . . . . . . . 10 (𝜑𝑋𝑌)
92 dvfsumlem4.5 . . . . . . . . . 10 (𝜑𝑌𝑈)
9387, 89, 90, 91, 92xrletrd 12548 . . . . . . . . 9 (𝜑𝑋𝑈)
9433, 86, 933jca 1122 . . . . . . . 8 (𝜑 → (𝑋𝑆𝐷𝑋𝑋𝑈))
95 simpr1 1188 . . . . . . . . 9 ((𝜑 ∧ (𝑋𝑆𝐷𝑋𝑋𝑈)) → 𝑋𝑆)
96 nfv 1908 . . . . . . . . . . 11 𝑥(𝜑 ∧ (𝑋𝑆𝐷𝑋𝑋𝑈))
97 nfcv 2981 . . . . . . . . . . . 12 𝑥0
98 nfcv 2981 . . . . . . . . . . . 12 𝑥
99 nfcsb1v 3910 . . . . . . . . . . . 12 𝑥𝑋 / 𝑥𝐵
10097, 98, 99nfbr 5109 . . . . . . . . . . 11 𝑥0 ≤ 𝑋 / 𝑥𝐵
10196, 100nfim 1890 . . . . . . . . . 10 𝑥((𝜑 ∧ (𝑋𝑆𝐷𝑋𝑋𝑈)) → 0 ≤ 𝑋 / 𝑥𝐵)
102 eleq1 2904 . . . . . . . . . . . . 13 (𝑥 = 𝑋 → (𝑥𝑆𝑋𝑆))
103 breq2 5066 . . . . . . . . . . . . 13 (𝑥 = 𝑋 → (𝐷𝑥𝐷𝑋))
104 breq1 5065 . . . . . . . . . . . . 13 (𝑥 = 𝑋 → (𝑥𝑈𝑋𝑈))
105102, 103, 1043anbi123d 1429 . . . . . . . . . . . 12 (𝑥 = 𝑋 → ((𝑥𝑆𝐷𝑥𝑥𝑈) ↔ (𝑋𝑆𝐷𝑋𝑋𝑈)))
106105anbi2d 628 . . . . . . . . . . 11 (𝑥 = 𝑋 → ((𝜑 ∧ (𝑥𝑆𝐷𝑥𝑥𝑈)) ↔ (𝜑 ∧ (𝑋𝑆𝐷𝑋𝑋𝑈))))
107 csbeq1a 3900 . . . . . . . . . . . 12 (𝑥 = 𝑋𝐵 = 𝑋 / 𝑥𝐵)
108107breq2d 5074 . . . . . . . . . . 11 (𝑥 = 𝑋 → (0 ≤ 𝐵 ↔ 0 ≤ 𝑋 / 𝑥𝐵))
109106, 108imbi12d 346 . . . . . . . . . 10 (𝑥 = 𝑋 → (((𝜑 ∧ (𝑥𝑆𝐷𝑥𝑥𝑈)) → 0 ≤ 𝐵) ↔ ((𝜑 ∧ (𝑋𝑆𝐷𝑋𝑋𝑈)) → 0 ≤ 𝑋 / 𝑥𝐵)))
110 dvfsumlem4.0 . . . . . . . . . 10 ((𝜑 ∧ (𝑥𝑆𝐷𝑥𝑥𝑈)) → 0 ≤ 𝐵)
111101, 109, 110vtoclg1f 3571 . . . . . . . . 9 (𝑋𝑆 → ((𝜑 ∧ (𝑋𝑆𝐷𝑋𝑋𝑈)) → 0 ≤ 𝑋 / 𝑥𝐵))
11295, 111mpcom 38 . . . . . . . 8 ((𝜑 ∧ (𝑋𝑆𝐷𝑋𝑋𝑈)) → 0 ≤ 𝑋 / 𝑥𝐵)
11394, 112mpdan 683 . . . . . . 7 (𝜑 → 0 ≤ 𝑋 / 𝑥𝐵)
11480, 75, 85, 113mulge0d 11209 . . . . . 6 (𝜑 → 0 ≤ ((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵))
11545, 81addge02d 11221 . . . . . 6 (𝜑 → (0 ≤ ((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) ↔ (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) ≤ (((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴))))
116114, 115mpbid 233 . . . . 5 (𝜑 → (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) ≤ (((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)))
11745, 82, 75, 116lesub1dd 11248 . . . 4 (𝜑 → ((Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) − 𝑋 / 𝑥𝐵) ≤ ((((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)) − 𝑋 / 𝑥𝐵))
118 reflcl 13159 . . . . . . . . . 10 (𝑌 ∈ ℝ → (⌊‘𝑌) ∈ ℝ)
11988, 118syl 17 . . . . . . . . 9 (𝜑 → (⌊‘𝑌) ∈ ℝ)
12088, 119resubcld 11060 . . . . . . . 8 (𝜑 → (𝑌 − (⌊‘𝑌)) ∈ ℝ)
121 csbeq1 3889 . . . . . . . . . . 11 (𝑚 = 𝑌𝑚 / 𝑥𝐵 = 𝑌 / 𝑥𝐵)
122121eleq1d 2901 . . . . . . . . . 10 (𝑚 = 𝑌 → (𝑚 / 𝑥𝐵 ∈ ℝ ↔ 𝑌 / 𝑥𝐵 ∈ ℝ))
123122rspcv 3621 . . . . . . . . 9 (𝑌𝑆 → (∀𝑚𝑆 𝑚 / 𝑥𝐵 ∈ ℝ → 𝑌 / 𝑥𝐵 ∈ ℝ))
1241, 71, 123sylc 65 . . . . . . . 8 (𝜑𝑌 / 𝑥𝐵 ∈ ℝ)
125120, 124remulcld 10663 . . . . . . 7 (𝜑 → ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) ∈ ℝ)
126125, 21readdcld 10662 . . . . . 6 (𝜑 → (((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)) ∈ ℝ)
127126, 124resubcld 11060 . . . . 5 (𝜑 → ((((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)) − 𝑌 / 𝑥𝐵) ∈ ℝ)
128 dvfsum.m . . . . . . . 8 (𝜑𝑀 ∈ ℤ)
129 dvfsum.d . . . . . . . 8 (𝜑𝐷 ∈ ℝ)
130 dvfsum.md . . . . . . . 8 (𝜑𝑀 ≤ (𝐷 + 1))
131 dvfsum.t . . . . . . . 8 (𝜑𝑇 ∈ ℝ)
132 dvfsum.l . . . . . . . 8 ((𝜑 ∧ (𝑥𝑆𝑘𝑆) ∧ (𝐷𝑥𝑥𝑘𝑘𝑈)) → 𝐶𝐵)
133 eqid 2825 . . . . . . . 8 (𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴))) = (𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))
13457, 6, 128, 129, 130, 131, 13, 61, 3, 62, 8, 90, 132, 133, 33, 1, 86, 91, 92dvfsumlem3 24542 . . . . . . 7 (𝜑 → (((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑌) ≤ ((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑋) ∧ (((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑋) − 𝑋 / 𝑥𝐵) ≤ (((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑌) − 𝑌 / 𝑥𝐵)))
135134simprd 496 . . . . . 6 (𝜑 → (((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑋) − 𝑋 / 𝑥𝐵) ≤ (((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑌) − 𝑌 / 𝑥𝐵))
136 nfcv 2981 . . . . . . . . . . 11 𝑥(𝑋 − (⌊‘𝑋))
137 nfcv 2981 . . . . . . . . . . 11 𝑥 ·
138136, 137, 99nfov 7181 . . . . . . . . . 10 𝑥((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵)
139 nfcv 2981 . . . . . . . . . 10 𝑥 +
140138, 139, 48nfov 7181 . . . . . . . . 9 𝑥(((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴))
141 id 22 . . . . . . . . . . . 12 (𝑥 = 𝑋𝑥 = 𝑋)
142141, 49oveq12d 7169 . . . . . . . . . . 11 (𝑥 = 𝑋 → (𝑥 − (⌊‘𝑥)) = (𝑋 − (⌊‘𝑋)))
143142, 107oveq12d 7169 . . . . . . . . . 10 (𝑥 = 𝑋 → ((𝑥 − (⌊‘𝑥)) · 𝐵) = ((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵))
144143, 52oveq12d 7169 . . . . . . . . 9 (𝑥 = 𝑋 → (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)) = (((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)))
14546, 140, 144, 133fvmptf 6784 . . . . . . . 8 ((𝑋𝑆 ∧ (((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)) ∈ ℝ) → ((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑋) = (((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)))
14633, 82, 145syl2anc 584 . . . . . . 7 (𝜑 → ((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑋) = (((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)))
147146oveq1d 7166 . . . . . 6 (𝜑 → (((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑋) − 𝑋 / 𝑥𝐵) = ((((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)) − 𝑋 / 𝑥𝐵))
148 nfcv 2981 . . . . . . . . . . 11 𝑥(𝑌 − (⌊‘𝑌))
149 nfcsb1v 3910 . . . . . . . . . . 11 𝑥𝑌 / 𝑥𝐵
150148, 137, 149nfov 7181 . . . . . . . . . 10 𝑥((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵)
151150, 139, 25nfov 7181 . . . . . . . . 9 𝑥(((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴))
152 id 22 . . . . . . . . . . . 12 (𝑥 = 𝑌𝑥 = 𝑌)
153152, 26oveq12d 7169 . . . . . . . . . . 11 (𝑥 = 𝑌 → (𝑥 − (⌊‘𝑥)) = (𝑌 − (⌊‘𝑌)))
154 csbeq1a 3900 . . . . . . . . . . 11 (𝑥 = 𝑌𝐵 = 𝑌 / 𝑥𝐵)
155153, 154oveq12d 7169 . . . . . . . . . 10 (𝑥 = 𝑌 → ((𝑥 − (⌊‘𝑥)) · 𝐵) = ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵))
156155, 29oveq12d 7169 . . . . . . . . 9 (𝑥 = 𝑌 → (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)) = (((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)))
15722, 151, 156, 133fvmptf 6784 . . . . . . . 8 ((𝑌𝑆 ∧ (((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)) ∈ ℝ) → ((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑌) = (((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)))
1581, 126, 157syl2anc 584 . . . . . . 7 (𝜑 → ((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑌) = (((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)))
159158oveq1d 7166 . . . . . 6 (𝜑 → (((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑌) − 𝑌 / 𝑥𝐵) = ((((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)) − 𝑌 / 𝑥𝐵))
160135, 147, 1593brtr3d 5093 . . . . 5 (𝜑 → ((((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)) − 𝑋 / 𝑥𝐵) ≤ ((((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)) − 𝑌 / 𝑥𝐵))
16121recnd 10661 . . . . . . . 8 (𝜑 → (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) ∈ ℂ)
162124recnd 10661 . . . . . . . 8 (𝜑𝑌 / 𝑥𝐵 ∈ ℂ)
163125recnd 10661 . . . . . . . 8 (𝜑 → ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) ∈ ℂ)
164161, 162, 163subsub3d 11019 . . . . . . 7 (𝜑 → ((Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) − (𝑌 / 𝑥𝐵 − ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵))) = (((Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) + ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵)) − 𝑌 / 𝑥𝐵))
165161, 163addcomd 10834 . . . . . . . 8 (𝜑 → ((Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) + ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵)) = (((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)))
166165oveq1d 7166 . . . . . . 7 (𝜑 → (((Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) + ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵)) − 𝑌 / 𝑥𝐵) = ((((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)) − 𝑌 / 𝑥𝐵))
167164, 166eqtrd 2860 . . . . . 6 (𝜑 → ((Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) − (𝑌 / 𝑥𝐵 − ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵))) = ((((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)) − 𝑌 / 𝑥𝐵))
168 1red 10634 . . . . . . . . . 10 (𝜑 → 1 ∈ ℝ)
169129, 77, 88, 86, 91letrd 10789 . . . . . . . . . . . 12 (𝜑𝐷𝑌)
1701, 169, 923jca 1122 . . . . . . . . . . 11 (𝜑 → (𝑌𝑆𝐷𝑌𝑌𝑈))
171 simpr1 1188 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑌𝑆𝐷𝑌𝑌𝑈)) → 𝑌𝑆)
172 nfv 1908 . . . . . . . . . . . . . 14 𝑥(𝜑 ∧ (𝑌𝑆𝐷𝑌𝑌𝑈))
17397, 98, 149nfbr 5109 . . . . . . . . . . . . . 14 𝑥0 ≤ 𝑌 / 𝑥𝐵
174172, 173nfim 1890 . . . . . . . . . . . . 13 𝑥((𝜑 ∧ (𝑌𝑆𝐷𝑌𝑌𝑈)) → 0 ≤ 𝑌 / 𝑥𝐵)
175 eleq1 2904 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑌 → (𝑥𝑆𝑌𝑆))
176 breq2 5066 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑌 → (𝐷𝑥𝐷𝑌))
177 breq1 5065 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑌 → (𝑥𝑈𝑌𝑈))
178175, 176, 1773anbi123d 1429 . . . . . . . . . . . . . . 15 (𝑥 = 𝑌 → ((𝑥𝑆𝐷𝑥𝑥𝑈) ↔ (𝑌𝑆𝐷𝑌𝑌𝑈)))
179178anbi2d 628 . . . . . . . . . . . . . 14 (𝑥 = 𝑌 → ((𝜑 ∧ (𝑥𝑆𝐷𝑥𝑥𝑈)) ↔ (𝜑 ∧ (𝑌𝑆𝐷𝑌𝑌𝑈))))
180154breq2d 5074 . . . . . . . . . . . . . 14 (𝑥 = 𝑌 → (0 ≤ 𝐵 ↔ 0 ≤ 𝑌 / 𝑥𝐵))
181179, 180imbi12d 346 . . . . . . . . . . . . 13 (𝑥 = 𝑌 → (((𝜑 ∧ (𝑥𝑆𝐷𝑥𝑥𝑈)) → 0 ≤ 𝐵) ↔ ((𝜑 ∧ (𝑌𝑆𝐷𝑌𝑌𝑈)) → 0 ≤ 𝑌 / 𝑥𝐵)))
182174, 181, 110vtoclg1f 3571 . . . . . . . . . . . 12 (𝑌𝑆 → ((𝜑 ∧ (𝑌𝑆𝐷𝑌𝑌𝑈)) → 0 ≤ 𝑌 / 𝑥𝐵))
183171, 182mpcom 38 . . . . . . . . . . 11 ((𝜑 ∧ (𝑌𝑆𝐷𝑌𝑌𝑈)) → 0 ≤ 𝑌 / 𝑥𝐵)
184170, 183mpdan 683 . . . . . . . . . 10 (𝜑 → 0 ≤ 𝑌 / 𝑥𝐵)
185 fracle1 13166 . . . . . . . . . . 11 (𝑌 ∈ ℝ → (𝑌 − (⌊‘𝑌)) ≤ 1)
18688, 185syl 17 . . . . . . . . . 10 (𝜑 → (𝑌 − (⌊‘𝑌)) ≤ 1)
187120, 168, 124, 184, 186lemul1ad 11571 . . . . . . . . 9 (𝜑 → ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) ≤ (1 · 𝑌 / 𝑥𝐵))
188162mulid2d 10651 . . . . . . . . 9 (𝜑 → (1 · 𝑌 / 𝑥𝐵) = 𝑌 / 𝑥𝐵)
189187, 188breqtrd 5088 . . . . . . . 8 (𝜑 → ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) ≤ 𝑌 / 𝑥𝐵)
190124, 125subge0d 11222 . . . . . . . 8 (𝜑 → (0 ≤ (𝑌 / 𝑥𝐵 − ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵)) ↔ ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) ≤ 𝑌 / 𝑥𝐵))
191189, 190mpbird 258 . . . . . . 7 (𝜑 → 0 ≤ (𝑌 / 𝑥𝐵 − ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵)))
192124, 125resubcld 11060 . . . . . . . 8 (𝜑 → (𝑌 / 𝑥𝐵 − ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵)) ∈ ℝ)
19321, 192subge02d 11224 . . . . . . 7 (𝜑 → (0 ≤ (𝑌 / 𝑥𝐵 − ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵)) ↔ ((Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) − (𝑌 / 𝑥𝐵 − ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵))) ≤ (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)))
194191, 193mpbid 233 . . . . . 6 (𝜑 → ((Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) − (𝑌 / 𝑥𝐵 − ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵))) ≤ (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴))
195167, 194eqbrtrrd 5086 . . . . 5 (𝜑 → ((((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)) − 𝑌 / 𝑥𝐵) ≤ (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴))
19683, 127, 21, 160, 195letrd 10789 . . . 4 (𝜑 → ((((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)) − 𝑋 / 𝑥𝐵) ≤ (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴))
19776, 83, 21, 117, 196letrd 10789 . . 3 (𝜑 → ((Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) − 𝑋 / 𝑥𝐵) ≤ (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴))
19875, 45readdcld 10662 . . . . 5 (𝜑 → (𝑋 / 𝑥𝐵 + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)) ∈ ℝ)
199 fracge0 13167 . . . . . . . . 9 (𝑌 ∈ ℝ → 0 ≤ (𝑌 − (⌊‘𝑌)))
20088, 199syl 17 . . . . . . . 8 (𝜑 → 0 ≤ (𝑌 − (⌊‘𝑌)))
201120, 124, 200, 184mulge0d 11209 . . . . . . 7 (𝜑 → 0 ≤ ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵))
20221, 125addge02d 11221 . . . . . . 7 (𝜑 → (0 ≤ ((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) ↔ (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) ≤ (((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴))))
203201, 202mpbid 233 . . . . . 6 (𝜑 → (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) ≤ (((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)))
204134simpld 495 . . . . . . 7 (𝜑 → ((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑌) ≤ ((𝑥𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶𝐴)))‘𝑋))
205204, 158, 1463brtr3d 5093 . . . . . 6 (𝜑 → (((𝑌 − (⌊‘𝑌)) · 𝑌 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴)) ≤ (((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)))
20621, 126, 82, 203, 205letrd 10789 . . . . 5 (𝜑 → (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) ≤ (((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)))
207 fracle1 13166 . . . . . . . . 9 (𝑋 ∈ ℝ → (𝑋 − (⌊‘𝑋)) ≤ 1)
20877, 207syl 17 . . . . . . . 8 (𝜑 → (𝑋 − (⌊‘𝑋)) ≤ 1)
20980, 168, 75, 113, 208lemul1ad 11571 . . . . . . 7 (𝜑 → ((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) ≤ (1 · 𝑋 / 𝑥𝐵))
21075recnd 10661 . . . . . . . 8 (𝜑𝑋 / 𝑥𝐵 ∈ ℂ)
211210mulid2d 10651 . . . . . . 7 (𝜑 → (1 · 𝑋 / 𝑥𝐵) = 𝑋 / 𝑥𝐵)
212209, 211breqtrd 5088 . . . . . 6 (𝜑 → ((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) ≤ 𝑋 / 𝑥𝐵)
21381, 75, 45, 212leadd1dd 11246 . . . . 5 (𝜑 → (((𝑋 − (⌊‘𝑋)) · 𝑋 / 𝑥𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)) ≤ (𝑋 / 𝑥𝐵 + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)))
21421, 82, 198, 206, 213letrd 10789 . . . 4 (𝜑 → (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) ≤ (𝑋 / 𝑥𝐵 + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)))
21545recnd 10661 . . . . 5 (𝜑 → (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) ∈ ℂ)
216210, 215addcomd 10834 . . . 4 (𝜑 → (𝑋 / 𝑥𝐵 + (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴)) = ((Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) + 𝑋 / 𝑥𝐵))
217214, 216breqtrd 5088 . . 3 (𝜑 → (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) ≤ ((Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) + 𝑋 / 𝑥𝐵))
21821, 45, 75absdifled 14787 . . 3 (𝜑 → ((abs‘((Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) − (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴))) ≤ 𝑋 / 𝑥𝐵 ↔ (((Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) − 𝑋 / 𝑥𝐵) ≤ (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) ∧ (Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) ≤ ((Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴) + 𝑋 / 𝑥𝐵))))
219197, 217, 218mpbir2and 709 . 2 (𝜑 → (abs‘((Σ𝑘 ∈ (𝑀...(⌊‘𝑌))𝐶𝑌 / 𝑥𝐴) − (Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶𝑋 / 𝑥𝐴))) ≤ 𝑋 / 𝑥𝐵)
22056, 219eqbrtrd 5084 1 (𝜑 → (abs‘((𝐺𝑌) − (𝐺𝑋))) ≤ 𝑋 / 𝑥𝐵)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 396  w3a 1081   = wceq 1530  wcel 2107  wral 3142  csb 3886  wss 3939   class class class wbr 5062  cmpt 5142  cfv 6351  (class class class)co 7151  cr 10528  0cc0 10529  1c1 10530   + caddc 10532   · cmul 10534  +∞cpnf 10664  *cxr 10666  cle 10668  cmin 10862  cz 11973  cuz 12235  (,)cioo 12731  ...cfz 12885  cfl 13153  abscabs 14586  Σcsu 15035   D cdv 24378
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1904  ax-6 1963  ax-7 2008  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2153  ax-12 2169  ax-ext 2797  ax-rep 5186  ax-sep 5199  ax-nul 5206  ax-pow 5262  ax-pr 5325  ax-un 7454  ax-inf2 9096  ax-cnex 10585  ax-resscn 10586  ax-1cn 10587  ax-icn 10588  ax-addcl 10589  ax-addrcl 10590  ax-mulcl 10591  ax-mulrcl 10592  ax-mulcom 10593  ax-addass 10594  ax-mulass 10595  ax-distr 10596  ax-i2m1 10597  ax-1ne0 10598  ax-1rid 10599  ax-rnegex 10600  ax-rrecex 10601  ax-cnre 10602  ax-pre-lttri 10603  ax-pre-lttrn 10604  ax-pre-ltadd 10605  ax-pre-mulgt0 10606  ax-pre-sup 10607  ax-addf 10608  ax-mulf 10609
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 844  df-3or 1082  df-3an 1083  df-tru 1533  df-fal 1543  df-ex 1774  df-nf 1778  df-sb 2063  df-mo 2619  df-eu 2651  df-clab 2804  df-cleq 2818  df-clel 2897  df-nfc 2967  df-ne 3021  df-nel 3128  df-ral 3147  df-rex 3148  df-reu 3149  df-rmo 3150  df-rab 3151  df-v 3501  df-sbc 3776  df-csb 3887  df-dif 3942  df-un 3944  df-in 3946  df-ss 3955  df-pss 3957  df-nul 4295  df-if 4470  df-pw 4543  df-sn 4564  df-pr 4566  df-tp 4568  df-op 4570  df-uni 4837  df-int 4874  df-iun 4918  df-iin 4919  df-br 5063  df-opab 5125  df-mpt 5143  df-tr 5169  df-id 5458  df-eprel 5463  df-po 5472  df-so 5473  df-fr 5512  df-se 5513  df-we 5514  df-xp 5559  df-rel 5560  df-cnv 5561  df-co 5562  df-dm 5563  df-rn 5564  df-res 5565  df-ima 5566  df-pred 6145  df-ord 6191  df-on 6192  df-lim 6193  df-suc 6194  df-iota 6311  df-fun 6353  df-fn 6354  df-f 6355  df-f1 6356  df-fo 6357  df-f1o 6358  df-fv 6359  df-isom 6360  df-riota 7109  df-ov 7154  df-oprab 7155  df-mpo 7156  df-of 7402  df-om 7572  df-1st 7683  df-2nd 7684  df-supp 7825  df-wrecs 7941  df-recs 8002  df-rdg 8040  df-1o 8096  df-2o 8097  df-oadd 8100  df-er 8282  df-map 8401  df-pm 8402  df-ixp 8454  df-en 8502  df-dom 8503  df-sdom 8504  df-fin 8505  df-fsupp 8826  df-fi 8867  df-sup 8898  df-inf 8899  df-oi 8966  df-card 9360  df-pnf 10669  df-mnf 10670  df-xr 10671  df-ltxr 10672  df-le 10673  df-sub 10864  df-neg 10865  df-div 11290  df-nn 11631  df-2 11692  df-3 11693  df-4 11694  df-5 11695  df-6 11696  df-7 11697  df-8 11698  df-9 11699  df-n0 11890  df-z 11974  df-dec 12091  df-uz 12236  df-q 12341  df-rp 12383  df-xneg 12500  df-xadd 12501  df-xmul 12502  df-ioo 12735  df-ico 12737  df-icc 12738  df-fz 12886  df-fzo 13027  df-fl 13155  df-seq 13363  df-exp 13423  df-hash 13684  df-cj 14451  df-re 14452  df-im 14453  df-sqrt 14587  df-abs 14588  df-clim 14838  df-sum 15036  df-struct 16477  df-ndx 16478  df-slot 16479  df-base 16481  df-sets 16482  df-ress 16483  df-plusg 16570  df-mulr 16571  df-starv 16572  df-sca 16573  df-vsca 16574  df-ip 16575  df-tset 16576  df-ple 16577  df-ds 16579  df-unif 16580  df-hom 16581  df-cco 16582  df-rest 16688  df-topn 16689  df-0g 16707  df-gsum 16708  df-topgen 16709  df-pt 16710  df-prds 16713  df-xrs 16767  df-qtop 16772  df-imas 16773  df-xps 16775  df-mre 16849  df-mrc 16850  df-acs 16852  df-mgm 17844  df-sgrp 17892  df-mnd 17903  df-submnd 17947  df-mulg 18157  df-cntz 18379  df-cmn 18830  df-psmet 20455  df-xmet 20456  df-met 20457  df-bl 20458  df-mopn 20459  df-fbas 20460  df-fg 20461  df-cnfld 20464  df-top 21420  df-topon 21437  df-topsp 21459  df-bases 21472  df-cld 21545  df-ntr 21546  df-cls 21547  df-nei 21624  df-lp 21662  df-perf 21663  df-cn 21753  df-cnp 21754  df-haus 21841  df-cmp 21913  df-tx 22088  df-hmeo 22281  df-fil 22372  df-fm 22464  df-flim 22465  df-flf 22466  df-xms 22847  df-ms 22848  df-tms 22849  df-cncf 23403  df-limc 24381  df-dv 24382
This theorem is referenced by:  dvfsumrlim  24545  dvfsumrlim2  24546  logexprlim  25717
  Copyright terms: Public domain W3C validator