anchor.diff:  
           %% A40a (see flowchart)
           Rank_newprop > Rank_latest ->
  -            react_to_env_C300(P_newprop, S);
  +            react_to_env_C300(P_newprop, P_latest, S);
   
           %% A40b (see flowchart)
           P_latest#projection.author_server == MyFLU
  
positive.code:                                                   erlang:yield(),
                                                    Res = test_react_to_env(MMM),
                                                    Res=Res %% ?D({self(), Res})
                                                end || _ <- lists:seq(1,7)],
                                               Parent ! done
                                       end) || MMM <- [Ma, Mb, Mc] ],
                         [receive
  
negative.code:             %% P_latest is known to be crap.
              %% By process of elimination, P_newprop is best,
              %% so let's write it.
              react_to_env_C300(P_newprop, P_latest, S)
      end.
  
  react_to_env_C110(P_latest, #ch_mgr{myflu=MyFLU} = S) ->
  