theorem Th13:
 for x being object holds
  x in dom g implies (f+*g).x = g.x
proof let x be object;
  x in dom g implies x in dom f \/ dom g by XBOOLE_0:def 3;
  hence thesis by Def1;
end;
