let X, Y be set ; for R being Relation st X c= Y holds
R | X c= R | Y
let R be Relation; ( X c= Y implies R | X c= R | Y )
assume A1:
X c= Y
; R | X c= R | Y
let x be object ; RELAT_1:def 3 for b being object st [x,b] in R | X holds
[x,b] in R | Y
let y be object ; ( [x,y] in R | X implies [x,y] in R | Y )
assume
[x,y] in R | X
; [x,y] in R | Y
then
( x in X & [x,y] in R )
by Def9;
hence
[x,y] in R | Y
by A1, Def9; verum