---

Step * 2 2 2 1 1 1 1 of Lemma q-geometric-series-converges

.....assertion..... 
1. a : {a:ℚ| |a| < 1} 
2. e : {e:ℚ| 0 < e ∧ (e ≤ 1)} 
3. ¬((1 - a) = 0 ∈ ℚ)
4. |a| ∈ {q:ℚ| (0 ≤ q) ∧ q < 1} 
5. e' : {e:ℚ| 0 < e} 
6. e' = (|1 - a| * e) ∈ {e:ℚ| 0 < e} 
7. v : ℕ+
8. m : ℕ
9. v ≤ m
10. q : {q:ℚ| 0 < q} 
11. |1 - a| = q ∈ {q:ℚ| 0 < q} 
12. |a| ↑ v < q * e
⊢ |a| ↑ m - v ≤ 1
BY
{ (InstLemma `qexp_preserves_qle` [⌜|a|⌝;⌜1⌝;⌜m - v⌝]⋅ THEN Auto) }

---

Latex:

---

Latex:
.....assertion..... 
1.  a  :  \{a:\mBbbQ{}|  |a|  <  1\} 
2.  e  :  \{e:\mBbbQ{}|  0  <  e  \mwedge{}  (e  \mleq{}  1)\} 
3.  \mneg{}((1  -  a)  =  0)
4.  |a|  \mmember{}  \{q:\mBbbQ{}|  (0  \mleq{}  q)  \mwedge{}  q  <  1\} 
5.  e'  :  \{e:\mBbbQ{}|  0  <  e\} 
6.  e'  =  (|1  -  a|  *  e)
7.  v  :  \mBbbN{}\msupplus{}
8.  m  :  \mBbbN{}
9.  v  \mleq{}  m
10.  q  :  \{q:\mBbbQ{}|  0  <  q\} 
11.  |1  -  a|  =  q
12.  |a|  \muparrow{}  v  <  q  *  e
\mvdash{}  |a|  \muparrow{}  m  -  v  \mleq{}  1


By

---

Latex:
(InstLemma  `qexp\_preserves\_qle`  [\mkleeneopen{}|a|\mkleeneclose{};\mkleeneopen{}1\mkleeneclose{};\mkleeneopen{}m  -  v\mkleeneclose{}]\mcdot{}  THEN  Auto)

---

Home Index