let X be Relation; :: thesis: for Y, Z being set st Z c= Y & not Y \ Z is with_pair holds
X \ Y = X \ Z

let Y, Z be set ; :: thesis: ( Z c= Y & not Y \ Z is with_pair implies X \ Y = X \ Z )
assume A1: Z c= Y ; :: thesis: ( Y \ Z is with_pair or X \ Y = X \ Z )
assume A2: not Y \ Z is with_pair ; :: thesis: X \ Y = X \ Z
now
given x being set such that A3: x in X /\ (Y \ Z) ; :: thesis: contradiction
( x in X & x in Y \ Z ) by A3, XBOOLE_0:def 4;
then ex a, b being set st x = [a,b] by RELAT_1:def 1;
hence contradiction by A2, A3, FACIRC_1:def 2; :: thesis: verum
end;
then X /\ (Y \ Z) = {} by XBOOLE_0:7;
then X misses Y \ Z by XBOOLE_0:def 7;
then A5: X \ (Y \ Z) = X by XBOOLE_1:83;
X \ Y = X \ ((Y \ Z) \/ Z) by A1, XBOOLE_1:45
.= X \ Z by A5, XBOOLE_1:41 ;
hence X \ Y = X \ Z ; :: thesis: verum