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