anchor.diff:  
   %%%===================================================================
   %%% Internal functions
  -%%%===================================================================+%%%===================================================================
  +
  +exec_and_check_time(Mod, M, A) ->
  +    BeforeProcessing = os:timestamp(),
  +    Ans = erlang:apply(Mod, M, A),
  +    AfterProcessing = os:timestamp(),
  +    {Ans, timer:now_diff(AfterProcessing, BeforeProcessing)}.
  +
  +create_deep_tree(Worker) ->
  +    create_deep_tree(Worker, "/spaces/Space 1", 18).
  +
  +create_deep_tree(Worker, Prefix, 1) ->
  +    {{A, U}, Time} = ?call_with_time(Worker, create, [{path, list_to_binary(Prefix)}, #file_meta{name = <<"1">>}]),
  +    ?assertMatch({ok, _}, {A, U}),
  +    {list_to_binary(Prefix++"/1"), Time};
  +
  +create_deep_tree(Worker, Prefix, Num) ->
  +    StringNum = integer_to_list(Num),
  +    {A, U} = ?call(Worker, create, [{path, list_to_binary(Prefix)}, #file_meta{name = list_to_binary(StringNum)}]),
  +    ?assertMatch({ok, _}, {A, U}),
  +    create_deep_tree(Worker, Prefix++"/"++StringNum, Num-1).
  +
  +delete_deep_tree(Worker) ->
  +    delete_deep_tree(Worker, "/spaces/Space 1", 18).
  +
  +delete_deep_tree(Worker, Prefix, 1) ->
  +    ?call(Worker, delete, [{path, list_to_binary(Prefix)}]);
  +
  +delete_deep_tree(Worker, Prefix, Num) ->
  +    StringNum = integer_to_list(Num),
  +    delete_deep_tree(Worker, Prefix++"/"++StringNum, Num-1),
  +    ?call(Worker, delete, [{path, list_to_binary(Prefix)}]).
positive.code:     ?assertMatch({ok, #document{value = #file_meta{name = <<"dir1">>}}},    {A7, U7}),
      ?assertMatch({ok, #document{value = #file_meta{name = <<"file1">>}}},   {A8, U8}),
  
      {A30, U30} = ?call(Worker1, gen_path, [{uuid, U21}]),
      {A31, U31} = ?call(Worker2, gen_path, [{uuid, U22}]),
      {A32, U32} = ?call(Worker2, gen_path, [{uuid, U23}]),
      ?assertMatch({ok, <<"/spaces/Space 1/dir2/file1">>}, {A30, U30}),
      ?assertMatch({ok, <<"/spaces/Space 1/dir2/file2">>}, {A31, U31}),
      ?assertMatch({ok, <<"/spaces/Space 1/dir2/file3">>}, {A32, U32}),
  
      {A40, U40} = ?call(Worker1, resolve_path, [<<"/spaces/Space 1/dir2/file1">>]),
      {A41, U41} = ?call(Worker1, resolve_path, [<<"/spaces/Space 1/dir2">>]),
      ?assertMatch({ok, {#document{key = U21}, _}}, {A40, U40}),
      ?assertMatch({ok, {#document{key = U20}, _}}, {A41, U41}),
  
      {A9, U9} =   ?call(Worker1, get_scope, [U14]),
      {A10, U10} = ?call(Worker1, get_scope, [U5]),
      {A11, U11} = ?call(Worker2, get_scope, [U6]),
      {A12, U12} = ?call(Worker1, get_scope, [U7]),
      {A13, U13} = ?call(Worker2, get_scope, [U8]),
      ?assertMatch({ok, #document{key = <<"">>}},         {A9, U9}),
  
negative.code:     ?assertMatch({ok, _}, {A22, U22}),
      ?assertMatch({ok, _}, {A23, U23}),
  
      {Level20Path, CreateLevel20} = create_deep_tree(Worker2),
  
      BigDir =
          fun Loop(File) when File < 99 ->
              ?assertMatch({ok, _}, ?call(Worker1, create, [{path, <<"/spaces/Space 1/dir1">>}, #file_meta{name = integer_to_binary(1000 + File)}])),
              Loop(File + 1);
              Loop(_) ->
                  ok
          end,
      BigDir(0),
  
      {{A14, U14}, GetLevel0} = ?call_with_time(Worker1, get, [{path, <<"/">>}]),
      {{A5, U5}, GetLevel1} = ?call_with_time(Worker1, get, [{path, <<"/spaces">>}]),
      {{A6, U6}, GetLevel2} = ?call_with_time(Worker2, get, [{path, <<"/spaces/Space 1">>}]),
      {A7, U7} = ?call(Worker1, get, [{path, <<"/spaces/Space 1/dir1">>}]),
      {A8, U8} = ?call(Worker2, get, [{path, <<"/spaces/Space 1/dir1/file1">>}]),
      ?assertMatch({ok, #document{value = #file_meta{name = <<"">>}}},        {A14, U14}),
  