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

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

Definition CINC : Ens -> Ens -> Type.

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