theorem Th17:
  A is dense implies A <> {}
proof
  assume A is dense;
  then
A1: Cl A = [#]X;
  assume A = {};
  hence contradiction by A1,PRE_TOPC:22;
end;
