"Source: Text/Ring/FldFunRat.text";
"Line: 1345";
"Date: Tue Jun 27 23:00:02 2017";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Ring/FldFunRat.text, line: 1345
// Example: H44E14 ()
print "Example: H44E14";
ei := GetEchoInput();
SetEchoInput(true);
S<u> := PowerSeriesRing(Rationals());
f := [Vector([1]), Vector([u])];
pade, seq := PadeHermiteApproximant(f,3);
pade;
seq;
mat := Matrix([Eltseq(v): v in f]);
pade*mat;
PadeHermiteApproximant([1,u],5);
g:= [Vector([1,0,0]), Vector([0,1,0]), Vector([1+u,2+u^2,u^3])];
pade := PadeHermiteApproximant(g,5);
pade;
pade*Matrix([Eltseq(v): v in g]);
SetEchoInput(ei);
