DEFINITION lt()
TYPE =
       natnatProp
BODY =
Show proof