anchor.diff:  
   set_random_seed() ->
       Unique = erlang:unique_integer(),
  -
       A = erlang:phash2([make_ref(), self(), Unique]),
  -    random:seed(A, A, A).
  +    rand:seed(exsplus, {A, A, A}).
   
   
   otp_8739(doc) ->
  
positive.code: 					    [length(Answer), Answer])),
      lists:foreach(
        fun(Char) ->
  	      timer:sleep(random:uniform(500)),
  	      gen_tcp:send(CSock, <<Char>>)
        end,
        Response).
  
negative.code: 			      end
  		      end),
  	      MRef = erlang:monitor(process, Pid),
  	      timer:sleep(10 + rand:uniform(1334)),
  	      {Id, Pid, MRef}
        end,
        lists:seq(1, NumClients)).
  