bridge/class-master/depend/pari/src/basemath/char.c
/* G is a znstar, chi a Dirichlet character */
G is a znstar, chi a Dirichlet character
G is a znstar chi a Dirichlet character
GEN
zncharconj(GEN G, GEN chi)
{
  switch(typ(chi))
  {
    case t_INT: chi = znconreylog(G, chi); 
    case t_COL: return charconj(znstar_get_conreycyc(G), chi);
    case t_VEC: return charconj(znstar_get_cyc(G), chi);
  }
  pari_err_TYPE("zncharconj",chi);
  return NULL; 
}
GEN zncharconj ( GEN G , GEN chi ) { switch ( typ ( chi ) ) { case t_INT : chi = znconreylog ( G , chi ) ; case t_COL : return charconj ( znstar_get_conreycyc ( G ) , chi ) ; case t_VEC : return charconj ( znstar_get_cyc ( G ) , chi ) ; } pari_err_TYPE ( " " , chi ) ; return NULL ; }
G is a znstar, chi a Dirichlet character
G is a znstar chi a Dirichlet character
/* fall through */ /*LCOV_EXCL_LINE*/