"Source: Text/Incidence/AlgSym.text";
"Line: 632";
"Date: Fri Sep 26 12:10:10 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Incidence/AlgSym.text, line: 632
// Example: H159E8 ()
print "Example: H159E8";
ei := GetEchoInput();
SetEchoInput(true);
R := Rationals();
M := SFA(R : Basis := "Monomial");
H := SFA(R : Basis := "Homogeneous");

H ! (M.[1]);
H ! (M.[2] + M.[1,1]);
H ! (M.[3] + M.[2,1] + M.[1,1,1]);
H ! (M.[4] + M.[3,1] + M.[2,2] + M.[2,1,1] + M.[1,1,1,1]);

k := 5;
H ! &+ [ M.P : P in Partitions(k)];
k := 10;                                                  
H ! &+ [ M.P : P in Partitions(k)];
SetEchoInput(ei);
