anchor.diff:      S0 = R#random_exsplus_state.s1,
       S11 = (S1 bxor (S1 bsl 23)) band ?UINT64MASK,
       S12 = S11 bxor S0 bxor (S11 bsr 17) bxor (S0 bsr 26),
  -    {(S0 + S12) band ?UINT64MASK, 
  +    {(S0 + S12) band ?UINT64MASK,
           #random_exsplus_state{s0 = S0, s1 = S12}}.
   
   %%-----------------------------------------------------------------------
  
positive.code: random_exsplus({uniform_s, Max, R}) when is_integer(Max), Max >= 1 ->
      {V, R1} = random_exsplus_next(R),
      {(V rem Max) + 1, R1}.
  
negative.code: 
  -export([seed/0, seed/1, seed/2, seed/3, seed0/0, seed0/1,
           uniform/0, uniform/1, uniform_s/1, uniform_s/2,
           random_as183/1, random_exs64/1, random_exsplus/1,
           random_exs1024/1]).
  
  -define(DEFAULT_ALG_HANDLER, fun ?MODULE:random_as183/1).
  -define(SEED_DICT, random_seed).
  