stems[i]->set_property ("neutral-direction", scm_from_int (total));
last_nonneutral = next_nonneutral;
while (last_nonneutral < dirs.size ()
&& dirs[last_nonneutral])
stems[i]->set_property ("neutral-direction", scm_from_int (total));
last_nonneutral = next_nonneutral;
while (last_nonneutral < dirs.size ()
&& dirs[last_nonneutral])