Definition neighborhood_filter {X:TopologicalSpace} (x0:point_set X) :
  Filter (point_set X).Definition filter_limit {X:TopologicalSpace} (F:Filter (point_set X))
  (x0:point_set X) : Prop :=
  Included (filter_family (neighborhood_filter x0))
           (filter_family F).Definition filter_cluster_point {X:TopologicalSpace}
  (F:Filter (point_set X)) (x0:point_set X) : Prop :=
  forall S:Ensemble (point_set X), In (filter_family F) S ->
  In (closure S) x0.

Lemma closure_impl_filter_limit: forall {X:TopologicalSpace} (S:Ensemble (point_set X)) (x0:point_set X), In (closure S) x0 -> exists F:Filter (point_set X), In (filter_family F) S /\ filter_limit F x0.