void _nmod_poly_divrem_newton(mp_ptr Q, mp_ptr R, mp_srcptr A, long lenA, mp_srcptr B, long lenB, nmod_t mod) { const long lenQ = lenA - lenB + 1; _nmod_poly_div_newton(Q, A, lenA, B, lenB, mod); if (lenB > 1) { if (lenQ >= lenB - 1) _nmod_poly_mullow(R, Q, lenQ, B, lenB - 1, lenB - 1, mod); else _nmod_poly_mullow(R, B, lenB - 1, Q, lenQ, lenB - 1, mod); _nmod_vec_sub(R, A, R, lenB - 1, mod); } }
void nmod_poly_div_newton(nmod_poly_t Q, const nmod_poly_t A, const nmod_poly_t B) { const slong lenA = A->length, lenB = B->length, lenQ = lenA - lenB + 1; mp_ptr q; if (lenB == 0) { flint_printf("Exception (nmod_poly_div_newton). Division by zero.\n"); abort(); } if (lenA < lenB) { nmod_poly_zero(Q); return; } if (Q == A || Q == B) { q = flint_malloc(lenQ * sizeof(mp_limb_t)); } else { nmod_poly_fit_length(Q, lenQ); q = Q->coeffs; } _nmod_poly_div_newton(q, A->coeffs, lenA, B->coeffs, lenB, B->mod); if (Q == A || Q == B) { flint_free(Q->coeffs); Q->coeffs = q; Q->alloc = lenQ; } Q->length = lenQ; }