- dy_f_drul_[d] = .5 * interline_f * (stem_l_drul_[d]
- ? stem_l_drul_[d]->stem_end_f ()
- : stem_l_drul_[(Direction)-d]->stem_end_f ());
+ Stem* s = stem_l_drul_[d] ? stem_l_drul_[d] : stem_l_drul_[(Direction)-d];
+ dy_f_drul_[d] = dir_ == s->get_dir () ? s->stem_end_f ()
+ : s->stem_begin_f () + dir_ * nh_f / 2;
+ dy_f_drul_[d] *= .5 * interline_f;