theorem Th9:
  dom (g|B) = B
proof
  reconsider C = B as Subset of A by FINSUB_1:16;
  dom (g|C) = C by Th1;
  hence thesis;
end;
