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