theorem
  p => ( p 'or' p ) in TAUT(A) by Th3;
