anchor.diff:  %% 
   %% @end
   %% =====================================================================
  -transform_apply_call(Node, {RecName, FieldList, N, Name, Arity, ModName, AnnAST}) ->
  +transform_apply_call(Node, {RecName, FieldList, N, 
  +                     Name, Arity, ModName, AnnAST}) ->
     Operator = refac_syntax:application_operator(Node),
     Arguments = refac_syntax:application_arguments(Node),
     case Arguments of
       [Fun, Args] ->
  -      case refac_syntax:type(Fun) of
  -	implicit_fun ->
  -	  FName = refac_syntax:implicit_fun_name(Fun),
  -	  B = refac_syntax:atom_value(refac_syntax:
  -                                      arity_qualifier_body(FName)),
  -	  A = refac_syntax:atom_value(refac_syntax:
  -                                      arity_qualifier_argument(FName)),
  -	  case {B, A} of
  -	    {Name, Arity} ->
  -io:format("ARGS: ~p ~n", [Args]),
  -{Node,false};
  -            _ -> {Node, false}
  -	  end;
  -	atom -> 
  -          Args1 = refac_syntax:list_elements(Args),
  -          Len = length(Args1),
  -          case {refac_syntax:atom_value(Fun), Len} of
  -	    {Name, Arity} ->
  -              Args2 = create_new_patterns(Args1, N, RecName, FieldList),
  -              create_apply(Args2, AnnAST, RecName, FieldList, [Fun], Operator, Node);
  -            _ -> {Node, false}
  -          end;
  +      Args1 = refac_syntax:list_elements(Args),
  +      Len = length(Args1),
  +      case {refac_syntax:atom_value(Fun), Len} of
  +	{Name, Arity} ->
  +         Args2 = create_new_patterns(Args1, N, RecName, FieldList),
  +         create_apply(Args2, AnnAST, RecName, FieldList, [Fun], Operator, Node);
           _ -> {Node, false}
         end;
       [Mod, Fun, Args] ->
  
positive.code:            (FunArity == Arity) and (DefMod == Mod) of
          true ->
            Clauses = refac_syntax:function_clauses(Tree),
            NewClauses = new_clause(Clauses, N, RecName, FieldList, AnnAST),	      
            {refac_syntax:copy_attrs(Tree, 
                         refac_syntax:function(FunName, NewClauses)), false};
  	false -> {Tree, false}
  
negative.code:   end.
  
  
  %% =====================================================================
  %% @spec create_case_apply(Tree::syntaxtree(), First::[syntaxtree()], 
  %%     Last::[syntaxtree()], Tuple::syntaxtree(), RecName::string(), 
  %%     FieldList::[string()], Operator::syntaxtree(), List::[syntaxtree()])
  %%                                                             -> syntaxtree()
  %% 
  %% @end
  %% =====================================================================
  create_case_apply(Tree,First,Last,Tuple,RecName,FieldList,Operator,List)->
    TupleElements = get_tuple_elements(Tuple, 1, [],length(FieldList)),
    NewRecFields = lists:map(fun({FName, Value})->
                               refac_syntax:record_field(
  