}
static mp *fadd(field *ff, mp *d, mp *x, mp *y) {
fctx_niceprime *f = (fctx_niceprime *)ff; d = mp_add(d, x, y);
if (MP_NEGP(d)) d = mp_add(d, d, f->r.p);
}
static mp *fadd(field *ff, mp *d, mp *x, mp *y) {
fctx_niceprime *f = (fctx_niceprime *)ff; d = mp_add(d, x, y);
if (MP_NEGP(d)) d = mp_add(d, d, f->r.p);