Metamath Proof Explorer


Theorem dvfsumrlim2

Description: Compare a finite sum to an integral (the integral here is given as a function with a known derivative). The statement here says that if x e. S |-> B is a decreasing function with antiderivative A converging to zero, then the difference between sum_ k e. ( M ... ( |_x ) ) B ( k ) and S. u e. ( M , x ) B ( u ) _d u = A ( x ) converges to a constant limit value, with the remainder term bounded by B ( x ) . (Contributed by Mario Carneiro, 18-May-2016)

Ref Expression
Hypotheses dvfsum.s ⊢ S = T +∞
dvfsum.z ⊢ Z = ℤ ≥ M
dvfsum.m ⊢ φ → M ∈ ℤ
dvfsum.d ⊢ φ → D ∈ ℝ
dvfsum.md ⊢ φ → M ≤ D + 1
dvfsum.t ⊢ φ → T ∈ ℝ
dvfsum.a ⊢ φ ∧ x ∈ S → A ∈ ℝ
dvfsum.b1 ⊢ φ ∧ x ∈ S → B ∈ V
dvfsum.b2 ⊢ φ ∧ x ∈ Z → B ∈ ℝ
dvfsum.b3 ⊢ φ → dx ∈ S A d ℝ x = x ∈ S ⟼ B
dvfsum.c ⊢ x = k → B = C
dvfsumrlim.l ⊢ φ ∧ x ∈ S ∧ k ∈ S ∧ D ≤ x ∧ x ≤ k → C ≤ B
dvfsumrlim.g ⊢ G = x ∈ S ⟼ ∑ k = M x C − A
dvfsumrlim.k ⊢ φ → x ∈ S ⟼ B ⇝ℝ 0
dvfsumrlim2.1 ⊢ φ → X ∈ S
dvfsumrlim2.2 ⊢ φ → D ≤ X
Assertion dvfsumrlim2 ⊢ φ ∧ G ⇝ℝ L → G ⁡ X − L ≤ ⦋ X / x⦌ B

Proof

