---

Step * 1 3 of Lemma fun-ratio-test


1. c : ℝ
2. r0 ≤ c
3. c < r1
4. N : ℕ
5. I : Interval
6. g : ℕ ⟶ I ⟶ℝ
7. ∀n:ℕ. g[n;x] continuous for x ∈ I
8. icompact(I)
9. ∀n:{N...}. ∀x:{x:ℝ| x ∈ I} .  (|g[n + 1;x]| ≤ (c * |g[n;x]|))
10. ∀n:ℕ. ∀x:{x:ℝ| x ∈ I} .  (|g[N + n;x]| ≤ (c^n * |g[N;x]|))
⊢ λn.Σ{|g[i;x]| | 0≤i≤n}↓ for x ∈ I)
BY
{ ((Fold `fun-series-converges` 0 THEN Auto)
   THEN (InstLemma `fun-comparison-test` [⌜I⌝;⌜λi,x. |g[i;x]|⌝;⌜λi,x. if N ≤z i then c^i - N * |g[N;x]| else |g[i;x]| fi\000C ⌝]⋅
         THEN Auto
         )⋅
   ) }

1
.....antecedent..... 
1. c : ℝ
2. r0 ≤ c
3. c < r1
4. N : ℕ
5. I : Interval
6. g : ℕ ⟶ I ⟶ℝ
7. ∀n:ℕ. g[n;x] continuous for x ∈ I
8. icompact(I)
9. ∀n:{N...}. ∀x:{x:ℝ| x ∈ I} .  (|g[n + 1;x]| ≤ (c * |g[n;x]|))
10. ∀n:ℕ. ∀x:{x:ℝ| x ∈ I} .  (|g[N + n;x]| ≤ (c^n * |g[N;x]|))
⊢ Σn.λi,x. if N ≤z i then c^i - N * |g[N;x]| else |g[i;x]| fi [n;x]↓ for x ∈ I

2
1. c : ℝ
2. r0 ≤ c
3. c < r1
4. N : ℕ
5. I : Interval
6. g : ℕ ⟶ I ⟶ℝ
7. ∀n:ℕ. g[n;x] continuous for x ∈ I
8. icompact(I)
9. ∀n:{N...}. ∀x:{x:ℝ| x ∈ I} .  (|g[n + 1;x]| ≤ (c * |g[n;x]|))
10. ∀n:ℕ. ∀x:{x:ℝ| x ∈ I} .  (|g[N + n;x]| ≤ (c^n * |g[N;x]|))
11. n : ℕ
12. x : {x:ℝ| x ∈ I} 
⊢ |λi,x. |g[i;x]|[n;x]| ≤ λi,x. if N ≤z i then c^i - N * |g[N;x]| else |g[i;x]| fi [n;x]

---

Latex:

---

Latex:

1.  c  :  \mBbbR{}
2.  r0  \mleq{}  c
3.  c  <  r1
4.  N  :  \mBbbN{}
5.  I  :  Interval
6.  g  :  \mBbbN{}  {}\mrightarrow{}  I  {}\mrightarrow{}\mBbbR{}
7.  \mforall{}n:\mBbbN{}.  g[n;x]  continuous  for  x  \mmember{}  I
8.  icompact(I)
9.  \mforall{}n:\{N...\}.  \mforall{}x:\{x:\mBbbR{}|  x  \mmember{}  I\}  .    (|g[n  +  1;x]|  \mleq{}  (c  *  |g[n;x]|))
10.  \mforall{}n:\mBbbN{}.  \mforall{}x:\{x:\mBbbR{}|  x  \mmember{}  I\}  .    (|g[N  +  n;x]|  \mleq{}  (c\^{}n  *  |g[N;x]|))
\mvdash{}  \mlambda{}n.\mSigma{}\{|g[i;x]|  |  0\mleq{}i\mleq{}n\}\mdownarrow{}  for  x  \mmember{}  I)


By

---

Latex:
((Fold  `fun-series-converges`  0  THEN  Auto)
  THEN  (InstLemma  `fun-comparison-test`  [\mkleeneopen{}I\mkleeneclose{};\mkleeneopen{}\mlambda{}i,x.  |g[i;x]|\mkleeneclose{};\mkleeneopen{}\mlambda{}i,x.  if  N  \mleq{}z  i
                                                                                                                              then  c\^{}i  -  N  *  |g[N;x]|
                                                                                                                              else  |g[i;x]|
                                                                                                                              fi  \mkleeneclose{}]\mcdot{}
              THEN  Auto
              )\mcdot{}
  )

---

Home Index