RandomCore
By Andrew Owen
Released under the MIT license
Notes:
Functions for random choice
seed-rand-time
( -- )
Seeds the PSRNG with the current time
rand-int
( -- random-int )
Get a random positive int
range-rand
( min max -- random-int )
Get a random positive int between min and max
choice
( vec -- elem )