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

theorem
  UAAut UA c= Funcs (the carrier of UA, the carrier of UA)
proof
  let q be object;
  assume q in UAAut UA;
  then ex f be Element of UAAut UA st f = q;
  hence thesis by FUNCT_2:9;
end;
