theorem
  x in dom f & x in X iff [x,f.x] in f|X
proof
  x in dom f iff [x,f.x] in f by FUNCT_1:def 2,XTUPLE_0:def 12;
  hence thesis by RELAT_1:def 11;
end;
