-\score{
- \notes\relative c'{
- \override Beam #'position-callbacks =
- #`(,Beam::least_squares
- ,Beam::check_concave
- ,Beam::slope_damping)
+\relative c'{
+ \override Beam #'position =
+ #(ly:make-simple-closure
+ (ly:make-simple-closure
+ (list chain-grob-member-functions
+ `(,cons 0 0)
+ ly:beam::calc-least-squares-positions
+ ly:beam::slope-damping
+ ly:beam::shift-region-to-valid
+ ly:beam::set-stem-lengths
+ )))