---

Step * 1 1 of Lemma listid_cons_lemma


1. y : Top@i
2. x : Top@i
⊢ [x / rec-case(y) of [] => [] | h::t => r.[h / r]] ~ [x / listid(y)]
BY
{ Try (RW (AddrC [2] (UnfoldC `listid`)) 0)⋅ }

1
1. y : Top@i
2. x : Top@i
⊢ [x / rec-case(y) of [] => [] | h::t => r.[h / r]] ~ [x / rec-case(y) of [] => [] | a::as => r.[a / r]]

---

Latex:

---

Latex:

1.  y  :  Top@i
2.  x  :  Top@i
\mvdash{}  [x  /  rec-case(y)  of  []  =>  []  |  h::t  =>  r.[h  /  r]]  \msim{}  [x  /  listid(y)]


By

---

Latex:
Try  (RW  (AddrC  [2]  (UnfoldC  `listid`))  0)\mcdot{}

---

Home Index