E:Type, t:Tree(E). is_leaf(t) 
leaf_value(t) 
E| No other cites to report in MarkB_generic | |
| leaf_value | Def leaf_value(t) == Case(t) Case tree_leaf(l) = > l Default = > True |
| Thm* E:Type, t:Tree(E). is_leaf(t) leaf_value(t) E | |
| case_default | Def Default = > body(value,value) == body |
| case_tree_leaf | Def Case tree_leaf(x) = > body(x) cont(x1,z) == InjCase(x1; x2. body(x2); _. cont(z,z)) |
| case | Def Case(value) body == body(value,value) |
About:
 |  |  |  |
 |  |  |  |  |