anchor.diff:  %%
   %% @end
   %% ===========================================================================
  -
   expr_to_clause(Tree, Exp) ->
     Res = expr_to_clause_1(Tree, Exp),
     case Res of 
  
positive.code:                   Parameters = refac_syntax:application_arguments(Tree),
  		  NewArgs = get_arg(Parameters, C, N),
  		  {refac_syntax:copy_attrs(Tree, 
                                 refac_syntax:application(Operator, NewArgs)), false};
  		_ -> {Tree, false}
  	      end;
  	    module_qualifier ->
  
negative.code:                refac_syntax:application(Operator, [Fun, Args3])), 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 = get_arg(Args1, C, N),
                 Args3 = refac_syntax:list(Args2),
        	       {refac_syntax:copy_attrs(Node, 
                   refac_syntax:application(Operator, [Fun, Args3])), false};
               _ -> {Node, false}
            end;
          _ -> {Node, false}
        end;
      [Mod, Fun, Args] ->
        Args1 = refac_syntax:list_elements(Args),
        Len = length(Args1),
        case {refac_syntax:atom_value(Fun), Len, refac_syntax:atom_value(Mod)} of
          {Name, Arity, ModName} ->
            Args2 = get_arg(Args1, C, N),
            Args3 = refac_syntax:list(Args2),
  	  {refac_syntax:copy_pos(Node, refac_syntax:
                   copy_attrs(Node, refac_syntax:application(Operator, 
                                         [Mod, Fun, Args3]))),false};
          _ -> {Node, false}
        end;
      _ -> 
        {Node, false}
  