bridge/class-master/depend/pari/src/basemath/base2.c
/* Return an element of O_K which is set to x Mod T */
Return an element of O_K which is set to x Mod T
Return an element of O_K which is set to x Mod T
GEN
modpr_genFq(GEN modpr)
{
  switch(lg(modpr))
  {
    case SMALLMODPR: 
      return gen_1;
    case LARGEMODPR:  
      return gmael(modpr,mpr_NFP, 2);
    default: 
    {
      long v = varn( modpr_get_T(modpr) );
      return pol_x(v);
    }
  }
}
GEN modpr_genFq ( GEN modpr ) { switch ( lg ( modpr ) ) { case SMALLMODPR : return gen_1 ; case LARGEMODPR : return gmael ( modpr , mpr_NFP , 2 ) ; default : { long v = varn ( modpr_get_T ( modpr ) ) ; return pol_x ( v ) ; } } }
Return an element of O_K which is set to x Mod T
Return an element of O_K which is set to x Mod T
/* Fp */ /* painful case, p \mid index */ /* trivial case : p \nmid index */