read("patstock.mpl");
with(LinearAlgebra):
f:=randpoly(x,degree=25,dense);
sort(f);
A:=RandomMatrix(5,5);
evalPolyMat(f,x,A);
eval(f,x=A);