anchor.diff:  alpha(64) -> 0.709;
   alpha(M)  -> 0.7213 / (1 + 1.079 / M).
   
  -%%
  -%% HELPERS
  -%%
  -
  -
   pow(X, Y) ->
       math:pow(X, Y).
  -
  -
   
   run_of_zeroes(B) ->
       run_of_zeroes(1, B).
  
positive.code:     Registers = array:fix(
                    array:resize(
                      M, array:from_list(
                           proplists:get_value(<<"registers">>, Struct), 0))),
  
      #hyper{p = P, registers = Registers}.
  
  
  alpha(16) -> 0.673;
  
negative.code: -export([to_json/1, from_json/1]).
  
  -record(hyper, {p, registers}).
  
  %%
  %% API
  %%
  
  new(P) when 4 =< P andalso P =< 16 ->
      M = trunc(pow(2, P)),
  