anchor.diff:  encode(_, Output, _, _, _, _, _) ->
     Output.
   
  -
   encode1([C|Rest], Output, H, B, N, Delta, Bias) when C < N ->
     Delta2 = Delta + 1,
     case Delta2 of
  
positive.code:                   true ->
                      exit(overflow)
                  end,
  
        {Head, Tail} = lists:split(I2, Output),
        Output2 = Head ++ [N2] ++ Tail,
        decode(Rest, Output2, N2, Bias2, I2+1);
  
negative.code:          false -> I0 + (Digit * Weight);
           true -> exit(overflow)
         end,
    T = if
          K =< Bias -> ?TMIN;
          K >= (Bias + ?TMAX) -> ?TMAX;
  