bridge/class-master/depend/pari/src/basemath/ifactor1.c
/* found out our integer was factor^exp. Update */
found out our integer was factor^exp. Update
found out our integer was factor^exp . Update
static void
update_pow(GEN where, GEN factor, long exp, pari_sp *av)
{
  GEN ex = EXPON(where);
  if (DEBUGLEVEL>3)
    err_printf("IFAC: found %Ps =\n\t%Ps ^%ld\n", *where, factor, exp);
  affii(factor, VALUE(where)); avma = *av;
  if (ex == gen_1)
  { EXPON(where) = exp == 2? gen_2: utoipos(exp); *av = avma; }
  else if (ex == gen_2)
  { EXPON(where) = utoipos(exp<<1); *av = avma; }
  else
    affsi(exp * itos(ex), EXPON(where));
}
static void update_pow ( GEN where , GEN factor , long exp , pari_sp * av ) { GEN ex = EXPON ( where ) ; if ( DEBUGLEVEL > 3 ) err_printf ( " \n \t \n " , * where , factor , exp ) ; affii ( factor , VALUE ( where ) ) ; avma = * av ; if ( ex == gen_1 ) { EXPON ( where ) = exp == 2 ? gen_2 : utoipos ( exp ) ; * av = avma ; } else if ( ex == gen_2 ) { EXPON ( where ) = utoipos ( exp << 1 ) ; * av = avma ; } else affsi ( exp * itos ( ex ) , EXPON ( where ) ) ; }
found out our integer was factor^exp.
found out our integer was factor^exp .