theorem Th4:
  z in [:X,Y:] implies z`1 in X & z`2 in Y
proof
  assume z in [:X,Y:];
  then consider x,y being object such that
A1: x in X & y in Y & z=[x,y] by ZFMISC_1:def 2;
  thus thesis by A1;
end;
