Step * 1 2 2 1 2 1 1 of Lemma derivative-of-integral

.....assertion..... 
1. Interval
2. {a:ℝa ∈ I} 
3. {f:I ⟶ℝ| ∀x,y:{a:ℝa ∈ I} .  ((x y)  ((f x) (f y)))} 
4. : ℕ+
5. : ℕ+
6. icompact(i-approx(I;n)) ∧ iproper(i-approx(I;n))
7. ∀x,y:ℝ.  ((x ∈ I)  (y ∈ I)  (|a_∫-f[t] dt a_∫-f[t] dt f[x] (y x)| |x_∫-f[t] f[x] dt|))
8. del : ℝ
9. r0 < del
10. ∀x,y:ℝ.
      ((x ∈ i-approx(I;n))
       (y ∈ i-approx(I;n))
       (|y x| ≤ del)
       (|x_∫-f[t] f[x] dt| ≤ ((r1/r(k)) |y x|)))
11. : ℝ
12. ∀y:ℝ
      ((x ∈ i-approx(I;n))
       (y ∈ i-approx(I;n))
       (|y x| ≤ del)
       (|x_∫-f[t] f[x] dt| ≤ ((r1/r(k)) |y x|)))
13. : ℝ
14. x ∈ i-approx(I;n)
15. y ∈ i-approx(I;n)
16. |y x| ≤ del
17. |x_∫-f[t] f[x] dt| ≤ ((r1/r(k)) |y x|)
⊢ a_∫-f[t] dt ∈ ℝ
BY
((Assert i-approx(I;n) ⊆ I  BY
          Auto)
   THEN (Assert λt.f[t] ∈ {f:[rmin(a;y), rmax(a;y)] ⟶ℝifun(f;[rmin(a;y), rmax(a;y)])}  BY
               ((InstLemma `rmin-rmax-subinterval` [⌜I⌝;⌜a⌝;⌜y⌝]⋅ THENA Auto)
                THEN DVar `f'
                THEN MemTypeCD
                THEN Auto
                THEN 0
                THEN Reduce 0
                THEN Auto))
   THEN Auto) }


Latex:


Latex:
.....assertion..... 
1.  I  :  Interval
2.  a  :  \{a:\mBbbR{}|  a  \mmember{}  I\} 
3.  f  :  \{f:I  {}\mrightarrow{}\mBbbR{}|  \mforall{}x,y:\{a:\mBbbR{}|  a  \mmember{}  I\}  .    ((x  =  y)  {}\mRightarrow{}  ((f  x)  =  (f  y)))\} 
4.  k  :  \mBbbN{}\msupplus{}
5.  n  :  \mBbbN{}\msupplus{}
6.  icompact(i-approx(I;n))  \mwedge{}  iproper(i-approx(I;n))
7.  \mforall{}x,y:\mBbbR{}.
          ((x  \mmember{}  I)
          {}\mRightarrow{}  (y  \mmember{}  I)
          {}\mRightarrow{}  (|a\_\mint{}\msupminus{}y  f[t]  dt  -  a\_\mint{}\msupminus{}x  f[t]  dt  -  f[x]  *  (y  -  x)|  =  |x\_\mint{}\msupminus{}y  f[t]  -  f[x]  dt|))
8.  del  :  \mBbbR{}
9.  r0  <  del
10.  \mforall{}x,y:\mBbbR{}.
            ((x  \mmember{}  i-approx(I;n))
            {}\mRightarrow{}  (y  \mmember{}  i-approx(I;n))
            {}\mRightarrow{}  (|y  -  x|  \mleq{}  del)
            {}\mRightarrow{}  (|x\_\mint{}\msupminus{}y  f[t]  -  f[x]  dt|  \mleq{}  ((r1/r(k))  *  |y  -  x|)))
11.  x  :  \mBbbR{}
12.  \mforall{}y:\mBbbR{}
            ((x  \mmember{}  i-approx(I;n))
            {}\mRightarrow{}  (y  \mmember{}  i-approx(I;n))
            {}\mRightarrow{}  (|y  -  x|  \mleq{}  del)
            {}\mRightarrow{}  (|x\_\mint{}\msupminus{}y  f[t]  -  f[x]  dt|  \mleq{}  ((r1/r(k))  *  |y  -  x|)))
13.  y  :  \mBbbR{}
14.  x  \mmember{}  i-approx(I;n)
15.  y  \mmember{}  i-approx(I;n)
16.  |y  -  x|  \mleq{}  del
17.  |x\_\mint{}\msupminus{}y  f[t]  -  f[x]  dt|  \mleq{}  ((r1/r(k))  *  |y  -  x|)
\mvdash{}  a\_\mint{}\msupminus{}y  f[t]  dt  \mmember{}  \mBbbR{}


By


Latex:
((Assert  i-approx(I;n)  \msubseteq{}  I    BY
                Auto)
  THEN  (Assert  \mlambda{}t.f[t]  \mmember{}  \{f:[rmin(a;y),  rmax(a;y)]  {}\mrightarrow{}\mBbbR{}|  ifun(f;[rmin(a;y),  rmax(a;y)])\}    BY
                          ((InstLemma  `rmin-rmax-subinterval`  [\mkleeneopen{}I\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{}]\mcdot{}  THENA  Auto)
                            THEN  DVar  `f'
                            THEN  MemTypeCD
                            THEN  Auto
                            THEN  D  0
                            THEN  Reduce  0
                            THEN  Auto))
  THEN  Auto)




Home Index