"Source: Text/Geometry/Scheme.text";
"Line: 5507";
"Date: Fri May 26 16:23:18 2023";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Geometry/Scheme.text, line: 5507
// Example: H119E39 ()
print "Example: H119E39";
ei := GetEchoInput();
SetEchoInput(true);
P2<x,y,z> := ProjectiveSpace(Rationals(),2);
C := Conic(P2, y^2 - x*z - y*z);
pt := C![1140, 2109, 1369];
prm := Parametrization(C,pt);
P1<s,t> := Domain(prm);
prm;
prm1 := ImproveParametrization(prm);
prm1;
SetEchoInput(ei);
