"Source: Text/Geometry/Lseries.text";
"Line: 1962";
"Date: Thu Sep 25 14:47:45 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Geometry/Lseries.text, line: 1962
// Example: H139E24 ()
print "Example: H139E24";
ei := GetEchoInput();
SetEchoInput(true);
H := HypergeometricData([2,3],[1,6]);
MValue(H);
L := LSeries(H,4);
BadPrimeData(L);
LCfRequired(L); // approx for old CheckFunctionalEquation
CFENew(L);
M := ChangeLocalInformation(L,[* <3,4,1> *]);
LCfRequired(M);
CFENew(M);
#L`cfvec; // length 260
CopyCoefficients(M,L); // M back to L
#L`cfvec; // now length 450
SetEchoInput(ei);