Step Hyp Ref Expression
1 dvfsum.s ⊢ S = T +∞
2 dvfsum.z ⊢ Z = ℤ ≥ M
3 dvfsum.m ⊢ φ → M ∈ ℤ
4 dvfsum.d ⊢ φ → D ∈ ℝ
5 dvfsum.md ⊢ φ → M ≤ D + 1
6 dvfsum.t ⊢ φ → T ∈ ℝ
7 dvfsum.a ⊢ φ ∧ x ∈ S → A ∈ ℝ
8 dvfsum.b1 ⊢ φ ∧ x ∈ S → B ∈ V
9 dvfsum.b2 ⊢ φ ∧ x ∈ Z → B ∈ ℝ
10 dvfsum.b3 ⊢ φ → dx ∈ S A d ℝ x = x ∈ S ⟼ B
11 dvfsum.c ⊢ x = k → B = C
12 dvfsumrlim.l ⊢ φ ∧ x ∈ S ∧ k ∈ S ∧ D ≤ x ∧ x ≤ k → C ≤ B
13 dvfsumrlim.g ⊢ G = x ∈ S ⟼ ∑ k = M x C − A
14 dvfsumrlim.k ⊢ φ → x ∈ S ⟼ B ⇝ℝ 0
15 dvfsumrlim2.1 ⊢ φ → X ∈ S
16 dvfsumrlim2.2 ⊢ φ → D ≤ X
17 ioossre ⊢ T +∞ ⊆ ℝ
18 1 17 eqsstri ⊢ S ⊆ ℝ
19 18 15 sselid ⊢ φ → X ∈ ℝ
20 19 rexrd ⊢ φ → X ∈ ℝ *
21 19 renepnfd ⊢ φ → X ≠ +∞
22 icopnfsup ⊢ X ∈ ℝ * ∧ X ≠ +∞ → sup X +∞ ℝ * < = +∞
23 20 21 22 syl2anc ⊢ φ → sup X +∞ ℝ * < = +∞
24 23 adantr ⊢ φ ∧ G ⇝ℝ L → sup X +∞ ℝ * < = +∞
25 1 2 3 4 5 6 7 8 9 10 11 13 dvfsumrlimf ⊢ φ → G : S ⟶ ℝ
26 25 ad2antrr ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → G : S ⟶ ℝ
27 15 ad2antrr ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → X ∈ S
28 26 27 ffvelcdmd ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → G ⁡ X ∈ ℝ
29 28 recnd ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → G ⁡ X ∈ ℂ
30 6 rexrd ⊢ φ → T ∈ ℝ *
31 15 1 eleqtrdi ⊢ φ → X ∈ T +∞
32 elioopnf ⊢ T ∈ ℝ * → X ∈ T +∞ ↔ X ∈ ℝ ∧ T < X
33 30 32 syl ⊢ φ → X ∈ T +∞ ↔ X ∈ ℝ ∧ T < X
34 31 33 mpbid ⊢ φ → X ∈ ℝ ∧ T < X
35 34 simprd ⊢ φ → T < X
36 df-ioo ⊢ . = u ∈ ℝ * , v ∈ ℝ * ⟼ w ∈ ℝ * | u < w ∧ w < v
37 df-ico ⊢ . = u ∈ ℝ * , v ∈ ℝ * ⟼ w ∈ ℝ * | u ≤ w ∧ w < v
38 xrltletr ⊢ T ∈ ℝ * ∧ X ∈ ℝ * ∧ z ∈ ℝ * → T < X ∧ X ≤ z → T < z
39 36 37 38 ixxss1 ⊢ T ∈ ℝ * ∧ T < X → X +∞ ⊆ T +∞
40 30 35 39 syl2anc ⊢ φ → X +∞ ⊆ T +∞
41 40 1 sseqtrrdi ⊢ φ → X +∞ ⊆ S
42 41 adantr ⊢ φ ∧ G ⇝ℝ L → X +∞ ⊆ S
43 42 sselda ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → y ∈ S
44 26 43 ffvelcdmd ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → G ⁡ y ∈ ℝ
45 44 recnd ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → G ⁡ y ∈ ℂ
46 29 45 subcld ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → G ⁡ X − G ⁡ y ∈ ℂ
47 pnfxr ⊢ +∞ ∈ ℝ *
48 icossre ⊢ X ∈ ℝ ∧ +∞ ∈ ℝ * → X +∞ ⊆ ℝ
49 19 47 48 sylancl ⊢ φ → X +∞ ⊆ ℝ
50 49 adantr ⊢ φ ∧ G ⇝ℝ L → X +∞ ⊆ ℝ
51 rlimf ⊢ G ⇝ℝ L → G : dom ⁡ G ⟶ ℂ
52 51 adantl ⊢ φ ∧ G ⇝ℝ L → G : dom ⁡ G ⟶ ℂ
53 ovex ⊢ ∑ k = M x C − A ∈ V
54 53 13 dmmpti ⊢ dom ⁡ G = S
55 54 feq2i ⊢ G : dom ⁡ G ⟶ ℂ ↔ G : S ⟶ ℂ
56 52 55 sylib ⊢ φ ∧ G ⇝ℝ L → G : S ⟶ ℂ
57 15 adantr ⊢ φ ∧ G ⇝ℝ L → X ∈ S
58 56 57 ffvelcdmd ⊢ φ ∧ G ⇝ℝ L → G ⁡ X ∈ ℂ
59 rlimconst ⊢ X +∞ ⊆ ℝ ∧ G ⁡ X ∈ ℂ → y ∈ X +∞ ⟼ G ⁡ X ⇝ℝ G ⁡ X
60 50 58 59 syl2anc ⊢ φ ∧ G ⇝ℝ L → y ∈ X +∞ ⟼ G ⁡ X ⇝ℝ G ⁡ X
61 56 feqmptd ⊢ φ ∧ G ⇝ℝ L → G = y ∈ S ⟼ G ⁡ y
62 simpr ⊢ φ ∧ G ⇝ℝ L → G ⇝ℝ L
63 61 62 eqbrtrrd ⊢ φ ∧ G ⇝ℝ L → y ∈ S ⟼ G ⁡ y ⇝ℝ L
64 42 63 rlimres2 ⊢ φ ∧ G ⇝ℝ L → y ∈ X +∞ ⟼ G ⁡ y ⇝ℝ L
65 29 45 60 64 rlimsub ⊢ φ ∧ G ⇝ℝ L → y ∈ X +∞ ⟼ G ⁡ X − G ⁡ y ⇝ℝ G ⁡ X − L
66 46 65 rlimabs ⊢ φ ∧ G ⇝ℝ L → y ∈ X +∞ ⟼ G ⁡ X − G ⁡ y ⇝ℝ G ⁡ X − L
67 18 a1i ⊢ φ → S ⊆ ℝ
68 67 7 8 10 dvmptrecl ⊢ φ ∧ x ∈ S → B ∈ ℝ
69 68 ralrimiva ⊢ φ → ∀ x ∈ S B ∈ ℝ
70 nfcsb1v ⊢ Ⅎ _ x ⦋ X / x⦌ B
71 70 nfel1 ⊢ Ⅎ x ⦋ X / x⦌ B ∈ ℝ
72 csbeq1a ⊢ x = X → B = ⦋ X / x⦌ B
73 72 eleq1d ⊢ x = X → B ∈ ℝ ↔ ⦋ X / x⦌ B ∈ ℝ
74 71 73 rspc ⊢ X ∈ S → ∀ x ∈ S B ∈ ℝ → ⦋ X / x⦌ B ∈ ℝ
75 15 69 74 sylc ⊢ φ → ⦋ X / x⦌ B ∈ ℝ
76 75 recnd ⊢ φ → ⦋ X / x⦌ B ∈ ℂ
77 rlimconst ⊢ X +∞ ⊆ ℝ ∧ ⦋ X / x⦌ B ∈ ℂ → y ∈ X +∞ ⟼ ⦋ X / x⦌ B ⇝ℝ ⦋ X / x⦌ B
78 49 76 77 syl2anc ⊢ φ → y ∈ X +∞ ⟼ ⦋ X / x⦌ B ⇝ℝ ⦋ X / x⦌ B
79 78 adantr ⊢ φ ∧ G ⇝ℝ L → y ∈ X +∞ ⟼ ⦋ X / x⦌ B ⇝ℝ ⦋ X / x⦌ B
80 46 abscld ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → G ⁡ X − G ⁡ y ∈ ℝ
81 75 ad2antrr ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → ⦋ X / x⦌ B ∈ ℝ
82 29 45 abssubd ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → G ⁡ X − G ⁡ y = G ⁡ y − G ⁡ X
83 3 adantr ⊢ φ ∧ y ∈ X +∞ → M ∈ ℤ
84 4 adantr ⊢ φ ∧ y ∈ X +∞ → D ∈ ℝ
85 5 adantr ⊢ φ ∧ y ∈ X +∞ → M ≤ D + 1
86 6 adantr ⊢ φ ∧ y ∈ X +∞ → T ∈ ℝ
87 7 adantlr ⊢ φ ∧ y ∈ X +∞ ∧ x ∈ S → A ∈ ℝ
88 8 adantlr ⊢ φ ∧ y ∈ X +∞ ∧ x ∈ S → B ∈ V
89 9 adantlr ⊢ φ ∧ y ∈ X +∞ ∧ x ∈ Z → B ∈ ℝ
90 10 adantr ⊢ φ ∧ y ∈ X +∞ → dx ∈ S A d ℝ x = x ∈ S ⟼ B
91 47 a1i ⊢ φ ∧ y ∈ X +∞ → +∞ ∈ ℝ *
92 3simpa ⊢ D ≤ x ∧ x ≤ k ∧ k ≤ +∞ → D ≤ x ∧ x ≤ k
93 92 12 syl3an3 ⊢ φ ∧ x ∈ S ∧ k ∈ S ∧ D ≤ x ∧ x ≤ k ∧ k ≤ +∞ → C ≤ B
94 93 3adant1r ⊢ φ ∧ y ∈ X +∞ ∧ x ∈ S ∧ k ∈ S ∧ D ≤ x ∧ x ≤ k ∧ k ≤ +∞ → C ≤ B
95 1 2 3 4 5 6 7 8 9 10 11 12 13 14 dvfsumrlimge0 ⊢ φ ∧ x ∈ S ∧ D ≤ x → 0 ≤ B
96 95 3adantr3 ⊢ φ ∧ x ∈ S ∧ D ≤ x ∧ x ≤ +∞ → 0 ≤ B
97 96 adantlr ⊢ φ ∧ y ∈ X +∞ ∧ x ∈ S ∧ D ≤ x ∧ x ≤ +∞ → 0 ≤ B
98 15 adantr ⊢ φ ∧ y ∈ X +∞ → X ∈ S
99 41 sselda ⊢ φ ∧ y ∈ X +∞ → y ∈ S
100 16 adantr ⊢ φ ∧ y ∈ X +∞ → D ≤ X
101 elicopnf ⊢ X ∈ ℝ → y ∈ X +∞ ↔ y ∈ ℝ ∧ X ≤ y
102 19 101 syl ⊢ φ → y ∈ X +∞ ↔ y ∈ ℝ ∧ X ≤ y
103 102 simplbda ⊢ φ ∧ y ∈ X +∞ → X ≤ y
104 102 simprbda ⊢ φ ∧ y ∈ X +∞ → y ∈ ℝ
105 104 rexrd ⊢ φ ∧ y ∈ X +∞ → y ∈ ℝ *
106 pnfge ⊢ y ∈ ℝ * → y ≤ +∞
107 105 106 syl ⊢ φ ∧ y ∈ X +∞ → y ≤ +∞
108 1 2 83 84 85 86 87 88 89 90 11 91 94 13 97 98 99 100 103 107 dvfsumlem4 ⊢ φ ∧ y ∈ X +∞ → G ⁡ y − G ⁡ X ≤ ⦋ X / x⦌ B
109 108 adantlr ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → G ⁡ y − G ⁡ X ≤ ⦋ X / x⦌ B
110 82 109 eqbrtrd ⊢ φ ∧ G ⇝ℝ L ∧ y ∈ X +∞ → G ⁡ X − G ⁡ y ≤ ⦋ X / x⦌ B
111 24 66 79 80 81 110 rlimle ⊢ φ ∧ G ⇝ℝ L → G ⁡ X − L ≤ ⦋ X / x⦌ B