Definition EQC : Ens -> Ens -> Type.(* APPARTENANCE *)

Definition CIN : Ens -> Ens -> Type.(* INCLUSION *)

Definition CINC : Ens -> Ens -> Type.

Theorem Paire_sound_leftC : forall A A' B : Ens, EQC A A' -> EQC (Paire A B) (Paire A' B).