anchor.diff:                  ?assertNotEqual(undefined, B1a)
               end),
   
  -    % Wait for pings so the nodes discover each others and interconnect.
  -    TimeForPing1 = max(0, 35000 - (erlang:system_time(millisecond) - T1)),
  +    % Ensure a ping between start node3 and starting next.
  +    TimeForPing1 = max(0, ping_interval() - (erlang:system_time(millisecond) - T1)),
       timer:sleep(TimeForPing1),
   
       % Start 4th node that should get disconnected from node1 and connect to another one.
  
positive.code: 
  test_peer_discovery(Cfg) ->
      NodeConfig = #{
          ping_interval => 30000,
          max_inbound => 4
      },
      StartupTimeout = proplists:get_value(node_startup_time, Cfg),
  
negative.code: 
  ping_interval() ->
      aeu_env:user_config_or_env([<<"sync">>, <<"ping_interval">>],
                                 aecore, ping_interval, 5000).
  
  try_until(MSec, F) ->
      try F()
  