"Source: Text/Geometry/Lseries.text";
"Line: 297";
"Date: Thu Sep 25 14:47:45 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Geometry/Lseries.text, line: 297
// Example: H139E6 ()
print "Example: H139E6";
ei := GetEchoInput();
SetEchoInput(true);
SetEchoInput(false);
load galpols;
SetEchoInput(true);
f:=PolynomialWithGaloisGroup(7,6); // Alt(7)
K:=NumberField(f);
A:=ArtinRepresentations(K);
a:=A[2];a;
L:=LSeries(a);
LCfRequired(L); // approx value
L:=LSeries(a: Precision:=8);
LCfRequired(L); // approx value with CheckFunctionalEquation
CFENew(L); // new vers of CheckFunctionalEquation
Evaluate(L,2);
SetEchoInput(ei);
