From: John Darrington Date: Wed, 23 Nov 2011 12:41:28 +0000 (+0100) Subject: glm.c:get_ssq Remove unnecessary assignment X-Git-Tag: v0.7.9~82 X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ff3d8d9bdcd9133f46918f39bfcef05a07628923;p=pspp-builds.git glm.c:get_ssq Remove unnecessary assignment --- diff --git a/src/language/stats/glm.c b/src/language/stats/glm.c index fd5870c1..f0311f82 100644 --- a/src/language/stats/glm.c +++ b/src/language/stats/glm.c @@ -416,8 +416,7 @@ get_ssq (struct covariance *cov, gsl_vector *ssq, const struct glm_spec *cmd) } model_cov = gsl_matrix_alloc (cm->size1 - n_dropped_model, cm->size2 - n_dropped_model); - gsl_matrix_set (model_cov, 0, 0, gsl_matrix_get (cm, 0, 0)); - submodel_cov = gsl_matrix_calloc (cm->size1 - n_dropped_submodel, cm->size2 - n_dropped_submodel); + submodel_cov = gsl_matrix_alloc (cm->size1 - n_dropped_submodel, cm->size2 - n_dropped_submodel); fill_submatrix (cm, model_cov, model_dropped); fill_submatrix (cm, submodel_cov, submodel_dropped);