;; todo: clean this up a bit: the list is getting
;; rather long.
(molecule-callback . ,Beam::brew_molecule)
+ (y-dy-callbacks . (,Beam::least_squares
+ ,Beam::cancel_suspect_slope
+ ,Beam::slope_damping
+ ,Beam::quantise_dy
+ ,Beam::user_override
+ ,Beam::do_quantise_y))
+
(thickness . 0.48) ; in staff-space
(before-line-breaking-callback . ,Beam::before_line_breaking)
(after-line-breaking-callback . ,Beam::after_line_breaking)
(flag-width-function . ,default-beam-flag-width-function)
(space-function . ,default-beam-space-function)
(damping . 1)
+ (auto-knee-gap . 7)
(meta . ,(grob-description "Beam" beam-interface))
))
(SystemStartDelimiter . (
(molecule-callback . ,System_start_delimiter::brew_molecule)
(after-line-breaking-callback . ,System_start_delimiter::after_line_breaking)
- (collapse-height . 1.0)
+ ;; ugh, in practice, brace has height of 4.1 staff-spaces
+ (brace-collapse-height . 4.1)
+ (bracket-collapse-height . 1)
(thickness . 1.6)
(arch-height . 1.5)
(arch-angle . 50.0)