Qx<x>:=PolynomialRing(Rationals());
basis_list:=[**];
G:=FullDirichletGroup(
3
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
4
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
5
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
6
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
7
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
7
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
8
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
8
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
9
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
9
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
10
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
11
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
11
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
12
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
12
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
13
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
13
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
14
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
14
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
15
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
15
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
15
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
16
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
16
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
16
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
17
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
18
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
18
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
19
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
19
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
19
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
20
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
20
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
20
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
21
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
21
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
21
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
21
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
22
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
4
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
22
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
4
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
23
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
4
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
23
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
4
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^2 - q^3 + O(q^4)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
24
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
24
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
24
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
24
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
25
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
25
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
0
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
26
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
5
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
26
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
5
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
27
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
27
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
27
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
28
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
4
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
28
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
4
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
28
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
4
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
28
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
4
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
29
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
28
);
qprec:=
5
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
29
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
5
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
30
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
30
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
30
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
31
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
5
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
31
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
5
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
31
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
5
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
31
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
5
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^2 + O(q^5)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
32
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
32
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
32
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
32
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
33
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
33
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
33
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
33
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
34
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
35
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
35
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
35
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
35
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
35
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
35
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
36
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
36
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
36
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
36
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
2
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
37
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
37
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
37
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
38
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
38
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
38
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
39
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
39
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
39
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
39
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
39
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
39
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^3 - q^4 + O(q^7)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
40
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
40
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
40
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
40
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
40
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
40
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
41
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
40
);
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
41
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
42
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
42
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
42
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
42
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
43
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
43
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
43
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
43
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
21*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
7
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
44
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
44
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
44
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
44
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^3 - q^5 + O(q^8)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
45
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
45
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
45
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
45
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
45
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
45
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
46
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
46
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^3 - q^4 + q^8 + O(q^10),
    q^2 - q^4 - q^6 + O(q^10)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
47
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
46
);
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
47
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
23*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^3 - q^6 + O(q^8),
    q^2 - q^3 - q^4 + q^7 + O(q^8)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
48
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
48
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
48
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
48
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
48
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
48
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
49
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
49
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
49
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
49
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
21*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
3
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
50
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
5
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
50
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
5
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
51
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
51
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
51
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
51
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
51
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
52
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
52
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
52
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
52
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
52
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 + (a - 1)*q^4 - q^5 + q^8 + (a - 1)*q^9 + O(q^10)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
52
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
53
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
52
);
qprec:=
9
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
53
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
13*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
9
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
54
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
54
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
54
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
55
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
55
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
55
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
55
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
55
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
55
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^4 - q^5 + q^9 + O(q^10)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
56
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
56
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
56
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
56
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
56
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
56
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
56
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
56
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^2 + q^4 - q^7 - q^8 - q^9 + O(q^10)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
57
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
11
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
57
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
11
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
57
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
11
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
57
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
11
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
57
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
11
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^3 + (a - 1)*q^4 - q^7 + (a - 1)*q^9 + O(q^11)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
57
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
11
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
58
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
28
);
qprec:=
13
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
58
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
13
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
59
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
58
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
59
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
29*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^3 + q^4 - q^5 - q^7 + O(q^10)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
60
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
60
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
60
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
60
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
60
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
60
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
61
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
60
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
61
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
61
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
61
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
62
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
62
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
62
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
62
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^4 - q^5 - q^7 + q^8 + q^9 + O(q^14),
    q^2 - q^4 - q^10 + O(q^14)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
63
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
63
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
63
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
63
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
63
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
63
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
63
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
63
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
63
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^4 - q^7 + O(q^10)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
63
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
64
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
64
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
64
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
64
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
64
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
6
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
65
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
65
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
65
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
65
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
65
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
65
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
65
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
65
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
66
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
66
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
66
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
66
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
67
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
66
);
qprec:=
11
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
67
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
11
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
67
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
11
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
67
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
33*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
11
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
68
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
68
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
68
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
68
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + a*q^2 - q^4 + (-a - 1)*q^5 - a*q^8 + a*q^9 + (-a + 1)*q^10 + O(q^14)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
68
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^2 + q^4 - q^8 - q^9 - 2*q^13 + O(q^14)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
69
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
69
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
69
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
69
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^2 + q^8 - q^9 - q^13 + O(q^14),
    q^3 - q^6 - q^9 + O(q^14)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
70
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
70
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
70
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
70
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
70
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
70
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
71
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
70
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
71
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
71
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
71
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
35*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^5 - q^6 + q^9 + O(q^12),
    q^2 - q^4 - q^5 - q^6 + q^8 + q^9 + q^10 + O(q^12),
    q^3 - q^4 - q^5 + q^8 + q^10 + O(q^12)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
72
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
72
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
72
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
72
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
72
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
72
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 - a*q^3 + (a - 1)*q^4 + (a - 1)*q^6 + q^8 + (a - 1)*q^9 + O(q^10)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
72
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
72
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
73
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
72
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
73
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
24
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
73
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
74
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
74
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
74
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
75
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
75
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
75
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
75
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
75
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
75
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 10*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
10
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
76
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
76
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
76
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
76
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
76
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
76
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^5 - q^7 + q^9 - q^11 + O(q^16)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
77
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
77
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
77
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
77
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
77
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
77
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + (-a^2 + a - 1)*q^2 + (-a^3 + a^2 - a)*q^4 + a^2*q^7 + a^3*q^8 - a*q^9 + 
        (a^3 - a^2 + a - 1)*q^11 + O(q^14)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
77
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
77
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
78
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
78
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
78
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
78
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
78
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
78
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^3 - q^4 + q^9 + q^12 - q^13 + q^16 + O(q^22),
    q^2 - q^6 - q^8 + q^18 + O(q^22)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
79
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
78
);
qprec:=
13
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
79
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
26
);
qprec:=
13
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
79
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
13*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
13
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
79
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
39*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
13
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^5 - q^8 + q^9 - q^10 + O(q^13),
    q^2 - q^4 - q^5 + q^11 + O(q^13)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
80
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
80
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
80
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
80
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
80
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
80
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
80
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
80
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^5 - q^9 + O(q^14)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
80
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
80
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
81
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
54
);
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
81
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
81
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
81
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
27*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
8
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
82
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
40
);
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
82
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
83
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
82
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
83
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
41*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^3 + q^4 - q^7 - q^11 - q^12 + O(q^14)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
84
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
84
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
84
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
84
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
84
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
84
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^3 + (a - 1)*q^7 + (a - 1)*q^9 - q^13 + (-a + 1)*q^19 + q^21 + 
        O(q^22)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
84
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
84
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
85
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
85
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
85
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
85
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
85
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
85
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
85
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
85
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
86
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
86
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
86
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
86
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
21*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
87
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
87
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
28
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
87
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
87
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
87
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
87
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 14*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^6 - q^7 + q^9 - q^13 - q^16 + O(q^18),
    q^2 - q^3 - q^8 + q^11 - q^14 + q^17 + O(q^18)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
88
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
88
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
88
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
88
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
88
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
88
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 + (a^3 + a - 1)*q^3 + a^2*q^4 + (-a^3 + 1)*q^6 - a^3*q^8 + (-a^2 -
        1)*q^9 - a^3*q^11 + (a^3 - a^2 - 1)*q^12 + (a^3 - a^2 + a - 1)*q^16 + 
        (a^2 - a)*q^17 + O(q^18)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
88
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^3 - q^5 + q^11 + q^15 + O(q^18),
    q^2 - q^6 - q^10 + O(q^18)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
