theorem Th101:
  x in dom F implies y in rng(F+*(x,y))
proof
  assume x in dom F;
  then x in dom (F+*(x,y)) & (F+*(x,y)).x = y by Th29,Th30;
  hence thesis by FUNCT_1:3;
end;
