theorem
  (ex g st g*f = id dom f) implies f is one-to-one
proof
  given g such that
A1: g*f = id dom f;
  dom(g*f) = dom f by A1;
  then rng f c= dom g by Th15;
  hence thesis by A1,Th25;
end;
