anchor.diff:      Cycles = [digraph:get_short_cycle(MG, V) || SCC<-SCCs, V <-SCC],
       Cycles1 = remove_duplicated_cycles(Cycles),
       CycleWeakestLinkPairs= [{C, break_a_cycle(C, ModCallerCallees, MG, Files)}|| C<-Cycles1],
  -    cycles_to_dot(MG, OutFile,CycleWeakestLinkPairs),
  +    case CycleWeakestLinkPairs of 
  +	[] ->
  +	    ?wrangler_io("\nNo cyclic module dependencies have been found.\n", []);
  +	_ ->		
  +	    cycles_to_dot(MG, OutFile,CycleWeakestLinkPairs)
  +    end,
       digraph:delete(MG).
   
   
  
positive.code: 			  true -> {C1++C2, NewRowElems};
  			  false -> {RowKey, RowElems}
  		      end]],
      Matrix2=remove_duplicated_keys(Matrix1),
      %%refac_io:format("Matrix1:\n~p\n", [Matrix2]),
      Matrix2.
      
  					
  group_cols(_RowKey, RowElems, {C1, C2}) ->
  
negative.code: 			      (D1+D2)/2
  		      end}
  		 || {{Es, D1}, {Es, D2}}<-lists:zip(RowElems1, RowElems2)],
      Matrix1 =[{RowKey1, group_cols(RowKey, NewRowElems1, {C1, C2})}
  	      || {RowKey, RowElems} <- Matrix, 
  		 {RowKey1, NewRowElems1}<-
  