anchor.diff:  		{Type, Reserve} = lists:keyfind(Type, 1, ReserveAmount),
   		case charge(Type, Reserve, false, Buckets) of
   			{R1, C1, NB1} when R1 > 0 ->
  -				{R2, C2, NB2} = purchase(Type, Price, Size, Reserve - C1, Validity, false, NB1),
  +				{R2, _C2, NB2} = purchase(Type, Price, Size, Reserve - C1, Validity, false, NB1),
   				{R2, NB2, Reserve};
  -			{R1, C1, NB1} ->
  +			{R1, _C1, NB1} ->
   				{R1, NB1, Reserve}
   		end
   	of
  
positive.code: rate(SubscriberID, Flag, DebitAmount, ReserveAmount, SessionIdentification) when is_list(SubscriberID)->
  	rate(list_to_binary(SubscriberID), Flag, DebitAmount, ReserveAmount, SessionIdentification);
  rate(SubscriberID, Flag, DebitAmount, ReserveAmount, SessionIdentification) ->
  	F = fun() ->
  			case mnesia:read(subscriber, SubscriberID, write) of
  				[#subscriber{product = #product_instance{product = ProdID}} = Subscriber] ->
  
negative.code: 			throw(price_not_found)
  	end.
  %% @hidden
  rate3(#subscriber{session_attributes = SessionList} = Subscriber,
  		Charged, Flag, ReserveAmount, SessionIdentification) ->
  	case Charged of
  		C1 when C1 > 0 ->
  