+ Real ledgerlinethickness =
+ (me->get_paper ()->get_var ("ledgerlinethickness"));
+ Real blotdiameter = ledgerlinethickness;
+ // (me->get_paper ()->get_var ("blotdiameter"));
+ Interval y_extent =
+ Interval (-0.5*(ledgerlinethickness),
+ +0.5*(ledgerlinethickness));
+ Box ledger_line (x_extent, y_extent);
+
+ Molecule proto_ledger_line =
+ Lookup::roundfilledbox (ledger_line, blotdiameter);
+
+ if (!take_space)
+ proto_ledger_line.set_empty (true);
+
+ Direction dir = (Direction)sign (pos);
+ Real offs = (Staff_symbol_referencer::on_staffline (me, pos))
+ ? 0.0
+ : -dir * inter_f;
+ for (int i = 0; i < lines_i; i++)
+ {
+ Molecule ledger_line (proto_ledger_line);
+ ledger_line.translate_axis (-dir * inter_f * i * 2 + offs, Y_AXIS);
+ molecule.add_molecule (ledger_line);
+ }