"Source: Text/Incidence/AlgSym.text";
"Line: 506";
"Date: Fri Sep 26 12:10:10 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Incidence/AlgSym.text, line: 506
// Example: H159E4 ()
print "Example: H159E4";
ei := GetEchoInput();
SetEchoInput(true);
R := Rationals();
M := SFAMonomial(R);
P<[x]> := PolynomialRing(R, 3);
f := -3*x[1]^3 + x[1]^2*x[2] + x[1]^2*x[3] + x[1]*x[2]^2 + x[1]*x[3]^2 -
         3*x[2]^3 + x[2]^2*x[3] + x[2]*x[3]^2 - 3*x[3]^3;
M!f;
SetEchoInput(ei);
