DEFINITION pc3()
TYPE =
       C→T→T→Prop
BODY =
Show proof