RosettaCodeData/Task/Pick-random-element/Erlang/pick-random-element.erl

9 lines
162 B
Erlang
Raw Permalink Normal View History

2013-06-05 21:47:54 +00:00
% Implemented by Arjun Sunel
-module(pick_random).
-export([main/0]).
main() ->
List =[1,2,3,4,5],
2019-09-12 10:33:56 -07:00
Index = rand:uniform(length(List)),
2015-02-20 00:35:01 -05:00
lists:nth(Index,List).