let p be boolean object ; :: thesis: 'not' (p => p) = FALSE
( p = FALSE or p = TRUE ) by Def3;
hence 'not' (p => p) = FALSE ; :: thesis: verum