Sharedwww / breuil / old_codeOpen in CoCalc
Author: William A. Stein
1
else
2
n := EulerPhi(N);
3
G := DirichletGroup(N,CyclotomicField(n));
4
e := Order(IntegerRing(n div (ell^Valuation(n,ell)))!ell);
5
F<alpha> := GF(ell^e);
6
E := Elements(G);
7
end if;
8