---

Step * 1 1 of Lemma length_of_cons_lemma


1. as : Top@i
2. a : Top@i
⊢ rec-case(as) of [] => 0 | h::t => r.r + 1 + 1 ~ ||as|| + 1
BY
{ Try (RW (AddrC [2] (UnfoldC `length` ANDTHENC ReduceC)) 0)⋅ }

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

---

Latex:

---

Latex:

1.  as  :  Top@i
2.  a  :  Top@i
\mvdash{}  rec-case(as)  of  []  =>  0  |  h::t  =>  r.r  +  1  +  1  \msim{}  ||as||  +  1


By

---

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

---

Home Index