RosettaCodeData/Task/Pick-random-element/NewLISP/pick-random-element.newlisp

mirror of https://github.com/acmeism/RosettaCodeData.git
(define (pick-random-element R)
	(nth (rand (length R)) R))
	`(define (pick-random-element R)`
	`(nth (rand (length R)) R))`