---

Step * 2 of Lemma iter-arcsine-contraction-property

.....upcase..... 
1. a : {a:ℝ| (r(-1) < a) ∧ (a < r1)} 
2. r0 ≤ (r1 - a * a)
3. r0 ≤ a
4. n : ℤ
5. 0 < n
6. |arcsine-contraction^n - 1(a) - arcsine(a)| ≤ |a - arcsine(a)|^3^n - 1
⊢ |arcsine-contraction^n(a) - arcsine(a)| ≤ |a - arcsine(a)|^3^n
BY
{ (Unfold `iter-arcsine-contraction` 0
   THEN (RWO "fun_exp_unroll" 0 THENA Auto)
   THEN AutoSplit
   THEN Fold `iter-arcsine-contraction` 0) }

1
1. a : {a:ℝ| (r(-1) < a) ∧ (a < r1)} 
2. r0 ≤ (r1 - a * a)
3. r0 ≤ a
4. n : ℤ
5. n ≠ 0
6. 0 < n
7. |arcsine-contraction^n - 1(a) - arcsine(a)| ≤ |a - arcsine(a)|^3^n - 1
⊢ |arcsine-contraction(a;arcsine-contraction^n - 1(a)) - arcsine(a)| ≤ |a - arcsine(a)|^3^n

---

Latex:

---

Latex:
.....upcase..... 
1.  a  :  \{a:\mBbbR{}|  (r(-1)  <  a)  \mwedge{}  (a  <  r1)\} 
2.  r0  \mleq{}  (r1  -  a  *  a)
3.  r0  \mleq{}  a
4.  n  :  \mBbbZ{}
5.  0  <  n
6.  |arcsine-contraction\^{}n  -  1(a)  -  arcsine(a)|  \mleq{}  |a  -  arcsine(a)|\^{}3\^{}n  -  1
\mvdash{}  |arcsine-contraction\^{}n(a)  -  arcsine(a)|  \mleq{}  |a  -  arcsine(a)|\^{}3\^{}n


By

---

Latex:
(Unfold  `iter-arcsine-contraction`  0
  THEN  (RWO  "fun\_exp\_unroll"  0  THENA  Auto)
  THEN  AutoSplit
  THEN  Fold  `iter-arcsine-contraction`  0)

---

Home Index