kc3-lang/libtommath/mp_reduce_is_2k_l.c

• Show log

  Commit

• Hash : 7a68f128
  Author :
  Date : 2019-10-19T16:24:39
  

  Execute move.sh - Rename files from bn_* to match the function names. * git blame <renamed-file> is not affected * git log --follow <renamed-file> can be used to show log across renames

Download

• mp_reduce_is_2k_l.c

• #include "tommath_private.h"
  #ifdef MP_REDUCE_IS_2K_L_C
  /* LibTomMath, multiple-precision integer library -- Tom St Denis */
  /* SPDX-License-Identifier: Unlicense */
  
  /* determines if reduce_2k_l can be used */
  mp_bool mp_reduce_is_2k_l(const mp_int *a)
  {
     int ix, iy;
  
     if (a->used == 0) {
        return MP_NO;
     } else if (a->used == 1) {
        return MP_YES;
     } else if (a->used > 1) {
        /* if more than half of the digits are -1 we're sold */
        for (iy = ix = 0; ix < a->used; ix++) {
           if (a->dp[ix] == MP_DIGIT_MAX) {
              ++iy;
           }
        }
        return (iy >= (a->used/2)) ? MP_YES : MP_NO;
     } else {
        return MP_NO;
     }
  }
  
  #endif
  

Download