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