anchor.diff:      <<>>;
   inner_row_hungarian_reduction(Column, Unit, Bin) ->
       Size = Unit * Column,
  -    <<BinRow:Size, Tail/bits>> = Bin,
  -    <<(inner_row_hungarian_reduction(Unit, <<BinRow:Size>>))/bits, 
  +    <<BinRow:Size/bits, Tail/bits>> = Bin,
  +    <<(inner_row_hungarian_reduction(Unit, BinRow))/bits, 
         (inner_row_hungarian_reduction(Column, Unit, Tail))/bits>>.
   
   %% @doc column reduction for hungarian
  
positive.code:               IIndex, Columns, Unit, <<PreData/bits, Head:Unit>>, Data, 
                inner_plus_columns(Index, Columns), Tail);
          false ->
              <<Value:Unit, Left/bits>> = Data,
              inner_insert_column(
                IIndex, Columns, Unit, <<PreData/bits, Value:Unit>>, Left,
                inner_plus_columns(Index, Columns), List)
      end.
  
  
negative.code:                        bitstring().
  inner_min(Column, Unit, Bin) ->
      Size = Unit * Column,
      <<BinMin:Size/bits, Tail/bits>> = Bin,
      inner_min(Column, Unit, BinMin, Tail).
  
  inner_min(_Column, _Unit, BinMin, <<>>) ->
      BinMin;
  inner_min(Column, Unit, BinMin, Bin) ->
      Size = Unit * Column,
      <<BinMin2:Size/bits, Tail/bits>> = Bin,
      inner_min(
        Column, Unit, 
        inner_zipwith(fun erlang:min/2, Unit, BinMin, BinMin2), Tail).
  
  -spec inner_min(Unit :: pos_integer(), BinData :: bitstring()) ->
                         pos_integer().
  