"Source: Text/Ring/RngOrd.text";
"Line: 8078";
"Date: Fri Sep 26 14:51:59 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Ring/RngOrd.text, line: 8078
// Example: H39E34 ()
print "Example: H39E34";
ei := GetEchoInput();
SetEchoInput(true);
f := Polynomial([1,1,1,1,1]);
M := MaximalOrder(f);
P := Decomposition(M, 11)[1][1]; P;
C, mC := Completion(M, P:Precision :=  10);    
fC := Polynomial([c@ mC : c in Eltseq(f)]);
rt := Roots(fC); rt;
R := ReconstructionEnvironment(P, 10);
[Reconstruct((x[1]) @@ mC, R) : x in rt];
[ Evaluate(f, x) : x in $1];
SetEchoInput(ei);
