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