---

Step * 1 of Lemma l_ind_cons_lemma


1. A : Top@i
2. x : Top@i
3. b : Top@i
4. a : Top@i
⊢ l-ind([a / b];x;h,t,r.A[h;t;r]) ~ A[a;b;l-ind(b;x;h,t,r.A[h;t;r])]
BY
{ Try (RW (AddrC [1] (TagC (mk_tag_term 8))) 0)⋅ }

1
1. A : Top@i
2. x : Top@i
3. b : Top@i
4. a : Top@i
⊢ A[a;b;fix((λl-ind,L. eval v = L in if v = Ax then x otherwise let h,t = v in A[h;t;l-ind t])) b] 
~ A[a;b;l-ind(b;x;h,t,r.A[h;t;r])]

---

Latex:

---

Latex:

1.  A  :  Top@i
2.  x  :  Top@i
3.  b  :  Top@i
4.  a  :  Top@i
\mvdash{}  l-ind([a  /  b];x;h,t,r.A[h;t;r])  \msim{}  A[a;b;l-ind(b;x;h,t,r.A[h;t;r])]


By

---

Latex:
Try  (RW  (AddrC  [1]  (TagC  (mk\_tag\_term  8)))  0)\mcdot{}

---

Home Index