anchor.diff:  	N = erlang:unique_integer([positive]),
   	NewBuckets = charge(ProdRef, PriceAmount + AlterAmount,
   			[#bucket{id = generate_bucket_id(), product = [ProdRef],
  -				units = Units, remain_amount = Size, last_modified = {Now, N}}
  -				| Buckets]),
  +					units = Units, remain_amount = Size,
  +					attributes = #{bucket_type => normal},
  +					last_modified = {Now, N}} | Buckets]),
   	subscription(Product, Now, true, NewBuckets, T);
   subscription(Product, Now, false, Buckets, [#price{type = one_time} | T]) ->
   	subscription(Product, Now, false, Buckets, T);
  
positive.code: 						B4 = #bucket{id = generate_bucket_id(),
  								start_date = StartDate, end_date = EndDate,
  								remain_amount = RemainAmount, units = Units,
  								product = [ProductRef],
  								last_modified = make_lm()},
  						mnesia:write(B4),
  
negative.code: 						BId = generate_bucket_id(),
  						NewBucket = #bucket{id = BId, start_date = StartDate,
  								end_date = EndDate, remain_amount = Amount1,
  								attributes = #{bucket_type => normal},
  								units = Units, product = [ProductRef],
  								last_modified = make_lm()},
  						mnesia:write(bucket, NewBucket, write),
  