88
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
89
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
88
);
qprec:=
15
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
89
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
15
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
90
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
90
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
90
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
90
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
90
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
90
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
91
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
92
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
92
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
92
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
92
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^3 - q^13 + O(q^20),
    q^2 - q^6 - q^8 + q^16 + O(q^20),
    q^4 - q^8 - q^12 + O(q^20)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
93
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
93
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
93
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
93
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
93
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
93
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^3 - a^3*q^4 + (a^3 + a - 1)*q^7 + a^2*q^9 + (a^3 - a^2 + a - 1)*q^12
        + (-a^2 + a - 1)*q^13 - a*q^16 + O(q^19)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
93
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 10*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
93
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^2 - q^5 - q^7 + q^8 + q^9 + q^10 + q^14 - q^16 - q^18 + O(q^19),
    q^3 - q^6 - q^15 + O(q^19)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
94
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
46
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
94
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
23*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^6 - q^7 + q^14 - q^16 + q^18 - q^21 + O(q^22),
    q^2 - q^6 - q^12 - q^16 + q^18 + O(q^22),
    q^3 - q^7 + q^8 - q^9 - q^12 - q^16 + q^17 + O(q^22),
    q^4 - q^6 - q^8 + q^14 + q^18 + O(q^22)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
95
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
95
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
95
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
95
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
95
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
95
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
95
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
95
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
95
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^6 - q^11 + O(q^18),
    q^2 - q^3 - q^10 - q^12 + q^13 + q^15 + O(q^18),
    q^4 - q^5 - q^6 + q^9 + q^11 - q^16 + O(q^18)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
96
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
96
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
96
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
96
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
96
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
96
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
96
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
96
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
97
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
96
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
97
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
32
);
qprec:=
16
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
98
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
98
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
98
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
98
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
21*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
99
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
99
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
99
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
99
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
99
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
99
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
99
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
99
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + (a - 1)*q^3 + (a - 1)*q^4 + (-a + 1)*q^5 - a*q^9 - a*q^11 - a*q^12 + 
        a*q^15 - a*q^16 + O(q^18)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
100
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
100
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
100
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
100
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 + a^2*q^4 - a^3*q^5 - a^3*q^8 + (a^3 - a^2 + a - 1)*q^9 + (a^3 - 
        a^2 + a - 1)*q^10 + (a^2 - a)*q^13 + O(q^14)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
100
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
100
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 10*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
14
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
101
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
100
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
101
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
101
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
25*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
102
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
102
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
102
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
102
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
102
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
103
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
102
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
103
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
34
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
103
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
17*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
103
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
51*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^7 - q^8 + q^9 - q^14 + O(q^17),
    q^2 - q^4 - q^7 + q^13 + O(q^17)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^5 + (a - 1)*q^9 - a*q^13 + (-a + 1)*q^17 + O(q^22),
    q^2 - a*q^4 + (a - 1)*q^8 - q^10 + q^16 + (a - 1)*q^18 + a*q^20 + O(q^22)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 4*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
104
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 6*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^3 + q^4 - q^10 - q^12 - q^14 + q^16 - q^17 + O(q^22),
    q^2 - q^5 - q^6 - q^7 + q^8 + q^13 + q^15 - q^20 + q^21 + O(q^22)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
105
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
106
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
52
);
qprec:=
25
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
106
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
13*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
25
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
107
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
106
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
107
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
53*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^3 + q^4 - q^11 - q^12 - q^13 + q^16 + O(q^18)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
108
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
108
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
108
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
108
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
108
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
108
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
20
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^7 - q^13 - q^19 + O(q^20)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
109
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
108
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
109
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
109
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
109
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
27*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
110
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
110
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
110
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
110
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
110
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
110
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^4 - q^5 + q^9 - q^11 + q^16 + q^20 + q^25 + O(q^30),
    q^2 - q^8 - q^10 + q^18 - q^22 + O(q^30)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
111
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
111
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
111
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
111
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
111
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
111
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^3 + a*q^4 - a*q^7 + (a - 1)*q^9 + (-a + 1)*q^12 + (a - 2)*q^13 + (a 
        - 1)*q^16 + (a - 1)*q^21 + O(q^23)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
111
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
111
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 12*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + (a - 1)*q^3 + (a - 1)*q^4 + (-a + 1)*q^7 - a*q^9 - a*q^12 + (-a + 
        1)*q^13 - a*q^16 + (2*a - 2)*q^19 + a*q^21 + O(q^23)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
111
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 18*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^7 + q^9 - q^10 - q^12 - q^21 + O(q^23),
    q^2 - q^5 - q^6 + q^15 + q^17 + q^18 - q^20 + O(q^23),
    q^3 - q^4 - q^7 + q^10 + q^16 - q^21 + O(q^23)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + a*q^2 - q^4 + a*q^7 - a*q^8 - a*q^9 + (-a - 1)*q^11 - q^14 + q^16 + q^18
        + O(q^22)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
112
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^7 - q^9 + O(q^22),
    q^2 - q^4 + q^8 - q^14 - q^16 - q^18 + O(q^22)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
113
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
112
);
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
113
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
19
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
114
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
114
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
114
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
114
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
114
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - a*q^3 + (a - 1)*q^4 - q^7 + (a - 1)*q^9 + q^12 + (-a + 1)*q^13 - a*q^16 
        + q^19 + a*q^21 + (a - 1)*q^25 + q^27 + (-a + 1)*q^28 - q^31 + O(q^34),
    q^2 - a*q^6 + (a - 1)*q^8 - q^14 + (a - 1)*q^18 + q^24 + (-a + 1)*q^26 - 
        a*q^32 + O(q^34)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
114
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
115
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
115
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
115
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
115
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
44
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
115
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^2 - q^3 + q^6 + q^8 - q^13 - q^16 + O(q^22),
    q^5 - q^10 - q^15 + O(q^22)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
115
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 11*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
116
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
116
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
28
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
116
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
116
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 + a^2*q^4 + (-a^5 + a^4)*q^5 - a^3*q^8 - a^3*q^9 + (-a^4 + a^3 - 
        a^2 + a - 1)*q^10 + (a^5 - a^4 + a^3 + a - 1)*q^13 + a^4*q^16 + (a^5 - 
        a^4 + a^3 - a^2 - 1)*q^17 + a^4*q^18 + (a^5 - a^4 + a^3 - a^2 + a)*q^20 
        + (-a^3 + a^2 - a)*q^25 + O(q^26)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
116
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
116
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 14*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^4 - q^5 - q^6 - q^13 + q^16 - q^20 - q^22 - q^24 + O(q^26),
    q^2 - q^3 + q^8 - q^10 - q^11 - q^12 + q^15 + 2*q^19 + O(q^26)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^4 + (a - 1)*q^7 + a*q^13 - q^16 + (-a - 1)*q^19 + O(q^22)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
117
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^4 - q^13 + q^16 + O(q^22),
    q^3 - q^9 - q^12 + O(q^22)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
118
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
58
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
118
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
29*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^3 + q^4 - q^5 - q^7 - q^12 + q^15 + q^16 + 2*q^17 - q^19 - q^20 + q^21
        + q^27 + O(q^28),
    q^2 - q^6 + q^8 - q^10 - q^14 - q^24 + O(q^28)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
