bridge/class-master/depend/pari/src/basemath/base5.c
/* vector of rnf elt -> matrix of nf elts */
vector of rnf elt -> matrix of nf elts
vector of rnf elt - > matrix of nf elts
static GEN
rnfV_to_nfM(GEN rnf, GEN x)
{
  long i, l = lg(x);
  GEN y = cgetg(l, t_MAT);
  for (i = 1; i < l; i++) gel(y,i) = rnfalgtobasis(rnf,gel(x,i));
  return y;
}
static GEN rnfV_to_nfM ( GEN rnf , GEN x ) { long i , l = lg ( x ) ; GEN y = cgetg ( l , t_MAT ) ; for ( i = 1 ; i < l ; i ++ ) gel ( y , i ) = rnfalgtobasis ( rnf , gel ( x , i ) ) ; return y ; }
vector of rnf elt -> matrix of nf elts
vector of rnf elt - > matrix of nf elts