---

Step * 3 of Lemma real-ratio-bound_wf


1. M : ℕ+
2. x : ℝ
3. y : ℝ
4. a : {r:ℝ| r0 < r} 
5. b : {r:ℝ| r0 < r} 
6. r0 < (r1/r(M))
7. v : ℤ
8. (v = 1 ∈ ℤ) ⇒ ((r1/r(M)) < (y - x))
9. (v = 0 ∈ ℤ) ⇒ (|x - y| < (r(2)/r(M)))
10. v = 2 ∈ ℤ
11. (r1/r(M)) < (x - y)
⊢ (b/x - y) ∈ {r:ℝ| ((x < y) ⇒ (r ≤ (a/y - x))) ∧ ((y < x) ⇒ (r ≤ (b/x - y))) ∧ (r0 < r)} 
BY
{ ((Assert r0 < (x - y) BY
          Auto)
   THEN (Assert y < x BY
               Auto)
   THEN (MemTypeCD THEN Auto)
   THEN nRMul ⌜x - y⌝ 0⋅
   THEN Auto) }

---

Latex:

---

Latex:

1.  M  :  \mBbbN{}\msupplus{}
2.  x  :  \mBbbR{}
3.  y  :  \mBbbR{}
4.  a  :  \{r:\mBbbR{}|  r0  <  r\} 
5.  b  :  \{r:\mBbbR{}|  r0  <  r\} 
6.  r0  <  (r1/r(M))
7.  v  :  \mBbbZ{}
8.  (v  =  1)  {}\mRightarrow{}  ((r1/r(M))  <  (y  -  x))
9.  (v  =  0)  {}\mRightarrow{}  (|x  -  y|  <  (r(2)/r(M)))
10.  v  =  2
11.  (r1/r(M))  <  (x  -  y)
\mvdash{}  (b/x  -  y)  \mmember{}  \{r:\mBbbR{}|  ((x  <  y)  {}\mRightarrow{}  (r  \mleq{}  (a/y  -  x)))  \mwedge{}  ((y  <  x)  {}\mRightarrow{}  (r  \mleq{}  (b/x  -  y)))  \mwedge{}  (r0  <  r)\} 


By

---

Latex:
((Assert  r0  <  (x  -  y)  BY
                Auto)
  THEN  (Assert  y  <  x  BY
                          Auto)
  THEN  (MemTypeCD  THEN  Auto)
  THEN  nRMul  \mkleeneopen{}x  -  y\mkleeneclose{}  0\mcdot{}
  THEN  Auto)

---

Home Index