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