"Source: Text/Geometry/Lseries.text";
"Line: 1063";
"Date: Thu Sep 25 14:47:45 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Geometry/Lseries.text, line: 1063
// Example: H139E19 ()
print "Example: H139E19";
ei := GetEchoInput();
SetEchoInput(true);
E := EllipticCurve([0, 0, 1, -7, 6]);
L := LSeries(E : Precision:=15);
Evaluate(L, 1);
Evaluate(L, 1 : Derivative:=1, Leading:=true);
Evaluate(L, 1 : Derivative:=2, Leading:=true);
Evaluate(L, 1 : Derivative:=3, Leading:=true);
Rank(E);
assert $1 eq 3;
time LTaylor(L, 1, 5 : ZeroBelow:=3);
time LTaylor(L, 1, 5);
c := Coefficient($1,3)*Factorial(3);c;
LStar(L, 1 : Derivative:=3);
c*Sqrt(Conductor(E)/Pi(RealField(15)));
SetEchoInput(ei);
