"Source: Text/Geometry/ModSym.text";
"Line: 1191";
"Date: Thu Sep 25 14:47:45 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Geometry/ModSym.text, line: 1191
// Example: H145E10 ()
print "Example: H145E10";
ei := GetEchoInput();
SetEchoInput(true);
M := ModularSymbols(37,2); M;
D := Decomposition(M,2); D;
IsIrreducible(D[2]);
assert $1;
C := CuspidalSubspace(M); C;
N := NewformDecomposition(C); N;
M := ModularSymbols(90,2); M;
D := Decomposition(M,11); D;
C := CuspidalSubspace(M); C;
N := NewformDecomposition(C); N;
Decomposition(D[7],11);
Decomposition(D[7],19);
[Level(AssociatedNewSpace(A)) : A in N];
A := N[4];
qEigenform(AssociatedNewSpace(A),7);
qExpansionBasis(A,7);
SetEchoInput(ei);
