theorem
  |-_IPC p => neg^2 p by Th72;
