"Source: Text/Ring/FldAC.text";
"Line: 500";
"Date: Tue Apr 21 07:11:34 2020";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Ring/FldAC.text, line: 500
// Example: H43E3 ()
print "Example: H43E3";
ei := GetEchoInput();
SetEchoInput(true);
A := AlgebraicClosure();
S<y> := PuiseuxSeriesRing(A);
P<x> := PolynomialRing(S);
f := (x^2 - y^2 - 1)^5 + x*y + 1;
time S := PuiseuxExpansion(f, 3);
S;
A;
[Evaluate(f, p): p in S];
SetEchoInput(ei);
