chickadee » srfi-27 » make-random-bernoullis

(make-random-bernoullis [p: (P 1/2)] [randoms: (RANDOMS (current-random-real))]) -> (-> boolean)procedure

P is real in [0 1].

RANDOMS is a (-> real)

(import (srfi 27 bernoullis))