 reserve G, A for Group;
 reserve phi for Homomorphism of A,AutGroup(G);
 reserve G, A for Group;
 reserve phi for Homomorphism of A,AutGroup(G);
reserve G1,G2 for Group;

theorem Th76:
  for n being non zero Nat
  holds the carrier of INT.Group n = Segm n
proof
  let n be non zero Nat;
  thus the carrier of INT.Group n =
    the carrier of multMagma(# Segm n, addint n #)
    by GR_CY_1:def 5
  .= Segm n;
end;
