bridge/class-master/depend/pari/src/basemath/base3.c
/* Given a and b in nf, gives a "small" algebraic integer r in nf
 * of the form a-b.y */
Given a and b in nf, gives a "small" algebraic integer r in nf
of the form a-b.y
Given a and b in nf gives a " small " algebraic integer r in nf of the form a - b . y
GEN
nfmod(GEN nf, GEN a, GEN b)
{
  pari_sp av = avma;
  GEN p1 = gneg_i(nfmul(nf,b,ground(nfdiv(nf,a,b))));
  return gerepileupto(av, nfadd(nf,a,p1));
}
GEN nfmod ( GEN nf , GEN a , GEN b ) { pari_sp av = avma ; GEN p1 = gneg_i ( nfmul ( nf , b , ground ( nfdiv ( nf , a , b ) ) ) ) ; return gerepileupto ( av , nfadd ( nf , a , p1 ) ) ; }
Given a and b in nf, gives a "small" algebraic integer r in nf
 of the form a-b.y
Given a and b in nf gives a " small " algebraic integer r in nf of the form a - b . y