@poly1_coeffs = ( 1, (0) x $n );