"Source: Text/Ring/RngLocA.text";
"Line: 52";
"Date: Fri Sep 26 12:10:11 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Ring/RngLocA.text, line: 52
// Example: H50E1 ()
print "Example: H50E1";
ei := GetEchoInput();
SetEchoInput(true);
P<x> := PolynomialRing(Integers());
Zp := pAdicRing(7, 50);
U := UnramifiedExtension(Zp, x^2 + 6*x + 3);
R := TotallyRamifiedExtension(U, x^3 + 7*x^2 + 7*x + 7);
L<a> := LocalField(pAdicField(7, 50), MinimalPolynomial(R.1 + U.1, Zp));
L;
LocalField(pAdicField(7, 50), x^6 - 49*x^2 + 686);
SetEchoInput(ei);
