BN_mod_exp_mont_word
ret = BN_mod_exp_mont_word(r, A,p, m,ctx, NULL);
int BN_mod_exp_mont_word(BIGNUM *r, BN_ULONG a, const BIGNUM *p,
if (!BN_mod_exp_mont_word(got, 1, p, m, ctx, NULL)) {