anchor.diff:      ok = new_tx(#{node1  => N1,
                     node2  => N2,
                     amount => AmountFun(Bal1),
  -                  sender    => PK1,
  -                  recipient => PK2,
                     fee    => 1}),
       {ok, Pool12} = get_pool(N1),
       [NewTx] = Pool12 -- Pool11,
  
positive.code:     rpc:call(N, aec_tx_pool, peek, [infinity], 5000).
  
  new_tx(#{node1 := N1, node2 := N2, amount := Am, fee := Fee} = M) ->
      PK1 = maps_get(pk1, M, fun() -> ok(get_pubkey(N1)) end),
      PK2 = maps_get(pk2, M, fun() -> ok(get_pubkey(N2)) end),
      Port = rpc:call(N1, aeu_env, user_config_or_env,
                      [ [<<"http">>, <<"internal">>, <<"port">>],
                        aehttp, [internal, port], 8143], 5000),
  
negative.code:     N2 = aecore_suite_utils:node_name(Dev2),
      {ok, PK1} = get_pubkey(N1),
      ct:log("PK1 = ~p", [PK1]),
      {ok, Bal1} = get_balance(N1),
      ct:log("Balance on dev1: ~p", [Bal1]),
      true = (is_integer(Bal1) andalso Bal1 > 0),
  