tire_element_rand(0, _, Elements) -> Elements;
tire_element_rand(N, L, Elements) ->
E = lists:nth(random:uniform(length(L)), L),
tire_element_rand(0, _, Elements) -> Elements;
tire_element_rand(N, L, Elements) ->
E = lists:nth(random:uniform(length(L)), L),