anchor.diff:              io:format("WARNING! Unexpected request: ~p~n", [Other]),
               ticker(Listings, Interval)
       after Interval ->
  -            reseed(),
               Prices = [{Symbol, random_price()} || Symbol <- Listings],
               Message = {ticker, {prices, Prices}},
   
  
positive.code:     CashBalance = lists:sum(Transactions),
      receive
          {ticker, {prices, Prices}} ->
              reseed(),
              {Symbol, Price} = choice(Prices),
              {NewPortfolio, NewTransactions} = transaction(
                  choice([buy, sell]), Symbol, Price, 1, Portfolio, Transactions
  
negative.code: 
  %% Pick and return a random element from a given list
  choice(List) ->
      reseed(),
      Maximum = length(List),
      Element = random:uniform(Maximum),
      lists:nth(Element, List).
  