remove a blinding alternative
remove a blinding alternative

m1, m2 <- [1..q-1]
r = gg^(k + m1 * q + m2) * gg^(q - m2) mod p mod q

... slower.

mirleft/ocaml-nocrypto,nasrallahmounir/ocaml-nocrypto,nasrallahmounir/ocaml-nocrypto,mirleft/ocaml-nocrypto