Step
*
2
1
of Lemma
ratio-test-corollary
1. x : ℕ ⟶ ℝ@i
2. ∀N:ℕ
     ((∀c:{c:ℝ| (r0 ≤ c) ∧ (c < r1)} . ((∀n:{N...}. (|x[n + 1]| ≤ (c * |x[n]|))) 
⇒ Σn.x[n]↓))
     ∧ (∀c:{c:ℝ| r1 < c} . ((∀n:{N...}. ((c * |x[n]|) < |x[n + 1]|)) 
⇒ Σn.x[n]↑)))
3. ∀n:ℕ. x[n] ≠ r0
4. L : ℝ@i
5. lim n→∞.|(x[n + 1]/x[n])| = L
6. (L < r1) 
⇒ Σn.x[n]↓
7. r1 < L
8. k : ℕ+
9. (r1/r(k)) < (L - r1)
⊢ Σn.x[n]↑
BY
{ (Assert r1 < (L - (r1/r(k))) BY
         (MoveToConcl (-1)
          THEN GenConclTerm ⌜(r1/r(k))⌝ ⋅
          THEN Auto
          THEN (nRAdd ⌜v - r1⌝ 0⋅ THEN Auto)
          THEN nRNorm  (-1)
          THEN Auto)) }
1
1. x : ℕ ⟶ ℝ@i
2. ∀N:ℕ
     ((∀c:{c:ℝ| (r0 ≤ c) ∧ (c < r1)} . ((∀n:{N...}. (|x[n + 1]| ≤ (c * |x[n]|))) 
⇒ Σn.x[n]↓))
     ∧ (∀c:{c:ℝ| r1 < c} . ((∀n:{N...}. ((c * |x[n]|) < |x[n + 1]|)) 
⇒ Σn.x[n]↑)))
3. ∀n:ℕ. x[n] ≠ r0
4. L : ℝ@i
5. lim n→∞.|(x[n + 1]/x[n])| = L
6. (L < r1) 
⇒ Σn.x[n]↓
7. r1 < L
8. k : ℕ+
9. (r1/r(k)) < (L - r1)
10. r1 < (L - (r1/r(k)))
⊢ Σn.x[n]↑
Latex:
Latex:
1.  x  :  \mBbbN{}  {}\mrightarrow{}  \mBbbR{}@i
2.  \mforall{}N:\mBbbN{}
          ((\mforall{}c:\{c:\mBbbR{}|  (r0  \mleq{}  c)  \mwedge{}  (c  <  r1)\}  .  ((\mforall{}n:\{N...\}.  (|x[n  +  1]|  \mleq{}  (c  *  |x[n]|)))  {}\mRightarrow{}  \mSigma{}n.x[n]\mdownarrow{}))
          \mwedge{}  (\mforall{}c:\{c:\mBbbR{}|  r1  <  c\}  .  ((\mforall{}n:\{N...\}.  ((c  *  |x[n]|)  <  |x[n  +  1]|))  {}\mRightarrow{}  \mSigma{}n.x[n]\muparrow{})))
3.  \mforall{}n:\mBbbN{}.  x[n]  \mneq{}  r0
4.  L  :  \mBbbR{}@i
5.  lim  n\mrightarrow{}\minfty{}.|(x[n  +  1]/x[n])|  =  L
6.  (L  <  r1)  {}\mRightarrow{}  \mSigma{}n.x[n]\mdownarrow{}
7.  r1  <  L
8.  k  :  \mBbbN{}\msupplus{}
9.  (r1/r(k))  <  (L  -  r1)
\mvdash{}  \mSigma{}n.x[n]\muparrow{}
By
Latex:
(Assert  r1  <  (L  -  (r1/r(k)))  BY
              (MoveToConcl  (-1)
                THEN  GenConclTerm  \mkleeneopen{}(r1/r(k))\mkleeneclose{}  \mcdot{}
                THEN  Auto
                THEN  (nRAdd  \mkleeneopen{}v  -  r1\mkleeneclose{}  0\mcdot{}  THEN  Auto)
                THEN  nRNorm    (-1)
                THEN  Auto))
Home
Index