theorem
  x in dom f /\ X implies f.x = (f*(id X)).x
proof
  assume x in dom f /\ X;
  then x in X by XBOOLE_0:def 4;
  then (id X).x = x & x in dom id X by Th17;
  hence thesis by Th13;
end;
