"Source: Text/Incidence/Tableau.text";
"Line: 127";
"Date: Fri Sep 26 12:10:10 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Incidence/Tableau.text, line: 127
// Example: H158E1 ()
print "Example: H158E1";
ei := GetEchoInput();
SetEchoInput(true);
PartitionToElt := function(G, p)
    x := [];
    s := 0;
    for d in p do
        x cat:= Rotate([s+1 .. s+d], -1);
        s +:= d;
    end for;
    return G!x;
end function;
ConjClasses := function(n)
    G := Sym(n);
    return [ PartitionToElt(G, p) : p in Partitions(n) ];
end function;
ConjClasses(5);
Classes(Sym(5));
SetEchoInput(ei);
