anchor.diff:                      167,173,228,112,201,249,157,157,78,64,8,128,168,111,29,73,
                       187,68,75,98,241,26,158,187,100,187,207,235,115,254,243>>
         }.
  +
  +key_blocks_count(Blocks) ->
  +    length(lists:filter(fun aec_blocks:is_key_block/1, Blocks)).
  
positive.code: 
      %% Add a transaction so there will be a micro block with fraud produced
      {ok, _Tx4} = add_spend_tx(N1, 1000, 1,  4, 10),
      {ok, [_Key3, Micro3|_]} =  aecore_suite_utils:mine_micro_blocks(N2, 1),
      ct:log("Micro3: ~p", [Micro3]),
  
      %% Check that the fraud would not be reported again.
  
negative.code:                          {ok, aec_pof:pubkey(PoF)})
      end,
  
      %% One N1 key block has been mined at the beginning of the test, hence + 1.
      N1KeyBlocksCount = key_blocks_count(N1Blocks1 ++ N1Blocks2) + 1,
      N2KeyBlocksCount = key_blocks_count(N2Blocks),
  
      check_post(N1, N1KeyBlocksCount, N2, N2KeyBlocksCount),
  
      ok.
  
  