theorem Th48:
  [:X,Y:] <> {} implies for x being Element of [:X,Y:] holds x <>
  x`1 & x <> x`2
proof
  assume [:X,Y:] <> {};
  then X <> {} & Y <> {} by ZFMISC_1:90;
  hence thesis by Th18;
end;
