sparse hierachical_modularity_clustering: remove 'flag' parameter

This is always set to 0.

diff --git a/lib/sparse/clustering.c b/lib/sparse/clustering.c
index f0802c08ac28d69fab44b0de0d7316773415a7ed..75b66d2fcf38df2ca464a9715ade66224972eb98 100644 (file)
--- a/lib/sparse/clustering.c
+++ b/lib/sparse/clustering.c
@@ -285,7 +285,7 @@ static Multilevel_Modularity_Clustering Multilevel_Modularity_Clustering_new(Spa
 
 
 static void hierachical_modularity_clustering(SparseMatrix A, int ncluster_target,
-                                             int *nclusters, int **assignment, double *modularity, int *flag){
+                                             int *nclusters, int **assignment, double *modularity){
   /* find a clustering of vertices by maximize modularity
      A: symmetric square matrix n x n. If real value, value will be used as edges weights, otherwise edge weights are considered as 1.
 
@@ -309,8 +309,6 @@ static void hierachical_modularity_clustering(SparseMatrix A, int ncluster_targe
 
   *modularity = 0.;
 
-  *flag = 0;
-
   grid = Multilevel_Modularity_Clustering_new(A, ncluster_target);
 
   /* find coarsest */
@@ -379,7 +377,7 @@ void modularity_clustering(SparseMatrix A, int inplace, int ncluster_target, int
 
   if (B->type != MATRIX_TYPE_REAL || !use_value) B = SparseMatrix_set_entries_to_real_one(B);
 
-  hierachical_modularity_clustering(B, ncluster_target, nclusters, assignment, modularity, flag);
+  hierachical_modularity_clustering(B, ncluster_target, nclusters, assignment, modularity);
 
   if (B != A) SparseMatrix_delete(B);