reserve x,y,X for set;

theorem
  for T being non empty TopSpace holds T is compact iff for N being net
  of T st N in NetUniv T ex x being Point of T st x is_a_cluster_point_of N by
