anchor.diff:        wait_for_cluster_init(ModulesNum, TriesNum - 1)
     end.
   
  +%% wait_for_db_reaction/0
  +%% ====================================================================
  +%% @doc Give DB time for processing request.
  +%% @end
  +-spec wait_for_db_reaction() -> ok.
  +%% ====================================================================
   wait_for_db_reaction() ->
     timer:sleep(?VIEW_REBUILDING_TIME).
   
  +%% wait_for_fuse_session_exp/0
  +%% ====================================================================
  +%% @doc Give FUSE session time to expire.
  +%% @end
  +-spec wait_for_fuse_session_exp() -> ok.
  +%% ====================================================================
   wait_for_fuse_session_exp() ->
     timer:sleep(?FUSE_SESSION_EXP_TIME).
   
  +%% wait_for_request_handling/0
  +%% ====================================================================
  +%% @doc Give cluster time for request handling.
  +%% @end
  +-spec wait_for_request_handling() -> ok.
  +%% ====================================================================
   wait_for_request_handling() ->
     timer:sleep(?REQUEST_HANDLING_TIME).
   
  -wait_for_state_loading() ->
  -  wait_for_state_loading(20).
  -
  +%% check_state_loading/0
  +%% ====================================================================
  +%% @doc Check if state is loaded from DB.
  +%% @end
  +-spec check_state_loading() -> Ans when
  +  Ans :: boolean() | {exception, E1, E2},
  +  E1 :: term(),
  +  E2 :: term().
  +%% ====================================================================
   check_state_loading() ->
     try
       gen_server:call({global, ?CCM}, check_state_loaded, 1000)
  
positive.code:       {exception, E1, E2}
    end.
  
  wait_for_state_loading(0) ->
    ?assert(check_state_loading());
  
  
negative.code:       {exception, E1, E2}
    end.
  
  %% wait_for_cluster_init/0
  %% ====================================================================
  %% @doc Wait until cluster is initialized properly.
  %% @end
  -spec wait_for_cluster_init() -> Ans when
    Ans :: boolean() | {exception, E1, E2},
    E1 :: term(),
    E2 :: term().
  %% ====================================================================
  wait_for_cluster_init() ->
    wait_for_cluster_init(0).
  
  %% wait_for_cluster_init/1
  %% ====================================================================
  %% @doc Wait until cluster is initialized properly.
  %% @end
  -spec wait_for_cluster_init(ModulesNum :: integer()) -> Ans when
    Ans :: boolean() | {exception, E1, E2},
    E1 :: term(),
    E2 :: term().
  %% ====================================================================
  wait_for_cluster_init(ModulesNum) ->
    wait_for_cluster_init(ModulesNum + length(?Modules_With_Args), 20).
  
  %% wait_for_cluster_init/2
  %% ====================================================================
  %% @doc Wait until cluster is initialized properly.
  %% @end
  -spec wait_for_cluster_init(ModulesNum :: integer(), TriesNum :: integer()) -> Ans when
    Ans :: boolean() | {exception, E1, E2},
    E1 :: term(),
    E2 :: term().
  %% ====================================================================
  wait_for_cluster_init(ModulesNum, 0) ->
  %%   ?assert(check_init(ModulesNum))
    check_init(ModulesNum);
  