anchor.diff:                       _ -> wait
                   end
           end,
  -    loop_for_values(CheckF, NodeNames, [], 500, Timeout);
  +    loop_for_values(CheckF, NodeNames, [], Delay, Timeout);
   wait_for_value({height, MinHeight}, NodeNames, Timeout, Ctx) ->
       FaultInject = proplists:get_value(fault_inject, Ctx, #{}),
  +    Delay = proplists:get_value(delay, Ctx, 500),
       CheckF =
           fun(Node) ->
                   case request(Node, 'GetKeyBlockByHeight', maps:merge(#{height => MinHeight}, FaultInject)) of
  
positive.code:                 false -> {done, undefined}
              end
          end,
      loop_for_values(CheckF, NodeNames, [], 500, Timeout, {"Txs found ~p", [Txs]});
  wait_for_value({txs_any_dropped, Txs}, NodeNames, Timeout, Ctx) ->
      FaultInject = proplists:get_value(fault_inject, Ctx, #{}),
      CheckF =
          fun(Node) ->
              Exists = lists:foldl(fun(Tx, Acc) ->
  
negative.code:                     _ -> wait
                  end
          end,
      loop_for_values(CheckF, NodeNames, [], Delay, Timeout, {"Height ~p on nodes ~p", [MinHeight, NodeNames]});
  wait_for_value({txs_on_chain, Txs}, NodeNames, Timeout, Ctx) ->
      %% Not very optimal, since found Txs' are searched for in next round.
      FaultInject = proplists:get_value(fault_inject, Ctx, #{}),
      KeyBlocksWaiting = proplists:get_value(key_blocks, Ctx, 2),
      Delay = proplists:get_value(delay, Ctx, 500),
      CheckF =
          fun(Node) ->
                  Found =
  