128         BIGNUM *public, *secret, *common, *modulus;  in common_key()  local
133 	modulus = NULL;  in common_key()
134 	if (BN_hex2bn(&modulus, HEXMODULUS) == 0)  in common_key()
146 	BN_mod_exp(common, public, secret, modulus, ctx);  in common_key()
153 	BN_free(modulus);  in common_key()
201 	BIGNUM *pk, *sk, *tmp, *base, *root, *modulus;  in genkeys()  local
208 	modulus = NULL;  in genkeys()
209 	if (BN_hex2bn(&modulus, HEXMODULUS) == 0)  in genkeys()
226 	BN_div(tmp, sk, sk, modulus, ctx);  in genkeys()
227 	BN_mod_exp(pk, root, sk, modulus, ctx);  in genkeys()
242 	BN_free(modulus);  in genkeys()