bridge/class-master/depend/pari/src/basemath/Flx.c
/* Computing minimal polynomial :                         */
/* cf Shoup 'Efficient Computation of Minimal Polynomials */
/*          in Algebraic Extensions of Finite Fields'     */
Computing minimal polynomial :
cf Shoup 'Efficient Computation of Minimal Polynomials
in Algebraic Extensions of Finite Fields'
Computing minimal polynomial : cf Shoup ' Efficient Computation of Minimal Polynomials in Algebraic Extensions of Finite Fields '
GEN
Flxn_mul(GEN a, GEN b, long n, ulong p)
{
  GEN c = Flx_mul(a, b, p);
  return vecsmall_shorten(c, minss(lg(c)-1,n+1));
}
GEN Flxn_mul ( GEN a , GEN b , long n , ulong p ) { GEN c = Flx_mul ( a , b , p ) ; return vecsmall_shorten ( c , minss ( lg ( c ) - 1 , n + 1 ) ) ; }
Computing minimal polynomial :
cf Shoup 'Efficient Computation of Minimal Polynomials
in Algebraic Extensions of Finite Fields'
Computing minimal polynomial : cf Shoup ' Efficient Computation of Minimal Polynomials in Algebraic Extensions of Finite Fields '