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