Step
*
2
1
2
1
2
2
1
of Lemma
fastpi-property
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))
7. |radd_rcos(fastpi(n - 1)) - π/2(slower)| ≤ (r1/r(2 * a^3))
8. r0 < r(a)^3
9. ((r1/r(a))^3/r(2)) = (r1/r(2 * a^3))
⊢ |(radd_rcos(fastpi(n - 1)) within 1/2 * a^3) - π/2(slower)| ≤ (r1/r(a^3))
BY
{ ((InstLemma `rational-approx-property`  [⌜radd_rcos(fastpi(n - 1))⌝;⌜2 * a^3⌝]⋅ THENA Auto)
   THEN (RWO "rabs-difference-symmetry" (-1) THENA Auto)
   ) }
1
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))
7. |radd_rcos(fastpi(n - 1)) - π/2(slower)| ≤ (r1/r(2 * a^3))
8. r0 < r(a)^3
9. ((r1/r(a))^3/r(2)) = (r1/r(2 * a^3))
10. |(radd_rcos(fastpi(n - 1)) within 1/2 * a^3) - radd_rcos(fastpi(n - 1))| ≤ (r1/r(2 * a^3))
⊢ |(radd_rcos(fastpi(n - 1)) within 1/2 * a^3) - π/2(slower)| ≤ (r1/r(a^3))
Latex:
Latex:
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))
7.  |radd\_rcos(fastpi(n  -  1))  -  \mpi{}/2(slower)|  \mleq{}  (r1/r(2  *  a\^{}3))
8.  r0  <  r(a)\^{}3
9.  ((r1/r(a))\^{}3/r(2))  =  (r1/r(2  *  a\^{}3))
\mvdash{}  |(radd\_rcos(fastpi(n  -  1))  within  1/2  *  a\^{}3)  -  \mpi{}/2(slower)|  \mleq{}  (r1/r(a\^{}3))
By
Latex:
((InstLemma  `rational-approx-property`    [\mkleeneopen{}radd\_rcos(fastpi(n  -  1))\mkleeneclose{};\mkleeneopen{}2  *  a\^{}3\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  (RWO  "rabs-difference-symmetry"  (-1)  THENA  Auto)
  )
Home
Index