119
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
119
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
119
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
119
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
48
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
119
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
24
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
119
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
119
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
119
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
119
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
119
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^8 - q^15 - q^18 + O(q^22),
    q^2 - q^4 - q^9 + q^18 + q^21 + O(q^22),
    q^3 - 2*q^6 - q^7 + q^10 + 2*q^12 + q^14 - q^17 - q^20 + O(q^22),
    q^5 - q^6 - q^7 + q^10 + q^12 - q^17 - q^20 + O(q^22)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.3 + H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3 + H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3 + 2*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
120
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3 + 2*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^4 - q^6 - q^9 + q^10 + q^15 + q^16 + q^24 - q^25 - 2*q^31 + O(q^34),
    q^2 + q^3 - q^5 - q^8 - q^12 - q^18 + q^20 - q^27 + q^30 + q^32 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
121
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
110
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
121
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
121
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
121
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
55*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
12
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
122
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
60
);
qprec:=
29
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
122
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
29
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
122
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
29
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
122
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
29
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
123
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
123
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
40
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
123
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
123
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
123
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
123
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
123
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 10*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
123
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 20*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
124
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
124
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
124
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
124
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
124
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
124
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
124
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 10*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^4 + (a - 1)*q^5 - a*q^6 + (-a + 1)*q^13 + a*q^14 + q^16 - a*q^17 + (-a
        + 1)*q^20 + (a - 1)*q^21 + (a - 1)*q^22 + a*q^24 + O(q^28),
    q^2 + a*q^3 - a*q^7 - q^8 + (a - 1)*q^10 + (-a + 1)*q^11 - a*q^12 - q^15 + 
        a*q^19 + (-a + 1)*q^26 - q^27 + O(q^28)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
124
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^5 - q^7 + q^9 - q^19 + O(q^28),
    q^2 - q^8 - q^10 - q^14 + q^16 + q^18 + O(q^28),
    q^4 - q^8 - q^20 + O(q^28)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
125
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
100
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
125
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
125
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
25*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
17
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
126
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
126
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
126
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
126
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
126
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
126
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
126
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
126
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
126
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^4 - q^7 + q^16 + q^25 + q^28 + O(q^34),
    q^2 - q^8 - q^14 + q^32 + O(q^34)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
126
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
127
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
126
);
qprec:=
21
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
127
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
21
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
127
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
21
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
127
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
21
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
127
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
21*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
21
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
127
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
63*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
21
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^8 + q^9 - q^11 - q^13 + O(q^21),
    q^2 - q^4 - q^11 - q^13 + q^17 + q^18 + q^19 + O(q^21)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
128
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
128
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
32
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
128
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
128
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
128
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
128
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 16*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^9 - 2*q^17 + O(q^18)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
129
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
129
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
129
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
129
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
129
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^3 - a^5*q^4 + (a^4 - a^3)*q^7 + a^2*q^9 + (a^5 - a^4 + a^3 - a^2 + a
        - 1)*q^12 + (a^5 - a^4 + a^3 + a - 1)*q^13 - a^3*q^16 + (a^5 + a^3 - a^2
        + a - 1)*q^19 + (-a^5 + a^4)*q^21 - a*q^25 + O(q^27)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
129
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
129
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 14*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
129
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
21*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
130
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
130
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
130
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
130
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
130
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
130
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
130
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
130
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
131
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
130
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
131
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
26
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
131
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
13*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
131
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
65*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
22
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^4 - q^5 - q^7 - q^15 + q^16 - q^20 - q^21 + O(q^22),
    q^3 - q^5 - q^7 - q^9 + q^11 + q^12 + q^13 - q^20 + O(q^22)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
132
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
132
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
132
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
132
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
132
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
132
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
132
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^5 - q^9 + q^11 - q^23 + q^27 - q^31 - q^37 + O(q^38),
    q^3 - q^9 - q^15 + q^33 + O(q^38)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
132
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 - q^8 + (a - 1)*q^15 + a*q^16 + a*q^21 + (a - 1)*q^23 + O(q^24),
    q^3 - q^5 - a*q^6 + (a - 1)*q^7 + a*q^10 - a*q^13 + q^14 + q^17 + (-a + 
        1)*q^19 + O(q^24)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
133
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
24
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^4 + (-a + 1)*q^5 + (a - 1)*q^7 + (a - 1)*q^9 + a*q^11 + (a - 1)*q^16
        - 2*a*q^17 + (a - 1)*q^19 - q^20 + (-a + 1)*q^23 + O(q^24)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
134
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
66
);
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
134
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
134
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
134
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
33*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
135
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
135
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
135
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
135
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
135
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
135
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
6*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
135
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
135
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
135
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^10 - q^16 - q^19 + q^25 + O(q^26),
    q^2 - q^5 - q^8 + q^17 + q^23 + O(q^26)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
136
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
136
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
136
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
136
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
136
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
136
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + a^3*q^2 + (-a^3 + a^2)*q^3 - a^2*q^4 + (a^2 - a)*q^6 + a*q^8 + (-a^2 + a
        - 1)*q^9 + (a^3 - 1)*q^11 + (-a + 1)*q^12 - q^16 - a^3*q^17 + (-a^3 + a 
        - 1)*q^18 + (-a^3 - a^2)*q^22 + (a^3 + 1)*q^24 - a*q^25 + (a^3 - a^2 - a
        + 1)*q^27 + O(q^30)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
136
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q + (-a - 1)*q^5 + a*q^9 - q^17 + a*q^25 + (a + 1)*q^29 + O(q^30),
    q^2 + a*q^4 - q^8 + (-a - 1)*q^10 - a*q^16 + a*q^18 + (-a + 1)*q^20 + 
        O(q^30)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
136
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 4*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 + (-a - 1)*q^3 - q^4 + (a - 1)*q^6 + a*q^8 + a*q^9 + (-a + 1)*q^11
        + (a + 1)*q^12 + q^16 - a*q^17 + q^18 + 2*a*q^19 + (-a - 1)*q^22 + (-a +
        1)*q^24 + a*q^25 + O(q^30)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
136
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^9 - 2*q^13 + q^17 + q^25 + O(q^30),
    q^2 - q^4 + q^8 - q^16 - q^18 - 2*q^26 + O(q^30)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
136
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 8*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^2 + q^4 - q^8 + q^9 + q^16 - q^17 - q^18 - 2*q^19 - q^25 + O(q^30)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
137
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
136
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
137
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
17*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
138
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
138
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
138
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
138
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^4 + q^8 - q^9 - q^13 + q^23 + q^25 + q^27 - q^29 - q^31 - q^32 + q^36 
        - q^41 + O(q^42),
    q^2 - q^4 + q^16 - q^18 - q^26 - q^32 + q^36 + O(q^42),
    q^3 - q^9 - q^12 + q^24 + q^36 - q^39 + O(q^42),
    q^6 - q^12 - q^18 + q^36 + O(q^42)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
139
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
138
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
139
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
46
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
139
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
23*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
139
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
69*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^4 - q^5 - q^7 + q^9 - q^11 - q^13 + q^16 - q^20 + O(q^23)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^4 + (a - 1)*q^5 - q^6 + q^14 + (a - 1)*q^16 + q^20 + (-a + 1)*q^21 +
        a*q^24 - a*q^25 - q^29 + (-a + 1)*q^30 + O(q^38),
    q^2 + (-a + 1)*q^3 + (a - 1)*q^7 - a*q^8 + (a - 1)*q^10 - q^12 + a*q^15 - 
        q^23 - a*q^27 + q^28 + (a - 1)*q^32 - a*q^35 + O(q^38)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
