Spracherkennung für: .tst vermutete Sprache: Unknown {[0] [0] [0]} [Methode: Schwerpunktbildung, einfache Gewichte, sechs Dimensionen]
# Very fix for infinite recursion in AlternatingDegree and SymmetricDegree,
# see
https://github.com/gap-system/gap/issues/4826
gap> TweakGroup:=function(G)
> local H;
> H := Action(G,Orbit(G,[
1,
2],OnTuples),OnTuples);
> SetIsAlternatingGroup(H,IsAlternatingGroup(G));
> SetIsSymmetricGroup(H,IsSymmetricGroup(G));
> return H;
> end;;
#
gap> List([
1..
6], n -> AlternatingDegree(TweakGroup(AlternatingGroup(n))));
[
0,
0,
3,
4,
5,
6 ]
gap> List([
1..
6], n -> SymmetricDegree(TweakGroup(SymmetricGroup(n))));
[
0,
2,
3,
4,
5,
6 ]
[Dauer der Verarbeitung: 0.21 Sekunden, vorverarbeitet 2026-06-12]
