(* Fin de la preuve de lem_reunion_unique                                  *)

(* Autre version                                                           *)


(***************************************************************************)
(* Notion d'union de deux ensembles                                        *)
(***************************************************************************)
Definition union (a b : E) := reunion (paire a b).

(* Specifications: *)
Lemma lem_union_propertie : forall a b v0 : E, In v0 (union a b) <-> In v0 a \/ In v0 b.
Lemma lem_union_propertie_lr : forall a b v0 : E, In v0 (union a b) -> In v0 a \/ In v0 b.
Lemma lem_union_propertie_rl : forall a b v0 : E, In v0 a \/ In v0 b -> In v0 (union a b).