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