bs ; a.as' a.(as' @ bs) (recursive)
Thm* 
T:Type, as,bs:T*. (as @ bs) 
T*
Thm* i,j:
. i > j Prop
"?" ; h.t h
Thm* A:Type, l:A*. ||l||
1 
hd(l) A
0 ; a.as' ||as'||+1 (recursive)
Thm* A:Type, l:A*. ||l||
Thm* ||nil||
| append |
Def as @ bs == Case of as; nil bs ; a.as' a.(as' @ bs) (recursive)
Thm* |
| gt |
Def i > j == j < i
Thm* |
| hd |
Def hd(l) == Case of l; nil "?" ; h.t h
Thm* |
| length |
Def ||as|| == Case of as; nil 0 ; a.as' ||as'||+1 (recursive)
Thm*
Thm* ||nil|| |
About:
 |  |  |  |  |  |  |  |
 |  |  |  |  |  |  |  |