Step
*
1
3
1
1
1
1
1
of Lemma
arcsine-bounds2
.....assertion..... 
1. x : {x:ℝ| (r0 < x) ∧ (x < (r(3)/r(4)))} 
2. r(-1) < r0
3. (r(3)/r(4)) < r1
4. x1 : {x:ℝ| x ∈ [r0, (r(3)/r(4))]} 
5. r0 ≤ x1
6. x1 ≤ (r(3)/r(4))
7. ∀t:ℝ. ((t ∈ (r(-1), r1)) 
⇒ (r0 < (r1 - t * t)))
8. r0 < (r1 - x1 * x1)
9. r0 < rsqrt(r1 - x1 * x1)
10. (r1 - x1 * x1) ≤ r1
⊢ rsqrt(r1 - x1 * x1) ≤ r1
BY
{ (RWO  "-1" 0 THEN Auto) }
1
1. x : {x:ℝ| (r0 < x) ∧ (x < (r(3)/r(4)))} 
2. r(-1) < r0
3. (r(3)/r(4)) < r1
4. x1 : {x:ℝ| x ∈ [r0, (r(3)/r(4))]} 
5. r0 ≤ x1
6. x1 ≤ (r(3)/r(4))
7. ∀t:ℝ. ((t ∈ (r(-1), r1)) 
⇒ (r0 < (r1 - t * t)))
8. r0 < (r1 - x1 * x1)
9. r0 < rsqrt(r1 - x1 * x1)
10. (r1 - x1 * x1) ≤ r1
⊢ rsqrt(r1) ≤ r1
Latex:
Latex:
.....assertion..... 
1.  x  :  \{x:\mBbbR{}|  (r0  <  x)  \mwedge{}  (x  <  (r(3)/r(4)))\} 
2.  r(-1)  <  r0
3.  (r(3)/r(4))  <  r1
4.  x1  :  \{x:\mBbbR{}|  x  \mmember{}  [r0,  (r(3)/r(4))]\} 
5.  r0  \mleq{}  x1
6.  x1  \mleq{}  (r(3)/r(4))
7.  \mforall{}t:\mBbbR{}.  ((t  \mmember{}  (r(-1),  r1))  {}\mRightarrow{}  (r0  <  (r1  -  t  *  t)))
8.  r0  <  (r1  -  x1  *  x1)
9.  r0  <  rsqrt(r1  -  x1  *  x1)
10.  (r1  -  x1  *  x1)  \mleq{}  r1
\mvdash{}  rsqrt(r1  -  x1  *  x1)  \mleq{}  r1
By
Latex:
(RWO    "-1"  0  THEN  Auto)
Home
Index