theorem
  rng f c= dom s & c in dom f implies (s*f)/.c = s/.(f/.c)
proof
  assume that
A1: rng f c= dom s and
A2: c in dom f;
  f/.c in rng f by A2,Th2;
  hence thesis by A1,A2,Th4;
end;
