"Source: Text/Lat/QuadBin.text";
"Line: 834";
"Date: Fri Sep 26 12:10:10 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Lat/QuadBin.text, line: 834
// Example: H35E2 ()
print "Example: H35E2";
ei := GetEchoInput();
SetEchoInput(true);
Q := QuadraticForms(-163);
f := PrimeForm(Q,41);
CC<i> := ComplexField();          
PC<z> := LaurentSeriesRing(CC);
x := WeierstrassSeries(z,f);
y := -Derivative(x)/2;
A := -Eisenstein(4,f)/48;             
B := Eisenstein(6,f)/864;
Evaluate(y^2 - (x^3 + A*x + B),1/2);
SetEchoInput(ei);
