---

Step * 1 1 1 1 1 of Lemma IVT-locally-non-constant-open


1. a : ℝ
2. b : {b:ℝ| a < b} 
3. f : [a, b] ⟶ℝ
4. (a, b) ⊆ [a, b] 
5. a < b
6. ∀a',b':ℝ.  (((a < a') ∧ (a' < b') ∧ (b' < b)) ⇒ (∀c:ℝ. locally-non-constant(f;a';b';c)))
7. c : ℝ
8. f(a) < c
9. c < f(b)
10. k : ℕ+
11. (r1/r(k)) < (c - f(a))
12. d : ℝ
13. r0 < d
14. ∀x,y:ℝ.  (((a ≤ x) ∧ (x ≤ b)) ⇒ ((a ≤ y) ∧ (y ≤ b)) ⇒ (|x - y| ≤ d) ⇒ (|f[x] - f[y]| ≤ (r1/r(k))))
15. a < ravg(a;b)
16. ravg(a;b) < b
17. a < rmin(a + d;ravg(a;b))
18. rmin(a + d;ravg(a;b)) < b
⊢ |a - rmin(a + d;ravg(a;b))| ≤ d
BY
{ ((BLemma `rabs-difference-bound-rleq` THEN Auto)
   THEN Try (((nRAdd ⌜d⌝ 0⋅ THENA Auto) THEN BLemma `rmin_lb` THEN Auto))
   THEN Try (((nRAdd ⌜-(d)⌝ 0⋅ THENA Auto) THEN BLemma `rmin_ub` THEN Auto))
   THEN Auto) }

1
1. a : ℝ
2. b : {b:ℝ| a < b} 
3. f : [a, b] ⟶ℝ
4. (a, b) ⊆ [a, b] 
5. a < b
6. ∀a',b':ℝ.  (((a < a') ∧ (a' < b') ∧ (b' < b)) ⇒ (∀c:ℝ. locally-non-constant(f;a';b';c)))
7. c : ℝ
8. f(a) < c
9. c < f(b)
10. k : ℕ+
11. (r1/r(k)) < (c - f(a))
12. d : ℝ
13. r0 < d
14. ∀x,y:ℝ.  (((a ≤ x) ∧ (x ≤ b)) ⇒ ((a ≤ y) ∧ (y ≤ b)) ⇒ (|x - y| ≤ d) ⇒ (|f[x] - f[y]| ≤ (r1/r(k))))
15. a < ravg(a;b)
16. ravg(a;b) < b
17. a < rmin(a + d;ravg(a;b))
18. rmin(a + d;ravg(a;b)) < b
19. (rmin(a + d;ravg(a;b)) - d) ≤ a
⊢ (a + -(d)) ≤ (a + d)

2
1. a : ℝ
2. b : {b:ℝ| a < b} 
3. f : [a, b] ⟶ℝ
4. (a, b) ⊆ [a, b] 
5. a < b
6. ∀a',b':ℝ.  (((a < a') ∧ (a' < b') ∧ (b' < b)) ⇒ (∀c:ℝ. locally-non-constant(f;a';b';c)))
7. c : ℝ
8. f(a) < c
9. c < f(b)
10. k : ℕ+
11. (r1/r(k)) < (c - f(a))
12. d : ℝ
13. r0 < d
14. ∀x,y:ℝ.  (((a ≤ x) ∧ (x ≤ b)) ⇒ ((a ≤ y) ∧ (y ≤ b)) ⇒ (|x - y| ≤ d) ⇒ (|f[x] - f[y]| ≤ (r1/r(k))))
15. a < ravg(a;b)
16. ravg(a;b) < b
17. a < rmin(a + d;ravg(a;b))
18. rmin(a + d;ravg(a;b)) < b
19. (rmin(a + d;ravg(a;b)) - d) ≤ a
20. (a + -(d)) ≤ (a + d)
⊢ (a + -(d)) ≤ ravg(a;b)

---

Latex:

---

Latex:

1.  a  :  \mBbbR{}
2.  b  :  \{b:\mBbbR{}|  a  <  b\} 
3.  f  :  [a,  b]  {}\mrightarrow{}\mBbbR{}
4.  (a,  b)  \msubseteq{}  [a,  b] 
5.  a  <  b
6.  \mforall{}a',b':\mBbbR{}.    (((a  <  a')  \mwedge{}  (a'  <  b')  \mwedge{}  (b'  <  b))  {}\mRightarrow{}  (\mforall{}c:\mBbbR{}.  locally-non-constant(f;a';b';c)))
7.  c  :  \mBbbR{}
8.  f(a)  <  c
9.  c  <  f(b)
10.  k  :  \mBbbN{}\msupplus{}
11.  (r1/r(k))  <  (c  -  f(a))
12.  d  :  \mBbbR{}
13.  r0  <  d
14.  \mforall{}x,y:\mBbbR{}.
            (((a  \mleq{}  x)  \mwedge{}  (x  \mleq{}  b))  {}\mRightarrow{}  ((a  \mleq{}  y)  \mwedge{}  (y  \mleq{}  b))  {}\mRightarrow{}  (|x  -  y|  \mleq{}  d)  {}\mRightarrow{}  (|f[x]  -  f[y]|  \mleq{}  (r1/r(k))))
15.  a  <  ravg(a;b)
16.  ravg(a;b)  <  b
17.  a  <  rmin(a  +  d;ravg(a;b))
18.  rmin(a  +  d;ravg(a;b))  <  b
\mvdash{}  |a  -  rmin(a  +  d;ravg(a;b))|  \mleq{}  d


By

---

Latex:
((BLemma  `rabs-difference-bound-rleq`  THEN  Auto)
  THEN  Try  (((nRAdd  \mkleeneopen{}d\mkleeneclose{}  0\mcdot{}  THENA  Auto)  THEN  BLemma  `rmin\_lb`  THEN  Auto))
  THEN  Try  (((nRAdd  \mkleeneopen{}-(d)\mkleeneclose{}  0\mcdot{}  THENA  Auto)  THEN  BLemma  `rmin\_ub`  THEN  Auto))
  THEN  Auto)

---

Home Index