---

Step * 1 1 1 of Lemma fibs_wf

.....subterm..... T:t
1:n
1. f : ℕ ⟶ ℕ ⟶ ℕ
2. (λx,y. (x + y)) = f ∈ (ℕ ⟶ ℕ ⟶ ℕ)
3. n : ℕ
4. fibs : primrec(n;Top;λ,T. (ℕ × T))
⊢ 1.stream-zip(f;fibs;s-tl(fibs)) ∈ primrec(n;Top;λ,T. (ℕ × T))
BY
{ ((RWO "primrec-unroll" 0 THENA Auto) THEN OldAutoSplit)⋅ }

1
1. f : ℕ ⟶ ℕ ⟶ ℕ
2. (λx,y. (x + y)) = f ∈ (ℕ ⟶ ℕ ⟶ ℕ)
3. n : ℕ
4. fibs : primrec(n;Top;λ,T. (ℕ × T))
5. 1 ≤ n
⊢ 1.stream-zip(f;fibs;s-tl(fibs)) ∈ ℕ × primrec(n - 1;Top;λ,T. (ℕ × T))

---

Latex:

---

Latex:
.....subterm.....  T:t
1:n
1.  f  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}
2.  (\mlambda{}x,y.  (x  +  y))  =  f
3.  n  :  \mBbbN{}
4.  fibs  :  primrec(n;Top;\mlambda{},T.  (\mBbbN{}  \mtimes{}  T))
\mvdash{}  1.stream-zip(f;fibs;s-tl(fibs))  \mmember{}  primrec(n;Top;\mlambda{},T.  (\mBbbN{}  \mtimes{}  T))


By

---

Latex:
((RWO  "primrec-unroll"  0  THENA  Auto)  THEN  OldAutoSplit)\mcdot{}

---

Home Index