Anonymous user
Miller–Rabin primality test: Difference between revisions
→Perhaps a slightly clearer (less monadic) version. Transcription of pseudocode.
Line 1,308:
<lang Haskell>
import Control.Monad (liftM)
import Data.Bits (Bits, testBit, shiftR)
import System.Random (Random, getStdGen, randomRs)
|