bridge/class-master/depend/pari/src/basemath/galconj.c
/*Check whether the line of NS are pair-wise distinct.*/
Check whether the line of NS are pair-wise distinct.
Check whether the line of NS are pair - wise distinct .
static long
sympol_is1to1_lg(GEN NS, long n)
{
  long i, j, k, l = lgcols(NS);
  for (i=1; i<l; i++)
    for(j=i+1; j<l; j++)
    {
      for(k=1; k<n; k++)
        if (!equalii(gmael(NS,k,j),gmael(NS,k,i))) break;
      if (k>=n) return 0;
    }
  return 1;
}
static long sympol_is1to1_lg ( GEN NS , long n ) { long i , j , k , l = lgcols ( NS ) ; for ( i = 1 ; i < l ; i ++ ) for ( j = i + 1 ; j < l ; j ++ ) { for ( k = 1 ; k < n ; k ++ ) if ( ! equalii ( gmael ( NS , k , j ) , gmael ( NS , k , i ) ) ) break ; if ( k >= n ) return 0 ; } return 1 ; }
Check whether the line of NS are pair-wise distinct.
Check whether the line of NS are pair - wise distinct .