"Source: Text/Geometry/Scheme.text";
"Line: 252";
"Date: Thu Sep 25 14:47:45 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Geometry/Scheme.text, line: 252
// Example: H122E3 ()
print "Example: H122E3";
ei := GetEchoInput();
SetEchoInput(true);
k := GF(31);
A<x,y> := AffineSpace(k,2);
p := A ! [-1,1];
q := A ! [1,2];
p,q;
C := Scheme(A,y-x^2);
p in C;
q in C;
assert not $1;
[-1,1] in C;
k1<w> := ext< k | 2 >;
C(k1) ! [w^16,3];
C(k1) ! [w,w^2];
SetEchoInput(ei);
