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