Step * of Lemma derivative-mul-part1

I:Interval
  (True
   (∀f1,f2,g1,g2:I ⟶ℝ.
        (f1(x) (proper)continuous for x ∈ I
         f2(x) (proper)continuous for x ∈ I
         g2(x) (proper)continuous for x ∈ I
         d(f1[x])/dx = λx.g1[x] on I
         d(f2[x])/dx = λx.g2[x] on I
         d(f1[x] f2[x])/dx = λx.(f1[x] g2[x]) (f2[x] g1[x]) on I)))
BY
(Auto
   THEN 0
   THEN Auto
   THEN (Assert i-approx(I;n) ⊆ I  BY
               Auto)
   THEN (Assert icompact(i-approx(I;n)) ∧ iproper(i-approx(I;n)) BY
               (DVar `n' THEN Unhide THEN Auto))
   THEN Assert ⌜∃M:ℕ+. ∀x:{x:ℝx ∈ i-approx(I;n)} ((|f1(x)| ≤ r(M)) ∧ (|f2(x)| ≤ r(M)) ∧ (|g2(x)| ≤ r(M)))⌝⋅}

1
.....assertion..... 
1. Interval
2. True
3. f1 I ⟶ℝ
4. f2 I ⟶ℝ
5. g1 I ⟶ℝ
6. g2 I ⟶ℝ
7. f1(x) (proper)continuous for x ∈ I
8. f2(x) (proper)continuous for x ∈ I
9. g2(x) (proper)continuous for x ∈ I
10. d(f1[x])/dx = λx.g1[x] on I
11. d(f2[x])/dx = λx.g2[x] on I
12. : ℕ+
13. {n:ℕ+icompact(i-approx(I;n)) ∧ iproper(i-approx(I;n))} 
14. i-approx(I;n) ⊆ 
15. icompact(i-approx(I;n)) ∧ iproper(i-approx(I;n))
⊢ ∃M:ℕ+. ∀x:{x:ℝx ∈ i-approx(I;n)} ((|f1(x)| ≤ r(M)) ∧ (|f2(x)| ≤ r(M)) ∧ (|g2(x)| ≤ r(M)))

2
1. Interval
2. True
3. f1 I ⟶ℝ
4. f2 I ⟶ℝ
5. g1 I ⟶ℝ
6. g2 I ⟶ℝ
7. f1(x) (proper)continuous for x ∈ I
8. f2(x) (proper)continuous for x ∈ I
9. g2(x) (proper)continuous for x ∈ I
10. d(f1[x])/dx = λx.g1[x] on I
11. d(f2[x])/dx = λx.g2[x] on I
12. : ℕ+
13. {n:ℕ+icompact(i-approx(I;n)) ∧ iproper(i-approx(I;n))} 
14. i-approx(I;n) ⊆ 
15. icompact(i-approx(I;n)) ∧ iproper(i-approx(I;n))
16. ∃M:ℕ+. ∀x:{x:ℝx ∈ i-approx(I;n)} ((|f1(x)| ≤ r(M)) ∧ (|f2(x)| ≤ r(M)) ∧ (|g2(x)| ≤ r(M)))
⊢ ∃del:{ℝ((r0 < del)
           ∧ (∀x,y:ℝ.
                ((x ∈ i-approx(I;n))
                 (y ∈ i-approx(I;n))
                 (|y x| ≤ del)
                 (|(f1[y] f2[y]) f1[x] f2[x] ((f1[x] g2[x]) (f2[x] g1[x])) (y x)| ≤ ((r1/r(k))
                   |y x|)))))}


Latex:


Latex:
\mforall{}I:Interval
    (True
    {}\mRightarrow{}  (\mforall{}f1,f2,g1,g2:I  {}\mrightarrow{}\mBbbR{}.
                (f1(x)  (proper)continuous  for  x  \mmember{}  I
                {}\mRightarrow{}  f2(x)  (proper)continuous  for  x  \mmember{}  I
                {}\mRightarrow{}  g2(x)  (proper)continuous  for  x  \mmember{}  I
                {}\mRightarrow{}  d(f1[x])/dx  =  \mlambda{}x.g1[x]  on  I
                {}\mRightarrow{}  d(f2[x])/dx  =  \mlambda{}x.g2[x]  on  I
                {}\mRightarrow{}  d(f1[x]  *  f2[x])/dx  =  \mlambda{}x.(f1[x]  *  g2[x])  +  (f2[x]  *  g1[x])  on  I)))


By


Latex:
(Auto
  THEN  D  0
  THEN  Auto
  THEN  (Assert  i-approx(I;n)  \msubseteq{}  I    BY
                          Auto)
  THEN  (Assert  icompact(i-approx(I;n))  \mwedge{}  iproper(i-approx(I;n))  BY
                          (DVar  `n'  THEN  Unhide  THEN  Auto))
  THEN  Assert  \mkleeneopen{}\mexists{}M:\mBbbN{}\msupplus{}
                              \mforall{}x:\{x:\mBbbR{}|  x  \mmember{}  i-approx(I;n)\} 
                                  ((|f1(x)|  \mleq{}  r(M))  \mwedge{}  (|f2(x)|  \mleq{}  r(M))  \mwedge{}  (|g2(x)|  \mleq{}  r(M)))\mkleeneclose{}\mcdot{})




Home Index