| Who Cites map2? |
|
map2 | Def map2(f;l1;l2)
Def == if null(l1)
Def == then nil
Def == else if null(l2)
Def == else then nil
Def == else else cons((f(head(l1),head(l2))); map2(f;tl(l1);tl(l2)))
Def == else fi
Def == fi
Def (recursive) |
| | Thm* 'a,'b,'c:Type, f:('a 'b 'c), l1:'a List, l2:'b List.
Thm* map2(f;l1;l2) 'c List |
|
tl | Def tl(l) == Case of l; nil nil ; h.t t |
| | Thm* A:Type, l:A List. tl(l) A List |
|
head | Def head(l) == hd(l) |
| | Thm* 'a:Type, l:'a List. mt(l)  head(l) 'a |
|
null | Def null(as) == Case of as; nil true ; a.as' false |
| | Thm* T:Type, as:T List. null(as)  |
| | Thm* null(nil)  |
|
bif | Def bif(b; bx.x(bx); by.y(by)) == if b x(*) else y( x.x) fi |
| | Thm* A:Type, b: , x:(b A), y:(( b) A). bif(b; bx.x(bx); by.y(by)) A |
|
hd | Def hd(l) == Case of l; nil "?" ; h.t h |
| | Thm* A:Type, l:A List. ||l|| 1  hd(l) A |