theorem Th18:
 for f being Function-yielding Function holds
  x in dom f & g = f.x implies x in dom doms f & (doms f).x = dom
  g & x in dom rngs f & (rngs f).x = rng g
by Def1,Def2;
