DEFINITION cle()
TYPE =
C
→
C
→
Prop
BODY =
Show proof