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