let Y be set ; for P, R being Relation holds Y |` (P * R) = P * (Y |` R)
let P, R be Relation; Y |` (P * R) = P * (Y |` R)
let x be set ; RELAT_1:def 2 for b being set holds
( [x,b] in Y |` (P * R) iff [x,b] in P * (Y |` R) )
let y be set ; ( [x,y] in Y |` (P * R) iff [x,y] in P * (Y |` R) )
hereby ( [x,y] in P * (Y |` R) implies [x,y] in Y |` (P * R) )
assume A1:
[x,y] in Y |` (P * R)
;
[x,y] in P * (Y |` R)then
[x,y] in P * R
by Def12;
then consider a being
set such that A2:
[x,a] in P
and A3:
[a,y] in R
by Def8;
y in Y
by A1, Def12;
then
[a,y] in Y |` R
by A3, Def12;
hence
[x,y] in P * (Y |` R)
by A2, Def8;
verum
end;
assume
[x,y] in P * (Y |` R)
; [x,y] in Y |` (P * R)
then consider a being set such that
A4:
[x,a] in P
and
A5:
[a,y] in Y |` R
by Def8;
[a,y] in R
by A5, Def12;
then A6:
[x,y] in P * R
by A4, Def8;
y in Y
by A5, Def12;
hence
[x,y] in Y |` (P * R)
by A6, Def12; verum