140
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^11 - q^15 - q^21 + q^25 - q^29 + q^35 + O(q^38),
    q^3 - q^5 - q^7 + q^13 + q^17 - q^27 - q^33 + O(q^38)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
141
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
141
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
46
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
141
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
46
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
141
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
23*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^8 - q^9 + q^14 - q^17 + q^25 + q^27 - q^28 + O(q^30),
    q^2 - q^4 + q^7 - q^14 - q^17 - q^18 + q^27 + q^28 + O(q^30),
    q^3 - q^9 - q^18 - q^24 + q^27 + O(q^30),
    q^6 - q^9 - q^12 + q^21 + q^27 + O(q^30)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
142
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
70
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
142
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
142
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
142
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
35*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^10 - q^12 - q^15 + q^18 - q^19 + q^20 + q^25 + O(q^34),
    q^2 - q^10 - q^12 + q^18 - q^24 - q^30 + O(q^34),
    q^3 + q^8 - q^9 - q^12 - q^15 - q^19 - q^24 + q^25 + q^27 + q^29 + O(q^34),
    q^4 - q^8 - q^10 - q^12 + q^16 + q^18 + q^20 - q^32 + O(q^34),
    q^5 + q^8 - q^9 - q^16 - q^19 - q^20 - q^24 + q^27 + q^32 + O(q^34),
    q^6 - q^8 - q^10 + q^16 + q^20 - q^30 + O(q^34)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
60
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
143
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^12 - q^14 - q^23 + q^25 + O(q^26),
    q^2 - 2*q^7 - q^8 + q^11 + q^13 + q^19 - q^21 - q^24 + O(q^26),
    q^3 - q^4 - q^9 + q^12 + q^22 - q^23 + O(q^26),
    q^6 - q^7 - q^8 + q^11 + q^13 - q^18 - q^21 + O(q^26)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - 2*q^13 - q^25 + O(q^26)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - a*q^3 + (a - 1)*q^9 + a*q^11 - q^17 - q^19 - a*q^25 + O(q^26),
    q^2 - a*q^4 - a*q^6 + (a - 1)*q^8 + (a - 1)*q^12 + q^16 + (a - 1)*q^18 + 
        a*q^22 + q^24 + O(q^26)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
144
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
145
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
145
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
28
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
145
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
28
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
145
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
28
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
145
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
28
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
145
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
145
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 7*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + a*q^4 - a*q^5 + a*q^9 + (-a - 1)*q^11 - q^16 + (-a - 1)*q^19 + q^20 - 
        q^25 + O(q^28)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
145
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 14*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + a*q^4 + a*q^5 + (-a - 1)*q^7 - a*q^9 + (-a + 1)*q^13 - q^16 - q^20 + (a 
        - 1)*q^23 - q^25 + O(q^28)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
146
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
72
);
qprec:=
35
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
146
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
24
);
qprec:=
35
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
146
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
35
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
147
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
147
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
147
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
147
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
147
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^3 - a^3*q^4 - a^5*q^7 + a^2*q^9 + a^4*q^12 + (a^5 + a^3 - a^2 + a - 
        1)*q^13 + (a^5 - a^4 + a^3 - a^2 + a - 1)*q^16 + (-a^5 + a^2)*q^19 + 
        (a^5 - a^4 + a^3 - a^2 + a - 1)*q^21 + O(q^23)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
147
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
147
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 14*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
147
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
21*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
23
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
148
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
148
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
148
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
148
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
148
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 + a^2*q^4 + (a^4 + a^3 - 1)*q^5 - a^3*q^8 + (-a^4 + a)*q^9 + (-a^5
        - a^4 + a)*q^10 - a^2*q^13 + a^4*q^16 + (-a^3 + a^2)*q^17 + (a^5 - 
        a^2)*q^18 + (a^5 + a^3 - a^2 - 1)*q^20 + (a^5 - a^3 - a^2 - a)*q^25 + 
        a^3*q^26 + (-a^5 - a)*q^29 - a^5*q^32 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
148
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
148
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^3 - q^7 + a*q^11 + (a - 1)*q^17 + (-a + 1)*q^19 + a*q^21 + (a - 
        1)*q^23 + a*q^25 - a*q^27 + (-a - 1)*q^29 + q^33 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
148
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 12*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 + (a - 1)*q^4 + (-a + 1)*q^5 + q^8 - a*q^9 - q^10 + (2*a - 2)*q^13
        - a*q^16 + a*q^17 + (a - 1)*q^18 + a*q^20 + 2*q^26 - q^29 + (a - 1)*q^32
        + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
148
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 18*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
149
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
148
);
qprec:=
25
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
149
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
37*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
25
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
150
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
150
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
150
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
150
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
150
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
150
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 10*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
151
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
150
);
qprec:=
25
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
151
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
50
);
qprec:=
25
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
151
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
25
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
151
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
25
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
151
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
25*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
25
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
151
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
75*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
25
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^9 - q^10 - q^11 - q^17 - q^20 + O(q^25),
    q^2 - q^5 - q^10 - q^16 + q^18 + q^19 + O(q^25),
    q^4 - q^5 - q^8 + q^11 + q^17 - q^22 + O(q^25)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 + (-a^5 - a^3)*q^3 + a^2*q^4 + (a^4 + a^3 - 1)*q^6 - a^3*q^8 + 
        (a^5 + a^3 - a^2 - a - 1)*q^9 + (a^5 - a^4 - a^2 + a)*q^11 + (-a^5 - a^4
        + a)*q^12 + a^4*q^16 + a*q^17 + (-a^4 + a^2 + a + 1)*q^18 + a^2*q^19 + 
        (a^5 - a^2 + 1)*q^22 + (a^5 + a^3 - a^2 - 1)*q^24 - a^5*q^25 + (a^4 + 
        a^3 + a^2)*q^27 - a^5*q^32 + (a^4 - a^3 + a^2 - a)*q^33 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 6*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 + a*q^3 + (a - 1)*q^4 + (-a + 1)*q^6 + q^8 - q^11 - q^12 - a*q^16 
        - 2*a*q^17 + (a - 1)*q^19 + a*q^22 + a*q^24 + (a - 1)*q^25 + q^27 + (a -
        1)*q^32 - a*q^33 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^5 - q^7 + q^9 - q^11 - q^17 + q^19 + 2*q^23 + O(q^34),
    q^2 - q^10 - q^14 + q^18 - q^22 + O(q^34)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
152
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 9*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^4 - q^6 - q^7 + q^16 - q^17 - q^23 - q^24 + q^25 - q^26 - q^28 + 
        O(q^34),
    q^2 - q^3 + q^8 - q^12 - q^13 - q^14 + q^19 + q^21 + q^27 - q^29 + q^32 + 
        O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
153
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
153
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
153
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
153
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
48
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
153
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
24
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
153
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
153
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
153
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
153
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
153
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
154
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
154
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
154
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
154
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
154
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
154
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - a^2*q^4 + a^2*q^7 + (a - 1)*q^8 - a*q^9 + (a^3 - a^2 + a - 1)*q^11 + 
        (a^2 - a)*q^16 + (-a^3 + a^2)*q^23 - a^3*q^25 + (-a^3 + a^2 - a + 
        1)*q^28 + (-a^3 - a)*q^29 + q^32 + a^3*q^36 + (a^3 - a^2 + a)*q^37 + 
        O(q^42),
    q^2 + (-a^2 + a - 1)*q^4 + (-a^3 + a^2 - a)*q^8 + a^2*q^14 + a^3*q^16 - 
        a*q^18 + (a^3 - a^2 + a - 1)*q^22 + (-a + 1)*q^28 + (a^3 - a^2 + a)*q^36
        + O(q^42)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
