theorem
  |-_IPC (p => q) => ((neg neg p) => neg neg q) by Th106;
