// Magma code for working with Dirichlet character group of modulus 40310


// Define the Dirichlet group: 
G := FullDirichletGroup(40310);

// Order: 
Order(G);

// Group structure: 
PrimaryInvariants(AbelianGroup(G));

// Generators: 
Generators(G);