154
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
154
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
60
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 10*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^2 - q^7 + q^8 + q^9 + q^14 - q^16 - q^18 - q^19 - q^25 + O(q^30),
    q^5 - q^10 - q^25 + O(q^30)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
155
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 15*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - 1/2*q^5 - q^9 - 1/2*q^10 + q^14 + q^16 - q^19 - q^20 + 1/2*q^25 + 
        O(q^30),
    q^2 + 1/2*q^5 - q^7 - q^8 + 1/2*q^10 - q^18 - q^20 + 1/2*q^25 + 2*q^28 + 
        O(q^30),
    q^4 - 1/2*q^5 + 1/2*q^10 - q^14 - q^19 + 1/2*q^25 + O(q^30)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + (-a + 1)*q^3 + (a - 2)*q^7 - a*q^9 + a*q^13 + (2*a - 1)*q^21 - q^25 - 
        q^27 + (-2*a + 1)*q^31 + q^39 + a*q^43 + O(q^46)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - a*q^2 + (a - 1)*q^4 - q^5 + q^8 + (a - 1)*q^9 + a*q^10 - a*q^13 - a*q^16
        + (-a + 1)*q^17 + q^18 + (-a + 1)*q^20 + (a - 1)*q^26 + a*q^29 + (a - 
        1)*q^32 - q^34 - a*q^36 + a*q^37 - q^40 + a*q^41 + (-a + 1)*q^45 + 
        O(q^46),
    q^3 - a*q^6 + (a - 1)*q^12 - q^15 + q^24 + (a - 1)*q^27 + a*q^30 - a*q^39 + 
        O(q^46)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 4*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^3 + (-a + 1)*q^7 + (a - 1)*q^9 + (a - 1)*q^13 + (2*a - 2)*q^19 - 
        q^21 + q^25 + q^27 - q^31 - 2*a*q^37 + q^39 + (-a + 1)*q^43 + O(q^46)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
156
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 6*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
46
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^3 + q^9 - q^13 - q^25 - q^27 + q^39 + 2*q^43 + O(q^46),
    q^2 - q^6 - q^8 + q^18 + q^24 - q^26 + q^32 + O(q^46),
    q^4 - q^12 - q^16 + q^36 + O(q^46)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
157
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
156
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
157
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
52
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
157
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
13*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
157
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
39*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
26
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
158
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
78
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
158
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
26
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
158
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
13*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
158
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
39*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q + q^9 - q^10 - q^11 - q^13 - q^16 + q^22 + q^26 - q^31 + q^32 + O(q^38),
    q^2 - q^10 - q^16 + q^18 - q^20 + O(q^38),
    q^4 - q^8 - q^10 + q^22 + q^26 + q^36 + O(q^38),
    q^5 + q^8 - q^11 - q^13 - q^16 + q^19 - q^20 + q^23 - q^25 - q^31 + O(q^38)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
159
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
159
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
52
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
159
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
26
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
159
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
26
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
159
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
13*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
159
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 26*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^9 - q^10 - q^13 - q^15 - q^24 + q^25 - q^28 + O(q^34),
    q^2 - q^5 - q^12 - q^14 + q^18 + q^21 + q^23 + O(q^34),
    q^3 - q^5 - q^8 + q^14 + q^20 - q^26 + q^27 - q^30 + q^32 + O(q^34),
    q^4 - q^6 - q^7 + q^13 + q^15 - q^25 - q^28 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^5 + a*q^9 + (a - 1)*q^13 + (-a - 1)*q^17 - q^25 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
6*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^5 - q^9 + q^25 + 2*q^29 + O(q^34),
    q^2 - q^10 - q^18 + O(q^34)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
160
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
161
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
161
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
161
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
161
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
66
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
161
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
66
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
161
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + (-a^9 + a^6)*q^2 + (-a^7 + a^4 - a)*q^4 + a^8*q^7 + (a^9 - a^8 - a^6 - 
        a^4 + a^3 + a - 1)*q^8 + (a^9 - a^8 + a^7 - a^6 + a^5 - a^4 + a^3 - a^2 
        + a - 1)*q^9 + (a^4 - a^3)*q^11 + (a^6 - a^3)*q^14 + (a^8 - a^5 - a^3 + 
        a^2 + 1)*q^16 + (a^8 - a^5)*q^18 + (-a^8 + a^7 - a^6 + a^5 - a^4 + a^3 -
        1)*q^22 - a*q^23 + a^2*q^25 + (-a^9 + a^4 - a)*q^28 + (-a^9 - a^5)*q^29 
        + O(q^30)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
161
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^2 - q^3 + q^6 + q^8 - q^13 - q^16 + q^23 - q^24 + q^25 + q^26 + q^27 -
        q^29 + O(q^30),
    q^7 - q^14 - q^21 + O(q^30)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
161
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 11*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
162
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
54
);
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
162
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
162
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
162
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
27*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
163
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
162
);
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
163
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
54
);
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
163
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
163
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
27*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
163
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
81*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
27
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
164
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
164
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
40
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
164
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
164
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a^3*q^2 - a*q^4 + (a^2 - a + 1)*q^5 + (a^3 - a^2 + a - 1)*q^8 - q^9 + 
        (-a^2 + a)*q^10 + (a^3 - 2*a^2 + a - 1)*q^13 + a^2*q^16 + (a^2 + a)*q^17
        + a^3*q^18 + (-a^3 + a^2 - a)*q^20 + (-a^3 + a^2 - a)*q^25 + (a^2 - 
        1)*q^26 + q^32 + (-a^3 + a^2 - a + 2)*q^34 + a*q^36 + (-a^2 - 1)*q^37 + 
        O(q^38)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
164
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
164
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^2 + a^2*q^4 + (-a^3 - a)*q^5 - a^3*q^8 + q^9 + (a^3 + a - 1)*q^10 + 
        (-a^2 + a - 1)*q^13 + (a^3 - a^2 + a - 1)*q^16 + (a^3 + a - 1)*q^17 - 
        a*q^18 + (-a^3 + 1)*q^20 + (a^3 - 1)*q^25 + (a^3 - a^2 + a)*q^26 + 
        2*a^2*q^29 + q^32 + (-a^3 + 1)*q^34 + a^2*q^36 + (a^3 - a^2 + a)*q^37 + 
        O(q^38)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
164
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 10*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
164
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 20*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^4 - q^5 - q^10 + q^16 - q^18 - q^20 - q^21 + q^25 - q^33 - q^37 + 
        O(q^38),
    q^2 - q^5 + q^8 - q^9 - q^10 - q^20 + q^21 + 2*q^25 + q^32 + q^33 - q^36 - 
        q^37 + O(q^38),
    q^3 - q^6 - q^7 - q^11 + q^12 + q^14 + q^19 + q^22 - q^24 - q^28 + O(q^38)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^4 + q^5 + a*q^9 - q^11 + (a - 1)*q^15 - q^16 - a*q^20 + (a - 1)*q^23
        - q^25 + (-a - 1)*q^27 + (-a + 1)*q^33 + q^36 + (a + 1)*q^37 + O(q^42),
    q^3 + (a + 1)*q^5 + (a - 1)*q^9 + (-a - 1)*q^11 - a*q^12 - q^15 + (-a + 
        1)*q^20 - 2*q^23 - a*q^27 + q^33 + (a + 1)*q^36 + O(q^42)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
