Who Cites leaf value?
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) Def == InjCase(x1; x2. body(x2); _. cont(z,z))
case	Def Case(value) body == body(value,value)

About: IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html