Step * 1 1 1 of Lemma len_cons_lemma


1. as Top@i
2. Top@i
⊢ rec-case(as) of [] => h::t => r.r rec-case(as) of [] => a::bs => lenbs.lenbs 1
BY
Try SqEqCD }


Latex:


Latex:

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


By


Latex:
Try  SqEqCD




Home Index