165
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + 5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^4 - q^5 + q^9 - q^11 + q^16 + q^20 + q^25 - 2*q^31 - q^36 + O(q^42),
    q^3 - q^12 - q^15 + q^27 - q^33 + O(q^42)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
166
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
82
);
qprec:=
40
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
166
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
41*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
40
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^3 + q^4 - q^7 - q^11 - q^12 + q^16 - q^17 + q^21 + 2*q^23 + q^25 + 
        q^27 - q^28 - q^29 - q^31 + q^33 - q^37 + O(q^40),
    q^2 - q^6 + q^8 - q^14 - q^22 - q^24 + q^32 - q^34 + O(q^40)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
167
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
166
);
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
167
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
83*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
28
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^9 - q^11 - q^12 - q^18 - q^21 + q^25 + O(q^28),
    q^2 - q^6 - q^9 + q^18 - q^19 + q^21 + q^27 + O(q^28),
    q^3 - q^6 - q^8 - q^9 + q^12 + q^14 + q^16 + q^18 - q^19 - q^22 + q^27 + 
        O(q^28),
    q^4 - q^6 - q^8 - q^9 + q^11 + q^12 + q^16 + q^18 - q^19 + q^21 - q^22 - 
        q^24 + O(q^28),
    q^7 - q^8 - q^9 + q^12 + q^14 - q^19 - q^22 + O(q^28)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.3 + H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3 + H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3 + 2*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - a*q^3 + (a - 1)*q^7 + (a - 1)*q^9 - q^13 + (-a + 1)*q^19 + q^21 - a*q^25
        + q^27 + a*q^31 + (-a + 1)*q^37 + a*q^39 - q^43 - a*q^49 + O(q^50),
    q^2 - a*q^6 + (a - 1)*q^14 + (a - 1)*q^18 - q^26 + (-a + 1)*q^38 + q^42 + 
        O(q^50)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3 + 2*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^4 + q^6 - a*q^7 + (a - 1)*q^9 + a*q^10 - q^15 + (a - 1)*q^16 - q^22 
        - a*q^24 + (a - 1)*q^28 + a*q^31 + (-a + 1)*q^33 + q^36 + (-a + 1)*q^40 
        - a*q^42 + (a - 1)*q^49 + O(q^50),
    q^2 + (a - 1)*q^3 - q^5 - a*q^8 + (-a + 1)*q^11 + q^12 - a*q^14 + (a - 
        1)*q^18 + a*q^20 + q^21 - a*q^27 + a*q^29 - q^30 + (a - 1)*q^32 + a*q^35
        - q^44 + (-a + 1)*q^45 - a*q^48 + O(q^50)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 3*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^2 + q^4 - q^7 - q^8 - q^9 + q^14 + q^16 + q^18 + 2*q^23 - q^25 - q^28 
        - q^32 - q^36 - 2*q^46 + q^49 + O(q^50),
    q^3 - q^6 + q^12 - q^21 - q^24 - q^27 + q^42 + q^48 + O(q^50)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.3 + 3*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
168
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3 + 3*H.4
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
169
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
156
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
169
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
52
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
169
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
13*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
169
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
39*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
18
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
170
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
48
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
170
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
48
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
170
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
48
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
170
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
48
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
170
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
48
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
170
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
48
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
170
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
48
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
170
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
48
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^4 + q^7 + (a - 2)*q^13 + (a - 1)*q^16 - q^19 + a*q^25 - a*q^28 + 
        (-2*a + 1)*q^31 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q + (a - 1)*q^4 - q^7 + (-a + 1)*q^13 - a*q^16 + q^19 + (a - 1)*q^25 + (-a +
        1)*q^28 - q^31 + O(q^34),
    q^3 - a*q^9 + (a - 1)*q^12 - q^21 + (a - 1)*q^27 + O(q^34)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^4 - 2*q^7 + q^16 - q^19 - q^25 - 2*q^28 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
171
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + (a - 1)*q^5 - a*q^6 - a*q^7 - q^9 + a*q^11 + a*q^16 + (-a + 1)*q^23 + 
        q^24 - q^26 + q^30 + O(q^34),
    q^2 + (-a + 1)*q^3 + (a - 1)*q^8 + (a - 1)*q^10 - a*q^13 - a*q^14 + a*q^15 -
        q^18 + (-a + 1)*q^19 - q^21 + a*q^22 + (a - 1)*q^27 - q^29 + a*q^31 + 
        q^33 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
172
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
40
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
172
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
40
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
172
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
40
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
172
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
40
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
172
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
40
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
172
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
40
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
172
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 14*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
40
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
172
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
21*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
40
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^9 - q^11 - q^13 - q^17 - q^23 + q^25 - q^31 + O(q^40)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
173
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
172
);
qprec:=
29
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
173
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
43*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
29
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
174
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
174
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
28
);
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
174
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
174
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
174
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
174
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 14*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^6 - q^7 + q^9 - q^13 - q^16 + q^22 + q^24 + q^25 - q^33 + q^34 + q^42 
        - q^51 + O(q^54),
    q^2 - q^12 - q^14 + q^18 - q^26 - q^32 + q^44 + q^48 + q^50 + O(q^54),
    q^3 + q^8 - q^11 - q^12 - q^17 - q^21 + q^27 + q^29 - q^32 - q^39 + 2*q^41 +
        q^44 - q^47 + O(q^54),
    q^4 - q^6 - q^16 + q^22 - q^28 + q^34 + q^36 + q^42 - q^52 + O(q^54)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
10*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
60
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^9 - q^11 - q^14 - q^16 - q^29 + O(q^30),
    q^2 - q^7 - q^8 + q^18 - q^22 + q^23 + O(q^30)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
175
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
10*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^9 - q^11 + q^14 - q^16 + q^29 + O(q^30),
    q^2 - q^7 + q^8 - q^18 - q^22 - q^23 + O(q^30)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q + (a^3 + a - 1)*q^3 + (-a^2 - 1)*q^9 - a^3*q^11 + (a^2 - a)*q^17 + (-a + 
        1)*q^19 - a^3*q^25 + (-a^3 + a^2 - a + 1)*q^27 + (a^2 + 1)*q^33 + 
        O(q^38),
    q^2 - a*q^4 + (a^3 + a - 1)*q^6 + a^2*q^8 + (-a^3 + 1)*q^12 - a^3*q^16 + 
        (-a^2 - 1)*q^18 - a^3*q^22 + (a^3 - a^2 - 1)*q^24 + (a^3 - a^2 + a - 
        1)*q^32 + (a^2 - a)*q^34 + (a^3 + a)*q^36 + O(q^38)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^3 - q^5 - q^11 - q^15 + q^23 - q^27 + q^31 - q^33 - q^37 + O(q^38)
]
;
Bo:=
[
    q - q^3 - q^5 + q^11 + q^15 - q^23 + q^27 - q^31 - q^33 - q^37 + O(q^38),
    q^2 - q^6 - q^10 + q^22 + q^30 + O(q^38),
    q^4 - q^12 - q^20 + O(q^38)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
176
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + 5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
177
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
177
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
58
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
177
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
58
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
177
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
29*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q + q^4 - q^5 - q^7 - q^9 + q^16 + 2*q^17 - q^19 - q^20 + q^27 - q^28 - q^29
        + q^35 - q^36 + O(q^38),
    q^3 - q^9 + q^12 - q^15 - q^21 - q^36 + O(q^38)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
178
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
88
);
qprec:=
43
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
178
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
43
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
179
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
178
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
179
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
89*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^4 - q^5 - q^13 - q^15 + q^16 - q^20 + q^25 - q^27 + O(q^30),
    q^3 - q^5 - q^9 + q^12 - q^13 + q^17 + q^19 - q^20 + q^25 + q^29 + O(q^30)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 3*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^4 + a*q^10 + (a - 1)*q^13 - q^16 - a*q^25 + (-a - 1)*q^37 + q^40 + 
        a*q^49 + O(q^50),
    q^2 - q^5 - a*q^8 + a*q^20 + (a - 1)*q^26 + (a + 1)*q^29 - q^32 + (-a + 
        1)*q^41 + O(q^50)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^4 - q^10 + q^16 - q^25 + 2*q^34 + q^40 - q^49 + O(q^50),
    q^2 + q^5 - q^8 - 2*q^17 - q^20 + q^32 + O(q^50)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + (a - 1)*q^4 + (a - 1)*q^5 + q^6 - a*q^9 + (-a + 1)*q^14 - a*q^16 - 
        a*q^20 - q^21 + (a - 1)*q^24 - a*q^25 + a*q^29 + (a - 1)*q^30 + q^36 + 
        (-a + 1)*q^41 + q^45 - q^46 + O(q^50),
    q^2 - a*q^3 - q^7 + (a - 1)*q^8 + (a - 1)*q^10 + q^12 + q^15 - a*q^18 + 
        a*q^23 + (a - 1)*q^27 + (-a + 1)*q^28 - a*q^32 + (-a + 1)*q^35 - a*q^40 
        - q^42 + 2*q^43 - q^47 + (a - 1)*q^48 + O(q^50)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
