bridge/class-master/depend/pari/src/basemath/mftrace.c
/*********************************************************************/
/*                    Simple arithmetic functions                    */
/*********************************************************************/
/* TODO: most of these should be exported and used in ifactor1.c */
/* phi(n) */
Simple arithmetic functions
TODO: most of these should be exported and used in ifactor1.c
phi(n)
Simple arithmetic functions TODO : most of these should be exported and used in ifactor1 . c phi ( n )
static ulong
myeulerphiu(ulong n)
{
  pari_sp av;
  GEN fa;
  if (n == 1) return 1;
  av = avma; fa = myfactoru(n);
  avma = av; return eulerphiu_fact(fa);
}
static ulong myeulerphiu ( ulong n ) { pari_sp av ; GEN fa ; if ( n == 1 ) return 1 ; av = avma ; fa = myfactoru ( n ) ; avma = av ; return eulerphiu_fact ( fa ) ; }
Simple arithmetic functions
TODO: most of these should be exported and used in ifactor1.c
phi(n)
Simple arithmetic functions TODO : most of these should be exported and used in ifactor1 . c phi ( n )