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;
