theorem Th44:
  p => (p 'or' q) is valid_IPC
proof
  p => (p 'or' q) in IPC-Taut
  proof
    IPC-Taut is IPC_theory;
    hence thesis;
  end;
  hence thesis;
end;
