theorem
  dom R = dom Q implies dom(S*R) = dom (S*Q)
proof
  assume
A1: dom R = dom Q;
  thus dom(S*R) = S"dom R by Th137
    .= dom (S*Q) by A1,Th137;
end;
