"Source: Text/Geometry/CrvMod.text";
"Line: 1045";
"Date: Wed Jun  8 13:45:19 2016";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Geometry/CrvMod.text, line: 1045
// Example: H137E9 ()
print "Example: H137E9";
ei := GetEchoInput();
SetEchoInput(true);
M:=ModularSymbols(97,2,1);
NN:=SortDecomposition(NewformDecomposition(NewSubspace(CuspidalSubspace(M))));
NN;  
A97:=NN[1];
NewModularNonHyperellipticCurveGenus3([A97]);
SetEchoInput(ei);
