"Source: Text/Algebra/AlgClff.text";
"Line: 172";
"Date: Thu Sep 25 14:47:46 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Algebra/AlgClff.text, line: 172
// Example: H97E3 ()
print "Example: H97E3";
ei := GetEchoInput();
SetEchoInput(true);
C<[x]> := CliffordAlgebra(IdentityMatrix(GF(5),3));
f := 3*C.1 + 2*C.2 + C.5 +C.6;
AsPolynomial(f);
Name(C,3) eq C.5;
assert $1;
AssignNames(~C,["x","y","z"]);
AsPolynomial(f);
x[2];
SetEchoInput(ei);
