+ col = design_matrix_var_to_column (cov, v);
+ for (i = 0; i < cat_get_n_categories (v) - 1; i++)
+ {
+ col += i;
+ y = -1.0 * cat_get_category_count (i, v) / ssize;
+ tmp_val = cat_subscript_to_value (i, v);
+ if (compare_values (tmp_val, val1, var_get_width (v)))
+ {
+ y += -1.0;
+ }
+ gsl_matrix_set (cov->m, row, col, x * y * weight);
+ gsl_matrix_set (cov->m, col, row, x * y * weight);
+ }
+}