---

Step * 2 of Lemma fastpi_wf

.....upcase..... 
1. n : ℤ
2. 0 < n
3. fastpi(n - 1) ∈ ℝ
⊢ fastpi(n) ∈ ℝ
BY
{ (Unfold `fastpi` 0
   THEN (RWO "primrec-unroll" 0 THENA Auto)
   THEN Fold `fastpi` 0
   THEN Reduce 0
   THEN (Subst' n <z 1 ~ ff 0 THENA Auto)
   THEN Reduce 0
   THEN (CallByValueReduce 0 THENA Auto)
   THEN RepeatFor 2 ((RWW "exp-fastexp<" 0 THEN Auto))) }

---

Latex:

---

Latex:
.....upcase..... 
1.  n  :  \mBbbZ{}
2.  0  <  n
3.  fastpi(n  -  1)  \mmember{}  \mBbbR{}
\mvdash{}  fastpi(n)  \mmember{}  \mBbbR{}


By

---

Latex:
(Unfold  `fastpi`  0
  THEN  (RWO  "primrec-unroll"  0  THENA  Auto)
  THEN  Fold  `fastpi`  0
  THEN  Reduce  0
  THEN  (Subst'  n  <z  1  \msim{}  ff  0  THENA  Auto)
  THEN  Reduce  0
  THEN  (CallByValueReduce  0  THENA  Auto)
  THEN  RepeatFor  2  ((RWW  "exp-fastexp<"  0  THEN  Auto)))

---

Home Index