---

Step * 1 2 1 2 1 1 1 of Lemma BB-problem-21


1. a : ℝ
2. b : {b:ℝ| a ≤ b} 
3. f : {f:[a, b] ⟶ℝ| ifun(f;[a, b])} 
4. g : {f:[a, b] ⟶ℝ| ifun(f;[a, b])} 
5. ∀x:ℝ. ((x ∈ [a, b]) ⇒ (r0 ≤ g[x]))
6. e : {e:ℝ| r0 < e} 
7. rmin(a;b) = a
8. rmax(a;b) = b
9. λc.(∫ f[x] * g[x] dx on [a, b] - f[c] * ∫ g[x] dx on [a, b]) ∈ {f:[a, b] ⟶ℝ| ifun(f;[a, b])} 
10. F : {f:[a, b] ⟶ℝ| ifun(f;[a, b])} 
11. (λc.(∫ f[x] * g[x] dx on [a, b] - f[c] * ∫ g[x] dx on [a, b])) = F ∈ {f:[a, b] ⟶ℝ| ifun(f;[a, b])} 
12. r0 < ||F c||_c:[a, b]
13. ifun(λc.||(f[x] - f[c]) * g[x]||_x:[a, b];[a, b])
14. ∀c:{r:ℝ| r ∈ [a, b]} . ((F c) = ∫ (f[x] - f[c]) * g[x] dx on [a, b])
15. c : {r:ℝ| r ∈ [a, b]} 
16. ||(f[x] - f[c]) * g[x]||_x:[a, b] ≤ ||||(f[x] - f[c]) * g[x]||_x:[a, b]||_c:[a, b]
⊢ |F c| ≤ (||||(f[x] - f[c]) * g[x]||_x:[a, b]||_c:[a, b] * (b - a))
BY
{ ((RWO  "-1<" 0 THEN Auto)
   THEN Try ((OrLeft THEN Auto THEN nRAdd ⌜a⌝ 0⋅ THEN Auto))
   THEN (InstLemma  `rabs-Riemann-integral` [⌜a⌝;⌜b⌝;⌜λ2x.(f[x] - f[c]) * g[x]⌝]⋅ THENA Auto)
   THEN (RWO  "-1<" 0 THENA Auto)
   THEN RWO "-4" 0
   THEN Auto) }

---

Latex:

---

Latex:

1.  a  :  \mBbbR{}
2.  b  :  \{b:\mBbbR{}|  a  \mleq{}  b\} 
3.  f  :  \{f:[a,  b]  {}\mrightarrow{}\mBbbR{}|  ifun(f;[a,  b])\} 
4.  g  :  \{f:[a,  b]  {}\mrightarrow{}\mBbbR{}|  ifun(f;[a,  b])\} 
5.  \mforall{}x:\mBbbR{}.  ((x  \mmember{}  [a,  b])  {}\mRightarrow{}  (r0  \mleq{}  g[x]))
6.  e  :  \{e:\mBbbR{}|  r0  <  e\} 
7.  rmin(a;b)  =  a
8.  rmax(a;b)  =  b
9.  \mlambda{}c.(\mint{}  f[x]  *  g[x]  dx  on  [a,  b]  -  f[c]  *  \mint{}  g[x]  dx  on  [a,  b])  \mmember{}  \{f:[a,  b]  {}\mrightarrow{}\mBbbR{}|  ifun(f;[a,  b])\} 
10.  F  :  \{f:[a,  b]  {}\mrightarrow{}\mBbbR{}|  ifun(f;[a,  b])\} 
11.  (\mlambda{}c.(\mint{}  f[x]  *  g[x]  dx  on  [a,  b]  -  f[c]  *  \mint{}  g[x]  dx  on  [a,  b]))  =  F
12.  r0  <  ||F  c||\_c:[a,  b]
13.  ifun(\mlambda{}c.||(f[x]  -  f[c])  *  g[x]||\_x:[a,  b];[a,  b])
14.  \mforall{}c:\{r:\mBbbR{}|  r  \mmember{}  [a,  b]\}  .  ((F  c)  =  \mint{}  (f[x]  -  f[c])  *  g[x]  dx  on  [a,  b])
15.  c  :  \{r:\mBbbR{}|  r  \mmember{}  [a,  b]\} 
16.  ||(f[x]  -  f[c])  *  g[x]||\_x:[a,  b]  \mleq{}  ||||(f[x]  -  f[c])  *  g[x]||\_x:[a,  b]||\_c:[a,  b]
\mvdash{}  |F  c|  \mleq{}  (||||(f[x]  -  f[c])  *  g[x]||\_x:[a,  b]||\_c:[a,  b]  *  (b  -  a))


By

---

Latex:
((RWO    "-1<"  0  THEN  Auto)
  THEN  Try  ((OrLeft  THEN  Auto  THEN  nRAdd  \mkleeneopen{}a\mkleeneclose{}  0\mcdot{}  THEN  Auto))
  THEN  (InstLemma    `rabs-Riemann-integral`  [\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}\mlambda{}\msubtwo{}x.(f[x]  -  f[c])  *  g[x]\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  (RWO    "-1<"  0  THENA  Auto)
  THEN  RWO  "-4"  0
  THEN  Auto)

---

Home Index