"Source: Text/Ring/FldFunRat.text";
"Line: 1051";
"Date: Tue Jun 27 23:00:02 2017";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Ring/FldFunRat.text, line: 1051
// Example: H44E8 ()
print "Example: H44E8";
ei := GetEchoInput();
SetEchoInput(true);
L<x> := PolynomialRing(Rationals());
f := [1+x, 3-x^2, 5+x+x^3-x^5];
seq := MinimalVectorSequence(f, 10);
seq[1];
sums := [&+([Q[i]*f[i]: i in [1..#f]]) : Q in seq];
sums;
SetEchoInput(ei);
