DEFINITION sns3()
TYPE =
       C→TList→Prop
BODY =
Show proof