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


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

// Order: 
Order(G);

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

// Generators: 
Generators(G);