# SageMath code for working with number field 16.8.15998368041616000000000000.4.
# Some of these functions may take a long time to execute (this depends on the field).


# Define the number field: 
x = polygen(QQ);  K.<a> = NumberField(x^16 - 5*x^14 - 52*x^13 - 59*x^12 + 390*x^11 + 684*x^10 + 906*x^9 - 3069*x^8 - 16768*x^7 + 17647*x^6 + 50334*x^5 - 81533*x^4 - 15322*x^3 + 117324*x^2 - 94538*x + 24421)

# Defining polynomial: 
K.defining_polynomial()

# Degree over Q: 
K.degree()

# Signature: 
K.signature()

# Discriminant: 
K.disc()

# Ramified primes: 
K.disc().support()

# Autmorphisms: 
K.automorphisms()

# Integral basis: 
K.integral_basis()

# Class group: 
K.class_group().invariants()

# Unit group: 
UK = K.unit_group()

# Unit rank: 
UK.rank()

# Generator for roots of unity: 
UK.torsion_generator()

# Fundamental units: 
UK.fundamental_units()

# Regulator: 
K.regulator()

# Analytic class number formula: 
# self-contained SageMath code snippet to compute the analytic class number formula
x = polygen(QQ);  K.<a> = NumberField(x^16 - 5*x^14 - 52*x^13 - 59*x^12 + 390*x^11 + 684*x^10 + 906*x^9 - 3069*x^8 - 16768*x^7 + 17647*x^6 + 50334*x^5 - 81533*x^4 - 15322*x^3 + 117324*x^2 - 94538*x + 24421)
DK = K.disc(); r1,r2 = K.signature(); RK = K.regulator();  RR = RK.parent()
hK = K.class_number(); wK = K.unit_group().torsion_generator().order();
2^r1 * (2*RR(pi))^r2 * RK * hK / (wK * RR(sqrt(abs(DK))))  

# Intermediate fields: 
K.subfields()[1:-1]

# Galois group: 
K.galois_group(type='pari')

# Frobenius cycle types: 
# to obtain a list of [e_i,f_i] for the factorization of the ideal pO_K for p=7 in Sage:
p = 7; [(e, pr.norm().valuation(p)) for pr,e in K.factor(p)]