// Magma code for working with p-adic field 5.4.4.12a1.4.


// Define the p-adic field: 
Prec := 100;  // Default precision of 100
Q5 := pAdicField(5, Prec);
K := LocalField(Q5, Polynomial(Q5, [21, 128, 512, 1280, 2208, 2752, 2624, 2048, 1432, 864, 448, 192, 104, 16, 16, 0, 1]));

// Defining polynomial: 
DefiningPolynomial(K);

// Base field Qp: 
Q5;

// Degree over Qp: 
Degree(K);

// Ramification index: 
RamificationIndex(K);

// Residue field degree (Inertia degree): 
InertiaDegree(K);

// Discriminant exponent: 
Valuation(Discriminant(K));