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