- writer = sort_create_writer (ordering, reader_width);
- while (casereader_read (r, &c))
- {
- struct ccase output;
- double d = append_difference (&c, 0, vp);
+ subcase_init_var (&ordering, ws[i].absdiff, SC_ASCEND);
+ writer = sort_create_writer (&ordering, reader_width);
+ subcase_destroy (&ordering);