Step * 2 1 of Lemma rcos-nonneg


1. {x:ℝx ∈ [-(π/2), π/2]} 
2. x < (r1/r(1000))
3. (r(-1)/r(1000)) < x
⊢ r0 ≤ rcos(x)
BY
(Assert |x r0| < (r1/r(1000)) BY
         (nRNorm THEN RWO "rabs-rless-iff" THEN Auto)) }

1
1. {x:ℝx ∈ [-(π/2), π/2]} 
2. x < (r1/r(1000))
3. (r(-1)/r(1000)) < x
⊢ -((r1/r(1000))) < x

2
1. {x:ℝx ∈ [-(π/2), π/2]} 
2. x < (r1/r(1000))
3. (r(-1)/r(1000)) < x
4. |x r0| < (r1/r(1000))
⊢ r0 ≤ rcos(x)


Latex:


Latex:

1.  x  :  \{x:\mBbbR{}|  x  \mmember{}  [-(\mpi{}/2),  \mpi{}/2]\} 
2.  x  <  (r1/r(1000))
3.  (r(-1)/r(1000))  <  x
\mvdash{}  r0  \mleq{}  rcos(x)


By


Latex:
(Assert  |x  -  r0|  <  (r1/r(1000))  BY
              (nRNorm  0  THEN  RWO  "rabs-rless-iff"  0  THEN  Auto))




Home Index