(* End of proof of lem_not_vide_in_vide                                    *)

(***************************************************************************)
(* Intersection de deux ensembles                                          *)
(***************************************************************************)
Definition def_F_inter (s x : E) := In x s.Definition inter (a b : E) := subset (def_F_inter b) a.

Lemma lem_inter_vide_prop : forall x : E, inter x Vide = Vide.