theorem
  for f9 being one-to-one ManySortedSet of rng f
  holds f is proper implies f9*f is proper
proof
  let f9 be one-to-one ManySortedSet of rng f;
  rng f c= dom f9 by PARTFUN1:def 2;
  hence thesis by Th12;
end;
