chickadee » srfi-27 » make-random-bernoullis

(make-random-bernoullis [#:p 0.5] [#:randoms (make-uniform-random-reals)]) => (procedure () boolean)procedure