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

theorem Th24:
  for G1, G2, G3 being associative non empty multMagma holds
    <*G1,G2,G3*> is associative multMagma-Family of {1,2,3}
proof
  let G1, G2, G3 be associative non empty multMagma;
  reconsider A = <*G1,G2,G3*> as multMagma-Family of {1,2,3};
  A is associative
  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;
