Function Select-Sample

Part of:

package cl-variates
( select-sample < generator > < sample-size > < total-size > )

Returns a bit vector of size total-size with exactly sample-size
bits set to 1. The one bits are selected uniformly at random. The algorithm
is attributed to Robert Floyd by Jon Bentley in More Programming Pearls.