theorem
  |-_IPC q => (p => neg neg (p '&' q)) by Th94;
