Lines Matching refs:A1
249 BIGNUM *A1, *A1_odd, *check; /* taken from ctx */
289 A1 = BN_CTX_get(ctx);
294 /* compute A1 := A - 1 */
295 if (!BN_copy(A1, A))
297 if (!BN_sub_word(A1, 1))
299 if (BN_is_zero(A1))
305 /* write A1 as A1_odd * 2^k */
307 while (!BN_is_bit_set(A1, k))
309 if (!BN_rshift(A1_odd, A1, k))
321 if (!BN_pseudo_rand_range(check, A1))
327 j = witness(check, A, A1, A1_odd, k, ctx, mont);