"Source: Text/Code/CodeFld.text";
"Line: 2397";
"Date: Thu Sep 25 14:47:47 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Code/CodeFld.text, line: 2397
// Example: H165E23 ()
print "Example: H165E23";
ei := GetEchoInput();
SetEchoInput(true);
R<x> := PolynomialRing(GF(3));
f := x^11 + x^10 + x^9 + 2*x^8 + 2*x^7 + x^5 + x^3 + 2;
C := CyclicCode(23, f);
C;
time WeightDistribution(C);
time W11 := Words(C, 11);
#W11;
assert $1 eq 30912;
ZOW11 := ConstantWords(C, 11);
#ZOW11;
assert $1 eq 23;
ZOW11 subset W11;
assert $1;
SetEchoInput(ei);
