[Pspp-cvs] Changes to pspp/src/regression.q

[Jason H Stover]

Index: pspp/src/regression.q
diff -u pspp/src/regression.q:1.6 pspp/src/regression.q:1.7
--- pspp/src/regression.q:1.6   Tue Oct 18 19:49:21 2005
+++ pspp/src/regression.q       Tue Oct 18 19:57:20 2005
@@ -99,12 +99,12 @@
   int n_cols = 5;
   double rsq;
   double adjrsq;
-  double stderr;
+  double std_error;
 
   assert (c != NULL);
   rsq = c->ssm / c->sst;
   adjrsq = 1.0 - (1.0 - rsq) * (c->n_obs - 1.0) / (c->n_obs - c->n_indeps);
-  stderr = sqrt ((c->n_indeps - 1.0) / (c->n_obs - 1.0));
+  std_error = sqrt ((c->n_indeps - 1.0) / (c->n_obs - 1.0));
   t = tab_create (n_cols, n_rows, 0);
   tab_dim (t, tab_natural_dimensions);
   tab_box (t, TAL_2, TAL_2, -1, TAL_1, 0, 0, n_cols - 1, n_rows - 1);
@@ -119,7 +119,7 @@
   tab_float (t, 1, 1, TAB_RIGHT, sqrt (rsq), 10, 2);
   tab_float (t, 2, 1, TAB_RIGHT, rsq, 10, 2);
   tab_float (t, 3, 1, TAB_RIGHT, adjrsq, 10, 2);
-  tab_float (t, 4, 1, TAB_RIGHT, stderr, 10, 2);
+  tab_float (t, 4, 1, TAB_RIGHT, std_error, 10, 2);
   tab_title (t, 0, _("Model Summary"));
   tab_submit (t);
 }