bridge/class-master/depend/pari/src/basemath/bb_hnf.c
/* The mkop* functions return NULL if the corresponding operation is the identity */
The mkop* functions return NULL if the corresponding operation is the identity
The mkop * functions return NULL if the corresponding operation is the identity
static GEN
mkoptransv(long i, long j, GEN a, void* data, const struct bb_hermite *R)
{
  a = R->red(data,a);
  if (R->equal0(a)) return NULL;
  return mkvec2(mkvecsmall2(i,j),a);
}
static GEN mkoptransv ( long i , long j , GEN a , void * data , const struct bb_hermite * R ) { a = R -> red ( data , a ) ; if ( R -> equal0 ( a ) ) return NULL ; return mkvec2 ( mkvecsmall2 ( i , j ) , a ) ; }
The mkop* functions return NULL if the corresponding operation is the identity
The mkop * functions return NULL if the corresponding operation is the identity
/* Ci <- Ci + Cj*a */