"Source: Text/Geometry/Scheme.text";
"Line: 5223";
"Date: Fri May 26 16:23:18 2023";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Geometry/Scheme.text, line: 5223
// Example: H119E36 ()
print "Example: H119E36";
ei := GetEchoInput();
SetEchoInput(true);
P2<X,Y,Z> := ProjectiveSpace(Rationals(),2);
C := Curve(P2, X^3*Y^2 + X^3*Z^2 - Z^5);
Genus(C);
assert $1 eq 1;
pt := C![1,0,1];
E,toE := EllipticCurve(C,pt);
IsInvertible(toE);
SetEchoInput(ei);
