theorem Th32:
  |-_IPC p => (q => (p '&' q)) by Th22;
