DEFINITION tlt()
TYPE =
       TTProp
BODY =
Show proof