anchor.diff:  
   react_to_env_B10(Retries, P_newprop, P_latest, LatestUnanimousP, P_current_calc,
                   _AmHosedP, Rank_newprop, Rank_latest,
  -                 #ch_mgr{name=MyName, proj=P_current}=S) ->
  +                 #ch_mgr{name=MyName, proj=P_current,
  +                         proj_history=History}=S) ->
       ?REACT(b10),
   
       P_current_upi = if is_record(P_current, projection_v1) ->
  
positive.code:                           true ->
                                 true
                         end,
      ?REACT({b10,?LINE,[{newprop_epoch,P_newprop#projection_v1.epoch_number},
                         {is_relevant_to_me_p,IsRelevantToMe_p}]}),
      if
          LatestUnanimousP andalso IsRelevantToMe_p ->
              ?REACT({b10, ?LINE,
                      [{latest_unanimous_p, LatestUnanimousP},
  
negative.code:     {{now_using, FinalProps, P_latest#projection_v1.epoch_number}, S3}.
  
  add_and_trunc_history(P_latest, H, MaxLength) ->
      Latest_U_R = {P_latest#projection_v1.upi, P_latest#projection_v1.repairing},
      H2 = if P_latest#projection_v1.epoch_number > 0 ->
                   queue:in(Latest_U_R, H);
              true ->
                   H
           end,
  