(*									*)
(*  INTERSECTION 							*)
(*   L'intersection de 2 ensembles est definie comme un predicat sur    *)
(*   3 ensembles A B C en disant que C est l'intresection de A et B     *)
(*   si C est le plus grand ensemble inclus dans A et dans B		*)
(*									*)

Definition inter (A B C : Ensf) : Prop :=
  inclus C A /\
  inclus C B /\ (forall x : Elt, dans x A -> dans x B -> dans x C).

Lemma inter_dans : forall (A B : Ensf) (x : Elt), inter A B empty -> dans x A -> ~ dans x B.