From 49921e999c501ce871973692aa9b9960fa4c5cc7 Mon Sep 17 00:00:00 2001 From: John Darrington Date: Sat, 21 Nov 2015 09:53:55 +0100 Subject: [PATCH] Remove diagnostic code from quick-cluster.c --- src/language/stats/quick-cluster.c | 14 -------------- 1 file changed, 14 deletions(-) diff --git a/src/language/stats/quick-cluster.c b/src/language/stats/quick-cluster.c index 0a2b75de25..f4c64b0997 100644 --- a/src/language/stats/quick-cluster.c +++ b/src/language/stats/quick-cluster.c @@ -190,20 +190,6 @@ matrix_mindist (const gsl_matrix *m, int *mn, int *mm) } -static void -dump_matrix (const gsl_matrix *m) -{ - size_t i, j; - - for (i = 0 ; i < m->size1; ++i) - { - for (j = 0 ; j < m->size2; ++j) - printf ("%02f ", gsl_matrix_get (m, i, j)); - printf ("\n"); - } -} - - /* Return the distance of C from the group whose index is WHICH */ static double dist_from_case (const struct Kmeans *kmeans, const struct ccase *c, const struct qc *qc, int which) -- 2.30.2