anchor.diff:  -spec seed_s(alg() | {alg(), alg_seed()}) -> state().
   seed_s(Alg) when is_atom(Alg) ->
       seed_s(Alg, {erlang:phash2([{node(),self()}]),
  -		 erlang:monotonic_time(),
  -		 erlang:time_offset()});
  +		 erlang:system_time(),
  +		 erlang:unique_integer()});
   seed_s({Alg0, Seed}) ->
       {Alg,_SeedFun} = mk_alg(Alg0),
       {Alg, Seed}.
  
positive.code: 	_ -> undefined
      end.
  
  -spec export_seed(state()) -> {alg(), alg_seed()}.
  export_seed({#{type:=Alg}, Seed}) -> {Alg, Seed}.
  
  %% seed(Alg) seeds RNG with runtime dependent values
  %% and return the NEW state
  
negative.code: -module(rand).
  
  -export([seed_s/1, seed_s/2, seed/1, seed/2,
  	 export_seed/0, export_seed_s/1,
           uniform/0, uniform/1, uniform_s/1, uniform_s/2]).
  
  -compile({inline, [exs64_next/1, exsplus_next/1,
  