180
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
181
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
180
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
181
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
60
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
181
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
181
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
181
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
181
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
45*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
30
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
182
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
60
);
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a^3*q^3 + a*q^4 + (a^3 - a^2 + a - 2)*q^7 - a*q^9 + (-a^3 + a^2 - a + 
        1)*q^12 + (a^3 - a^2)*q^13 + a^2*q^16 + (-a^3 - a + 1)*q^19 + (a^3 + 
        a^2)*q^21 + a^2*q^25 + (a^3 - a^2 + a - 1)*q^27 + (-a - 1)*q^28 + (a^3 -
        a)*q^31 - a^2*q^36 + (-a^3 + a)*q^37 + O(q^39)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 10*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 12*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^3 + a^2*q^4 + (-a^3 + 1)*q^7 + a^2*q^9 - a^3*q^12 + (a^3 - a^2 - 
        1)*q^13 + (a^3 - a^2 + a - 1)*q^16 + (-a^2 + a - 1)*q^19 + (a^3 - a^2 - 
        1)*q^21 + (a^3 - a^2 + a - 1)*q^25 - a^3*q^27 + (a^2 + 1)*q^28 + (a^2 - 
        a)*q^31 + (a^3 - a^2 + a - 1)*q^36 + (a^2 - a)*q^37 + O(q^39)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 20*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
183
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 30*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
39
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^9 - q^12 - q^13 - q^19 - q^22 + q^25 - q^34 + O(q^39),
    q^2 - q^6 - q^11 - q^17 + q^18 + q^23 + q^29 - q^32 + q^33 + O(q^39),
    q^3 - q^4 - q^13 + q^16 - q^19 + q^22 + q^27 + q^34 - q^36 + O(q^39)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
184
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
184
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
184
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
184
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
184
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
184
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
184
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^3 - q^13 + q^23 + q^25 + q^27 - q^29 - q^31 + q^39 - q^41 + O(q^42),
    q^2 - q^6 - q^26 + O(q^42),
    q^4 - q^12 - q^16 + q^32 + O(q^42),
    q^8 - q^16 - q^24 + O(q^42)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
184
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 11*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^6 - q^8 - q^9 + q^12 - q^18 - q^23 - q^25 - q^26 + q^36 + 2*q^39 + 
        O(q^42),
    q^2 - q^4 + q^6 - 2*q^9 + q^12 - q^16 - q^26 + 2*q^31 + q^32 + 2*q^39 + 
        2*q^41 + O(q^42),
    q^3 - q^4 + q^6 - q^9 - q^13 + q^18 - q^24 - q^26 - q^27 + q^29 + q^31 + 
        q^32 + q^36 + q^39 + q^41 + O(q^42)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 12*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
185
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 18*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
36
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
186
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
186
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
186
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
186
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
186
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
186
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - a*q^3 - a^3*q^4 + (a^3 + a - 1)*q^7 + a^2*q^9 + (a^3 - a^2 + a - 1)*q^12
        + (-a^2 + a - 1)*q^13 - a*q^16 + (a^2 - a)*q^19 + (-a^3 + 1)*q^21 + q^25
        - a^3*q^27 + (a^2 + 1)*q^28 - a*q^31 + q^36 + (a^3 - a^2 - 1)*q^37 + 
        (a^3 - a^2 + a)*q^39 + (-a^3 + 1)*q^43 + a^2*q^48 + (-a^2 - 1)*q^49 + 
        (a^2 - a)*q^52 + (-a^3 + a^2)*q^57 + O(q^58),
    q^2 - a*q^6 - a^3*q^8 + (a^3 + a - 1)*q^14 + a^2*q^18 + (a^3 - a^2 + a - 
        1)*q^24 + (-a^2 + a - 1)*q^26 - a*q^32 + (a^2 - a)*q^38 + (-a^3 + 
        1)*q^42 + q^50 - a^3*q^54 + (a^2 + 1)*q^56 + O(q^58)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
186
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 10*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
186
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^4 - q^5 - q^7 + q^8 + q^9 - q^19 + q^20 + q^28 + q^31 - q^32 + q^35 - 
        q^36 - q^40 - q^41 - q^45 + 2*q^47 - q^56 + O(q^58),
    q^2 - q^4 - q^10 - q^14 + q^16 + q^18 + q^20 + q^28 - q^32 - q^36 - q^38 + 
        O(q^58),
    q^3 - q^12 - q^15 - q^21 + q^24 + q^27 - q^57 + O(q^58),
    q^6 - q^12 - q^30 - q^42 + q^48 + q^54 + O(q^58)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
187
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
187
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
187
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
187
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
80
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
187
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
40
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
187
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
187
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
187
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
187
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
187
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
188
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
44
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
188
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
46
);
qprec:=
44
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
188
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
46
);
qprec:=
44
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
188
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
23*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
44
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^7 - q^21 + q^25 - q^27 + O(q^44),
    q^2 - q^12 - q^14 + q^28 - q^32 + q^36 - q^42 + O(q^44),
    q^3 - q^7 - q^9 + q^17 + q^37 + O(q^44),
    q^4 - q^12 - q^24 - q^32 + q^36 + O(q^44),
    q^6 - q^14 + q^16 - q^18 - q^24 - q^32 + q^34 + O(q^44),
    q^8 - q^12 - q^16 + q^28 + q^36 + O(q^44)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + (-a + 1)*q^4 - q^7 + (2*a - 1)*q^13 - a*q^16 + (a - 1)*q^25 + (a - 
        1)*q^28 + (-a - 1)*q^31 - a*q^37 + O(q^38)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
6*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
12*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - a*q^4 + q^7 - q^13 + (a - 1)*q^16 + (2*a - 2)*q^19 - a*q^25 - a*q^28 + 
        a*q^31 + (-a + 1)*q^37 + O(q^38)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
