anchor.diff:      case Freq >= Thresholds#threshold.min_freq of
         true ->
   	  Exprs = get_expr_list(Range, TmpASTTab),
  -	  [{{FName, FunName, Arity, _}, _, _}| _] = Range,
  +	  [{{FName, FunName, Arity, _}, _, _,_}| _] = Range,
   	  VarTab = Tabs#tabs.var_tab,
   	  VarsToExport = get_vars_to_export(Exprs, {FName, FunName, Arity}, VarTab),
   	  {Ranges, ExportVars, SubSt} = lists:unzip3(Res),
  
positive.code:     end,
      examine_clone_candidates(Cs, Thresholds, Tabs, TmpASTTab,Pid, Num + 1).
  
  examine_a_clone_candidate(_C={Ranges, {_Len, _Freq}}, Thresholds,Tabs, TmpASTTab) ->
      ASTTab=Tabs#tabs.ast_tab,
      Ranges1=lists:append(Ranges),
      lists:foreach(fun({Key,_, _}) ->
  			  ets:insert(TmpASTTab, ets:lookup(ASTTab, Key))
  		  end, Ranges1),
      Clones=examine_clone_class_members(Ranges, Thresholds,Tabs, TmpASTTab, []),
      ClonesWithAU = [{Rs, {Len, Freq}, get_anti_unifier(TmpASTTab, Info)}
       		    || {Rs, {Len, Freq}, Info} <- Clones],
      ClonesWIthAUInAbsoluteLocs=[get_clone_class_in_absolute_locs(Clone)||Clone<-ClonesWithAU],
      ets:delete_all_objects(TmpASTTab),
      ClonesWIthAUInAbsoluteLocs.
     
  
  examine_clone_class_members(Rs, Thresholds, _, _, Acc) 
    when length(Rs)< Thresholds#threshold.min_freq ->
      remove_sub_clones(Acc);
  
negative.code: 	  remove_overlapped_ranges(Rs, {S, E}, [{S, E}| Acc])
      end.
  get_clones_in_ranges(Cs, Data, _MinLen, MinToks, MinFreq) ->
      refac_io:format("Cs:\n~p\n", [Cs]),
      F0 = fun ({S, E}) ->
  		 {_, Ranges} = lists:unzip(lists:sublist(Data, S, E - S + 1)),
  		 refac_misc:remove_duplicates(Ranges)
  