anchor.diff:  	curl_squeeze(State, Count, <<>>).
   
   curl_squeeze(State, Count, Acc) when Count > 0 ->
  -	{Hash, _} = lists:split(?TRIT_HASHLENGTH, State),
  -	Trytes = trinary:from_trits(lists:reverse(Hash)),
  +	Trytes = get_curl_hash(State),
   	State0 = curl_transform(State),
   	curl_squeeze(State0, Count - 1, <<Acc/binary, Trytes/binary>>);
   curl_squeeze(_, 0, Acc) ->
  
positive.code: 	X - 365.
  
  
  bcurlt(HighTrytes, LowTrytes) ->
  	bcurlt(HighTrytes, LowTrytes, 1).
  
  
negative.code: 	curl_absorb(Trytes, ?CURL_INITIAL_STATE).
  
  curl_absorb(<<Trytes:?TRYTE_HASHLENGTH/binary, Bin/binary>>, State) ->
  	State0 = next_curl_state(Trytes, State),
  	State1 = curl_transform(State0),
  	curl_absorb(Bin, State1);
  curl_absorb(<<>>, State) ->
  	State.
  
  