theorem Th24:
  X |-_IPC q => (p 'or' q) by INTPRO_1:7;
