theorem Th33:
  A is everywhere_dense implies A is dense
proof
  assume A is everywhere_dense;
  then Cl Int A = [#] X;
  then [#]X c= Cl A by PRE_TOPC:19,TOPS_1:16;
  then Cl A = [#]X;
  hence thesis;
end;
