anchor.diff:                 } = LastProj,
       LastUp = lists:usort(OldUPI_list ++ OldRepairing_list),
       AllMembers = (S#ch_mgr.proj)#projection.all_members,
  -    {Up, _, RunEnv2} = calc_up_nodes(MyName, %OldThreshold, NoPartitionThreshold,
  -                                     AllMembers, RunEnv1),
  +    {Up, Partitions, RunEnv2} = calc_up_nodes(MyName,
  +                                              AllMembers, RunEnv1),
   
       NewUp = Up -- LastUp,
       Down = AllMembers -- Up,
  -
  -    %% HRRRRRRRmmm buggy icky ... causes things like:
  -    %% ...,to,[{epoch,8},{author,a},{upi,[a,b]},{repair,[a]}, oops!
  -
  -    %% %% Assumption: MyName is a local FLU and is always up & available.
  -    %% NewUp = lists:usort([MyName] ++ (Up -- LastUp)),
  -    %% Down = lists:usort((AllMembers -- Up) -- [MyName]),
   
       NewUPI_list = [X || X <- OldUPI_list, lists:member(X, Up)],
       Repairing_list2 = [X || X <- OldRepairing_list, lists:member(X, Up)],
  
positive.code:         case {NewUp, Repairing_list2} of
              {[], []} ->
                  {NewUPI_list, [], RunEnv2};
              {[], [H|T]} ->
                  {Prob, RunEnvX} = roll_dice(100, RunEnv2),
                  if Prob =< 50 andalso (NewUPI_list == []
                                         orelse
                                         true) ->
                                         %% TODO fix
                                         %% (RelativeToServer == hd(NewUPI_list))) ->
                          {NewUPI_list ++ [H], T, RunEnvX};
                     true ->
                          {NewUPI_list, OldRepairing_list, RunEnvX}
                  end;
              {_, _} ->
                  {NewUPI_list, OldRepairing_list, RunEnv2}
  
negative.code: %%                       that there are no partitions at all?
  
  calc_projection(_OldThreshold, _NoPartitionThreshold, LastProj,
                  RelativeToServer, Dbg,
                  #ch_mgr{name=MyName, myflu=MyFLU, runenv=RunEnv1}=S) ->
      #projection{epoch_number=OldEpochNum,
                  all_members=All_list,
                  upi=OldUPI_list,
  