RosettaCodeData/Task/Pick-random-element/Maxima/pick-random-element.maxima

5 lines
138 B
Plaintext

random_element(l):= part(l, 1+random(length(l)));
/* (%i1) random_element(['a, 'b, 'c]);
(%o1) c
*/