anchor.diff:  broker() ->
       Portfolio = dict:new(),
       CashFlow = [],
  -    {registered_name, ProcName} = erlang:process_info(self(), registered_name),
  -    broker(ProcName, Portfolio, CashFlow).
  +    {registered_name, Name} = erlang:process_info(self(), registered_name),
  +    broker(Name, Portfolio, CashFlow).
   
   
   %%-----------------------------------------------------------------------------
   %% Function : broker/3
   %% Purpose  : Receives current prices and either buys or sells.
   %%-----------------------------------------------------------------------------
  -broker(ProcName, Portfolio, CashFlow) ->
  +broker(Name, Portfolio, CashFlow) ->
       receive
           {ticker, {prices, Prices}} ->
   
  
positive.code:             % Print accumulated values to stdout
              NewPortfolioList = dict:to_list(NewPortfolio),
              CashBalance = lists:sum(CashFlow),
              io:format("~p PORTFOLIO:~p~n", [ProcName, NewPortfolioList]),
              io:format("~p CASH BALANCE:~p~n", [ProcName, CashBalance]),
              io:format("~n"),
  
              % Now do it all over again! :)
              broker(ProcName, NewPortfolio, NewCashFlow);
  
          stop ->
              void;
  
          Other ->
              io:format("WARNING! Unexpected message: ~p~n", [Other]),
              broker(ProcName, Portfolio, CashFlow)
      end.
  
  
  
negative.code:             % Pack transaction data
              TransactionData = #transaction{
                  timestamp = market_lib:timestamp(),
                  broker = Name,
                  type = TransactionType,
                  symbol = Symbol,
                  shares = NumberOfShares,
  