// Magma code for working with number field 30.0.249154964698353870876083085574129912384252301255171.1

// (Note that not all these functions may be available, and some may take a long time to execute.)

// Define the number field: 
R<x> := PolynomialRing(Rationals()); K<a> := NumberField(R![1, 4, 15, 55, 201, 734, 2680, 9785, 35726, 130439, 476245, 201891, 200880, 125384, 98765, 68796, 51035, 36579, 26485, 18326, 10240, -3851, 1461, -545, 210, -76, 31, -10, 5, -1, 1]);

// Defining polynomial: 
DefiningPolynomial(K);

// Degree over Q: 
Degree(K);

// Signature: 
Signature(K);

// Discriminant: 
Discriminant(Integers(K));

// Ramified primes: 
PrimeDivisors(Discriminant(Integers(K)));

// Integral basis: 
IntegralBasis(K);

// Class group: 
ClassGroup(K);

// Unit group: 
UK, f := UnitGroup(K);

// Unit rank: 
UnitRank(K);

// Generator for roots of unity: 
K!f(TU.1) where TU,f is TorsionUnitGroup(K);

// Fundamental units: 
[K!f(g): g in Generators(UK)];

// Regulator: 
Regulator(K);

// Galois group: 
GaloisGroup(K);

// Frobenius cycle types: 
p := 7;  // to obtain a list of $[e_i,f_i]$ for the factorization of the ideal $p\mathcal{O}_K$:
idealfactors := Factorization(p*Integers(K));  // get the data
[<primefactor[2], Valuation(Norm(primefactor[1]), p)> : primefactor in idealfactors];