projects
/
pspp-builds.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
glm.c:get_ssq Remove unnecessary assignment
[pspp-builds.git]
/
src
/
language
/
stats
/
glm.c
diff --git
a/src/language/stats/glm.c
b/src/language/stats/glm.c
index fd5870c137d95f1d72aee239136ff497206abf76..f0311f8249439edff1896af75adb689eaf1b1926 100644
(file)
--- 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);
}
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);
fill_submatrix (cm, model_cov, model_dropped);
fill_submatrix (cm, submodel_cov, submodel_dropped);