anchor.diff:      lists:member(LatestAuthor, NewPropDown).
   
   react_to_env_A40(Retries, P_newprop, P_latest, LatestUnanimousP,
  -                 #ch_mgr{name=MyName, proj=P_current}=S) ->
  +                 #ch_mgr{name=MyName, consistency_mode=CMode,
  +                         proj=P_current}=S) ->
       ?REACT(a40),
       [{Rank_newprop, _}] = rank_projections([P_newprop], P_current),
       [{Rank_latest, _}] = rank_projections([P_latest], P_current),
       LatestAuthorDownP = a40_latest_author_down(P_latest, P_newprop, S)
                           andalso
                           P_latest#projection_v1.author_server /= MyName,
  +    ?REACT({a40, ?LINE,
  +            [{latest_author, P_latest#projection_v1.author_server},
  +             {author_is_down_p, LatestAuthorDownP}]}),
   
       if
           %% Epoch == 0 is reserved for first-time, just booting conditions.
  
positive.code:     %% counter values of 0 & 1.
      %%
      put(react, []),
      if S#ch_mgr.sane_transitions > 3 ->         % TODO review this constant
              %% ?V("Skr,~w,", [S#ch_mgr.name]),
              react_to_env_A10(S#ch_mgr{not_sanes=orddict:new()});
         true ->
              %% ?V("Sk,~w,~w,", [S#ch_mgr.name, S#ch_mgr.sane_transitions]),
              react_to_env_A10(S)
      end.
  
  react_to_env_A10(S) ->
  
negative.code:             {_, P_newprop3_flap_count} when P_newprop3_flap_count >= FlapLimit ->
                  AllHosed = get_all_hosed(P_newprop3),
                  P_current_inner = inner_projection_or_self(P_current),
                  {P_i, S_i, _Up} = calc_projection2(P_current_inner,
                                                     MyName, AllHosed, [], S3),
                  ?REACT({a30, ?LINE, [{raw_all_hosed,get_all_hosed(P_newprop3)},
                                      {up, Up},
                                      {all_hosed, AllHosed},
  