anchor.diff:  measure_loop(State, Fun, I) when 10 =< I ->
       %% Loop unrolling to dilute benchmark overhead...
       measure_loop(
  -      Fun(Fun(Fun(Fun(Fun(
  -                        Fun(Fun(Fun(Fun(Fun(
  -                                          State)))))))))),
  -      Fun,
  -      I - 10);
  +      Fun(Fun(Fun(Fun(Fun(  Fun(Fun(Fun(Fun(Fun(State))))) ))))),
  +      Fun, I - 10);
   measure_loop(State, Fun, I) when 1 =< I ->
       measure_loop(Fun(State), Fun, I - 1);
   measure_loop(_, _, _) ->
  
positive.code:         lcg35_inline ->
              {_, S} = rand:seed_s(dummy),
              {rand, S bsr (58-35)};
          lcg35_procdict ->
              {_, S} = rand:seed_s(dummy),
              _ = put(Alg, S bsr (58-35)),
  
negative.code:                              Generator(Range, St0), Range, X, St1)
                    end
            end, Algs, Iterations),
      _ =
          measure_1(
            fun (_Mod, _State) ->
                    Range = 1 bsl 64,
                    fun (St0) ->
                            {V, St1} = rand:splitmix64_next(St0),
                            if
                                is_integer(V), 0 =< V, V < Range ->
                                    St1
                            end
                    end
            end,
            splitmix64_inline, Iterations,
            TMarkUniform64Bit, OverheadUniform64Bit),
      %%
      ByteSize = 16, % At about 100 bytes crypto_bytes breaks even to exsss
      ct:pal("~nRNG ~w bytes performance~n",[ByteSize]),
  