theorem Th3:
  X is infinite implies X \/ Y is infinite
proof
  card X c= card(X \/ Y) by CARD_1:11,XBOOLE_1:7;
  hence thesis;
end;
