"Source: Text/Geometry/AlgSrf.text";
"Line: 4998";
"Date: Mon Mar 29 22:30:18 2021";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Geometry/AlgSrf.text, line: 4998
// Example: H123E26 ()
print "Example: H123E26";
ei := GetEchoInput();
SetEchoInput(true);
Q := RationalField();
P<x,y,z> := PolynomialRing(Q, 3);
F<s,t> := RationalFunctionField(Q, 2);
p := (x^4+y^4-z^2)*(2*x + y + 8*z + 5)
      *(x^2 - 4*x*z + 3*x + y*z - y + 2*z^2 - 3*z + 1);
Solve(p, F);
SetEchoInput(ei);
