[Pspp-cvs] pspp/src/language/stats regression.q

[Jason H Stover]

CVSROOT:        /sources/pspp
Module name:    pspp
Changes by:     Jason H Stover <jstover>        06/10/20 19:33:53

Modified files:
        src/language/stats: regression.q 

Log message:
        removed useless code

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pspp/src/language/stats/regression.q?cvsroot=pspp&r1=1.33&r2=1.34

Patches:
Index: regression.q
===================================================================
RCS file: /sources/pspp/pspp/src/language/stats/regression.q,v
retrieving revision 1.33
retrieving revision 1.34
diff -u -b -r1.33 -r1.34
--- regression.q        20 Oct 2006 11:32:57 -0000      1.33
+++ regression.q        20 Oct 2006 19:33:52 -0000      1.34
@@ -832,7 +832,6 @@
   size_t i;
   size_t j;
   int n_quantiles = 100;
-  double increment;
   double tmp;
   struct pspp_coeff *coeff;
 
@@ -849,7 +848,6 @@
          reg_print_categorical_encoding (fp, c);
        }
       fprintf (fp, "%s", reg_export_t_quantiles_1);
-      increment = 0.5 / (double) increment;
       for (i = 0; i < n_quantiles - 1; i++)
        {
          tmp = 0.5 + 0.005 * (double) i;
@@ -1081,13 +1079,14 @@
   return n_data;
 }
 static void
-coeff_init (pspp_linreg_cache *c, struct design_matrix *dm)
+coeff_init (pspp_linreg_cache * c, struct design_matrix *dm)
 {
   c->coeff = xnmalloc (dm->m->size2 + 1, sizeof (*c->coeff));
   c->coeff[0] = xmalloc (sizeof (*(c->coeff[0]))); /* The first coefficient is 
the intercept. */
   c->coeff[0]->v_info = NULL;  /* Intercept has no associated variable. */
   pspp_coeff_init (c->coeff + 1, dm);
 }
+
 static bool
 run_regression (const struct ccase *first,
                 const struct casefile *cf, void *cmd_ UNUSED)