Spracherkennung für: .tst vermutete Sprache: Unknown {[0] [0] [0]} [Methode: Schwerpunktbildung, einfache Gewichte, sechs Dimensionen]
gap> G := SymmetricGroup(4);;
gap> irreps := IrreducibleRepresentations(G);;
gap> rho := Random(irreps);; # doesn't change between runs
gap> tau := Random(irreps);;
gap> tensor := TensorProductOfRepresentations(rho, tau);;
gap> kronecker := g -> KroneckerProduct(Image(rho, g), Image(tau, g));;
gap> A := RandomMat(DegreeOfRepresentation(rho), DegreeOfRepresentation(tau));;
gap> ForAll(GeneratorsOfGroup(G),
> g -> WrapMatrix@RepnDecomp(kronecker(g) * Flat(A), DegreeOfRepresentation(tau)) = Image(tensor, g) * A);
true
[Dauer der Verarbeitung: 0.4 Sekunden, vorverarbeitet 2026-06-23]
