reserve UA for Universal_Algebra,
  f, g for Function of UA, UA;

theorem Th3:
  id the carrier of UA in UAAut UA
proof
  id the carrier of UA is_isomorphism by Th1;
  hence thesis by Def1;
end;
