"Source: Text/Code/CodeAlG.text";
"Line: 127";
"Date: Tue Jun 27 09:43:58 2017";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Code/CodeAlG.text, line: 127
// Example: H166E1 ()
print "Example: H166E1";
ei := GetEchoInput();
SetEchoInput(true);
F<w> := GF(16); 
P2<x,y,z> := ProjectiveSpace(F, 2);
f := x^3+x^2*z+y^3+y^2*z+z^3;   
X := Curve(P2, f);
g := Genus(X);
g;
assert $1 eq 1;
places1 := Places(X, 1); 
#places1;
assert $1 eq 25;
found, place_k := HasPlace(X, 9+g-1);
D := DivisorGroup(X) ! place_k;
C := AlgebraicGeometricCode(places1, D);
C;
MinimumDistance(C);                                                  
assert $1 eq 16;
SetEchoInput(ei);
