\\ Pari/GP code for working with number field 13.1.3518110599125.1

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

\\ Define the number field: 
K = bnfinit(x^13 + x^11 - 2*x^10 + x^9 - x^8 - 4*x^7 + 4*x^6 - 5*x^5 + x^4 + 2*x^3 - 4*x^2 + 2*x - 1, 1)

\\ Defining polynomial: 
K.pol

\\ Degree over Q: 
poldegree(K.pol)

\\ Signature: 
K.sign

\\ Discriminant: 
K.disc

\\ Ramified primes: 
factor(abs(K.disc))[,1]~

\\ Integral basis: 
K.zk

\\ Class group: 
K.clgp

\\ Unit rank: 
K.fu

\\ Generator for roots of unity: 
K.tu[2]

\\ Fundamental units: 
K.fu

\\ Regulator: 
K.reg

\\ Galois group: 
polgalois(K.pol)

\\ 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 = idealprimedec(K, p); \\ get the data
vector(length(idealfactors), j, [idealfactors[j][3], idealfactors[j][4]])