anchor.diff:  
   %%-----------------------------------------------------------------------
   
  -%% seed0: initial PRNG seed
  -%% Set the default seed value to xorshift128plus state
  -%% in the process directory
  +%% algorithm handler functions
   
   exsplus_seed0() ->
       #exsplus_state{s0 = 1234567890123456789, s1 = 9876543210987654321}.
   
  -%% seed: seeding with three Integers
   %% Set the seed value to xorshift128plus state in the process directory
   %% with the given three unsigned 32-bit integer arguments
  -%% Multiplicands here: three 32-bit primes
  +%% Multiplicands here are three 32-bit primes
   
   exsplus_seed({A1, A2, A3}) ->
       {_, R1} = exsplus_next(
  
positive.code:     {V3, _} = exs64_next(((A3 band ?UINT32MASK) * 4294967279 + 1)),
      ((V1 * V2 * V3) rem (?UINT64MASK - 1)) + 1.
  
  %% {uniform_s, State} -> {F, NewState}:
  %% Generate float from
  %% given xorshift64star internal state.
  %% (Note: 0.0 &lt; result &lt; 1.0)
  
  exs64_uniform(R0) ->
      {V, R1} = exs64_next(R0),
      {V / 18446744073709551616.0, R1}.
  
  %% {uniform_s, N, State} -> {I, NewState}:
  %% Generate integer from given xorshift64star internal state.
  %% (Note: 0 =&lt; result &lt; MAX (given positive integer))
  
  exs64_uniform(Max, R) ->
      {V, R1} = exs64_next(R),
  
negative.code:     {exs1024_gen1024(
              (B1 bsl 43) bor (B2 bsl 22) bor (B3 bsl 1) bor 1), []}.
  
  %% Generate float from given xorshift1024star internal state.
  
  exs1024_uniform(R0) ->
      {V, R1} = exs1024_next(R0),
      {V / 18446744073709551616.0, R1}.
  
  %% Generate integer from given xorshift1024star internal state.
  
  exs1024_uniform(Max, R) ->
      {V, R1} = exs1024_next(R),
  