- Atom num (tdef_p_->get_atom (paper (), CENTER));
-
- if (beam_l_ && !bracket_visibility_b_)
- {
- num.translate (((Directional_spanner*)beam_l_)->center ());
- num.translate_axis (ncw, X_AXIS);
- }
+ Real w = extent (X_AXIS).length () + ncw;
+ Molecule num (lookup_l ()->text ("italic",
+ number_str_, paper_l ()));
+ num.align_to (X_AXIS, CENTER);
+ num.translate_axis (w/2, X_AXIS);
+ Real interline = paper_l ()->get_var ("interline");
+ Real dy = column_arr_.top ()->extent (Y_AXIS) [get_direction ()]
+ - column_arr_[0]->extent (Y_AXIS) [get_direction ()];
+ num.align_to (Y_AXIS, CENTER);
+ num.translate_axis (get_direction () * interline, Y_AXIS);
+
+ num.translate_axis (dy/2, Y_AXIS);