---

Step * 2 1 2 1 1 of Lemma fastpi-property

.....assertion..... 
1. n : ℤ
2. 0 < n
3. a : ℕ+
4. 10^(20 * 3^(n - 1)) = a ∈ ℕ+
5. |fastpi(n - 1) - π/2(slower)| ≤ (r1/r(a))
6. |radd_rcos(fastpi(n - 1)) - π/2(slower)| ≤ (|fastpi(n - 1) - π/2(slower)|^3/r(2))
⊢ |radd_rcos(fastpi(n - 1)) - π/2(slower)| ≤ ((r1/r(a))^3/r(2))
BY
{ ((RWO "-1" 0 THENA Auto)
   THEN MoveToConcl (-2)
   THEN (GenConclTerm ⌜|fastpi(n - 1) - π/2(slower)|⌝⋅ THENA Auto)
   THEN Auto
   THEN nRMul ⌜r(2)⌝ 0⋅
   THEN Auto) }

---

Latex:

---

Latex:
.....assertion..... 
1.  n  :  \mBbbZ{}
2.  0  <  n
3.  a  :  \mBbbN{}\msupplus{}
4.  10\^{}(20  *  3\^{}(n  -  1))  =  a
5.  |fastpi(n  -  1)  -  \mpi{}/2(slower)|  \mleq{}  (r1/r(a))
6.  |radd\_rcos(fastpi(n  -  1))  -  \mpi{}/2(slower)|  \mleq{}  (|fastpi(n  -  1)  -  \mpi{}/2(slower)|\^{}3/r(2))
\mvdash{}  |radd\_rcos(fastpi(n  -  1))  -  \mpi{}/2(slower)|  \mleq{}  ((r1/r(a))\^{}3/r(2))


By

---

Latex:
((RWO  "-1"  0  THENA  Auto)
  THEN  MoveToConcl  (-2)
  THEN  (GenConclTerm  \mkleeneopen{}|fastpi(n  -  1)  -  \mpi{}/2(slower)|\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  Auto
  THEN  nRMul  \mkleeneopen{}r(2)\mkleeneclose{}  0\mcdot{}
  THEN  Auto)

---

Home Index