anchor.diff:          %% {unanimous,P2,E2} = test_read_latest_public_projection(Ma, false),
   
           machi_partition_simulator:reset_thresholds(10, 50),
  -        _ = machi_partition_simulator:get([a,b,c]),
  +        _ = machi_partition_simulator:get(All_list),
   
           Parent = self(),
           DoIt = fun() ->
  
positive.code:     end.
  
  zoof_test() ->
      machi_partition_simulator:start_link({111,222,333}, 0, 100),
      _ = machi_partition_simulator:get([a,b,c]),
  
      {ok, FLUa} = machi_flu0:start_link(a),
      {ok, FLUb} = machi_flu0:start_link(b),
      {ok, FLUc} = machi_flu0:start_link(c),
      I_represent = I_am = a,
      {ok, Ma} = ?MGR:start_link(I_represent, [a,b,c], I_am),
      {ok, Mb} = ?MGR:start_link(b, [a,b,c], b),
      {ok, Mc} = ?MGR:start_link(c, [a,b,c], c),
      try
          {ok, P1} = ?MGR:test_calc_projection(Ma, false),
          P1Epoch = P1#projection.epoch_number,
  
negative.code:           end,
      {Epoch, {Tag, Res}}.
  
  all_reports_are_disjoint(Report) ->
      [] == [X || {_Epoch, Tuple}=X <- Report,
                  element(1, Tuple) /= ok_disjoint].
  
  extract_chains_relative_to_flu(FLU, Report) ->
      {FLU, [{Epoch, UPI} || {Epoch, {ok_disjoint, Es}} <- Report,
                             {agreed_membership, UPI} <- Es,
                             lists:member(FLU, UPI)]}.
  
  chain_to_projection(MyName, Epoch, UPI_list, All_list) ->
      ?MGR:make_projection(Epoch, MyName, All_list,
                           All_list -- UPI_list, % hack for down list
                           UPI_list, [], []).
  
  -endif.
  