aksaka.lib
LIB "aksaka.lib"; ring R=0,x,dp; poly a=3*x3-x2+5; poly r=x7-1; bigint q=123; bigint n=5; powerpolyX(q,n,a,r); ==> 3x5-3x4+x3+x2+1