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