Step * 1 1 1 of Lemma map_cons_lemma


1. Top@i
2. Top@i
3. Top@i
⊢ [f rec-case(b) of [] => [] h::t => r.[f r]] [f rec-case(b) of [] => [] h::t => r.[f r]]
BY
Try SqEqCD }


Latex:


Latex:

1.  b  :  Top@i
2.  a  :  Top@i
3.  f  :  Top@i
\mvdash{}  [f  a  /  rec-case(b)  of  []  =>  []  |  h::t  =>  r.[f  h  /  r]]  \msim{}  [f  a  / 
                                                                                                                      rec-case(b)  of
                                                                                                                      []  =>  []
                                                                                                                      h::t  =>
                                                                                                                        r.[f  h  /  r]]


By


Latex:
Try  SqEqCD




Home Index