erlang setRNG(RNGState),
io:format("~w~n", [lists:map(fun (_) -> gen_rand_integer(100, 200) end, lists:seq(1, 5))]),
setRNG(RNGState),
io:format("~w~n", [lists:map(fun (_) -> gen_rand_integer(100, 200) end, lists:seq(1, 5))]).
-module(reprandint).
-export([start/0]).
start() ->
RNGState = setRNG(),
setRNG(RNGState),
io:format("~w~n", [lists:map(fun (_) -> gen_rand_integer(100, 200) end, lists:seq(1, 5))]),
setRNG(RNGState),
io:format("~w~n", [lists:map(fun (_) -> gen_rand_integer(100, 200) end, lists:seq(1, 5))]).
setRNG() -> {A1, A2, A3} = now(), random:seed(A1, A2, A3).
setRNG(State) -> {A1, A2, A3} = State, random:seed(A1, A2, A3).
gen_rand_integer(LB, UB) -> LB + random:uniform(UB - LB).