anchor.diff:  parse_arity_tuple({cons, _, _, ArityTuple}, Num) ->
       parse_arity_tuple(ArityTuple, Num + 1);
   parse_arity_tuple({nil, _}, Num) -> Num;
  +parse_arity_tuple({var, _, _}, _Num) -> 1;
   parse_arity_tuple(_, _) -> false.
   
   find_function_in_export(_CurrentModule, undefined, _Column) ->
  
positive.code:         {SyntaxTree, File} ->
              case find_function(SyntaxTree, Function, Arity) of
                  {function, {Line, Column}, _Function, _Arity, _Clauses} -> {File, Line, Column};
                  _ -> undefined
              end
      end;
  
negative.code: matched_fun_clause([_ | Tail], Line) -> matched_fun_clause(Tail, Line);
  matched_fun_clause([], _line) -> [].
  
  find_clause_location([{clause, Location, ClauseArgs, _, _} | TailClauses], Args) ->
      case comparison_args(ClauseArgs, Args) of
          false -> find_clause_location(TailClauses, Args);
          true -> Location
      end;
  find_clause_location([], _Args) -> false.
  
  comparison_args([{Type, _, Value} | T1], [{Type, _, Value} | T2]) ->
      comparison_args(T1, T2);
  comparison_args([], []) -> true;
  comparison_args(_, _) -> false.
  
  find_function_with_line(FileSyntaxTree, Line) ->
      AllFunctionsInReverseOrder = lists:foldl(fun (TopLevelSyntaxTree, Acc) ->
          erl_syntax_lib:fold(fun (SyntaxTree, SingleAcc) ->
  