15*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^4 - q^7 + q^16 + q^25 + q^28 - 2*q^37 + O(q^38),
    q^3 - q^12 - q^21 + O(q^38)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
189
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
6*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
190
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
190
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
190
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
190
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
36
);
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
190
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
190
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
190
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
190
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
190
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 9*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
54
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^6 - q^11 - q^20 + q^25 + q^26 + q^30 + q^36 - q^39 + q^44 - q^45 + 
        q^49 + O(q^54),
    q^2 - q^12 - q^22 - q^40 + q^50 + q^52 + O(q^54),
    q^3 + q^10 - q^13 - q^15 - q^18 - q^22 + q^32 + q^37 + q^38 - q^40 - q^48 + 
        q^53 + O(q^54),
    q^4 - q^6 - q^20 - q^24 + q^26 + q^30 + q^36 + O(q^54),
    q^5 - q^9 - q^11 + q^16 + q^19 - q^20 - q^24 + q^36 + q^39 + q^44 + O(q^54),
    q^8 - q^10 - q^12 + q^18 + q^22 - q^32 - q^38 + q^52 + O(q^54)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
191
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
190
);
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
191
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
38
);
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
191
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
19*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
191
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
95*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^9 - q^12 - q^15 - q^17 + q^25 - q^26 - q^30 + O(q^32),
    q^2 - q^6 - q^13 - q^15 + q^18 + q^25 + q^27 + O(q^32),
    q^3 - q^6 - q^9 - q^10 + q^12 + q^16 + q^18 - q^23 - q^24 + q^26 + q^27 + 
        q^30 + O(q^32),
    q^4 - q^6 - q^9 - q^10 + q^12 + q^15 + q^16 + q^17 - q^20 - q^23 - q^24 + 
        q^26 + q^30 + O(q^32),
    q^5 - q^6 - q^9 + q^12 + q^18 - q^23 + O(q^32),
    q^8 - q^9 - q^10 + q^13 + q^15 - q^20 - q^23 + q^30 + O(q^32)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
192
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
192
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
192
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
192
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
192
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 8*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
192
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
192
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
16
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
192
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
8
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
192
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
4*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
192
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
8*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
42
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^9 - q^25 + O(q^42),
    q^3 - 2*q^19 - q^27 + O(q^42)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
193
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
192
);
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
193
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
64
);
qprec:=
32
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
194
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
96
);
qprec:=
47
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
194
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
32
);
qprec:=
47
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 3*H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 3*H.2 + 3*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 4*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
12
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 4*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - q^3 - q^4 + q^9 + q^12 - q^13 + q^16 - q^25 - q^27 - q^36 + q^39 + 
        2*q^43 - q^48 + q^49 + O(q^50),
    q^5 - q^15 - q^20 + q^45 + O(q^50)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 6*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
195
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2 + 6*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
50
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^4 - q^9 + q^10 - q^16 + q^30 + q^36 + q^39 - q^49 + O(q^50),
    q^2 + q^6 - q^11 - q^15 - q^18 - q^26 - q^32 + q^33 + q^41 + q^44 - q^47 + 
        O(q^50),
    q^3 - q^10 - q^12 - q^13 + 2*q^22 + q^25 - q^27 + q^30 - q^48 + O(q^50),
    q^5 + 2*q^6 - 2*q^11 - q^15 - q^20 - 2*q^26 + 2*q^41 + 2*q^44 - q^45 + 
        O(q^50)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
196
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^2 + q^4 - q^8 + q^9 + q^16 - q^18 - q^25 - 2*q^29 - q^32 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
196
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
196
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
42
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
196
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
196
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 6*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
14
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
196
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
196
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 14*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + (-a + 1)*q^2 - a*q^4 - q^8 + (a - 1)*q^9 + (a - 1)*q^16 + a*q^18 + 
        a*q^25 - 2*q^29 + a*q^32 + O(q^34)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
196
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
21*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
34
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
197
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
196
);
qprec:=
33
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
197
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
7*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
28
);
qprec:=
33
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
197
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
49*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
33
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
198
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
198
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
198
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
198
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
198
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
30
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
198
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1 + 2*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
198
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
198
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
2*H.1 + 5*H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
58
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q + (a - 1)*q^3 + (a - 1)*q^4 + (-a + 1)*q^5 - a*q^9 - a*q^11 - a*q^12 + 
        a*q^15 - a*q^16 + a*q^20 + (2*a - 2)*q^23 + q^27 + (-a + 1)*q^31 + q^33 
        + q^36 - q^37 + q^44 - q^45 + a*q^47 + q^48 + (a - 1)*q^49 - q^53 - q^55
        + O(q^58),
    q^2 + (a - 1)*q^6 + (a - 1)*q^8 + (-a + 1)*q^10 - a*q^18 - a*q^22 - a*q^24 +
        a*q^30 - a*q^32 + a*q^40 + (2*a - 2)*q^46 + q^54 + O(q^58)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
199
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
198
);
qprec:=
33
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
199
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
3*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
66
);
qprec:=
33
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
199
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
9*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
22
);
qprec:=
33
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
199
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
11*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
18
);
qprec:=
33
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
199
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
33*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
6
);
qprec:=
33
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
199
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
99*H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
33
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^9 - q^13 - q^14 - q^20 - q^23 + q^25 + O(q^33),
    q^2 - q^7 - q^10 + q^18 - q^20 + q^25 - q^29 + q^31 + O(q^33),
    q^4 - q^7 - q^8 - q^10 + q^13 + q^14 + q^16 + q^23 - q^26 - q^28 - q^29 - 
        q^32 + O(q^33),
    q^5 - q^7 - q^8 + q^14 + q^16 - q^26 - q^29 + O(q^33)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q + q^4 - q^6 - q^11 + q^16 - q^19 - q^24 - q^34 + O(q^38),
    q^2 - q^3 + q^8 - q^12 - q^17 - q^22 + q^27 + q^32 + q^33 + O(q^38)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
20
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 2*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 4*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[
    q - a^3*q^5 + (a^3 - a^2 + a - 1)*q^9 + (a^2 - a)*q^13 + (a^3 + a - 1)*q^17 
        - a*q^25 + (-a^3 - a)*q^29 + (-a^3 + 1)*q^37 + O(q^38),
    q^2 - a*q^4 + a^2*q^8 - a^3*q^10 - a^3*q^16 + (a^3 - a^2 + a - 1)*q^18 + 
        (a^3 - a^2 + a - 1)*q^20 + (a^2 - a)*q^26 + (a^3 - a^2 + a - 1)*q^32 + 
        (a^3 + a - 1)*q^34 + q^36 + O(q^38)
]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 4*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
10
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.2 + 5*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C<a>:=CyclotomicField(
4
);
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + 10*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
G:=FullDirichletGroup(
200
);
H,m:=AbelianGroup(G);
m_inv:=m^-1;
eps_H:=
H.1 + H.2 + 10*H.3
;
eps:=m(eps_H);
EPS:=MinimalBaseRingCharacter(eps);
C:=Rationals();
qprec:=
38
;
Cq<q>:=PowerSeriesRing(C,qprec);
Bn:=
[
    q - q^4 - q^6 - q^11 + q^16 + q^19 + q^24 + q^34 + O(q^38),
    q^2 + q^3 - q^8 - q^12 - q^17 - q^22 + q^27 + q^32 - q^33 + O(q^38)
]
;
Bo:=
[]
;
Append(~basis_list,[*eps,EPS,Bn,Bo*]);
