anchor.diff:                  price = Price
               },
   
  -            % Perform transaction
  +            % Update accumulated data
               {
                   {portfolio, NewPortfolio}, {cashflow, NewCashFlow}
               } = market_lib:transaction(
  
positive.code:                 CashFlow
              ),
  
              % Send to scribe for recording
              scribe_proc ! {transaction, TransactionData},
  
              NewPortfolioList = dict:to_list(NewPortfolio),
              io:format("~p PORTFOLIO:~p~n", [ProcName, NewPortfolioList]),
              io:format("~p CASH BALANCE:~p~n", [ProcName, CashBalance]),
              io:format("~n"),
  
              broker(NewPortfolio, NewCashFlow);
  
          stop ->
  
negative.code: 
      receive
          {ticker, {prices, Prices}} ->
  
              % Decide what to do
              {Symbol, Price} = market_lib:choice(Prices),
              TransactionType = market_lib:choice([buy, sell]),
              NumberOfShares = market_lib:choice(
                  lists:seq(1, ?MAX_SHARES_PER_TRANSACTION)
              ),
  
              % Pack transaction data
              TransactionData = #transaction{
                  timestamp = market_lib:timestamp(),
                  broker = ProcName,
  