bridge/class-master/depend/pari/src/basemath/mftrace.c
/* f as above, return the t_MF_NEWTRACE component */
f as above, return the t_MF_NEWTRACE component
f as above return the t_MF_NEWTRACE component
static GEN
bhn_newtrace(GEN f)
{
  long t = mf_get_type(f);
  if (t == t_MF_BD) { f = gel(f,2); t = mf_get_type(f); }
  if (t == t_MF_HECKE) f = gel(f,3);
  return f;
}
static GEN bhn_newtrace ( GEN f ) { long t = mf_get_type ( f ) ; if ( t == t_MF_BD ) { f = gel ( f , 2 ) ; t = mf_get_type ( f ) ; } if ( t == t_MF_HECKE ) f = gel ( f , 3 ) ; return f ; }
f as above, return the t_MF_NEWTRACE component
f as above return the t_MF_NEWTRACE component