reserve i, I for set,
  f, g, h for Function,
  s for ManySortedSet of I;

theorem Th23:
  for G1, G2, G3 being Group-like non empty multMagma holds
    <*G1,G2,G3*> is Group-like multMagma-Family of {1,2,3}
proof
  let G1, G2, G3 be Group-like non empty multMagma;
  reconsider A = <*G1,G2,G3*> as multMagma-Family of {1,2,3};
  A is Group-like
  proof
    let x be Element of {1,2,3};
    x = 1 or x = 2 or x = 3 by ENUMSET1:def 1;
    hence thesis;
  end;
  hence thesis;
end;
