input/regression/beam-shortened-lengths.ly

   1
   2 \version "2.12.0"
   3
   4 \header{
   5   texidoc="Beams in unnatural direction, have shortened stems, but do not look too short."
   6 }
   7 \layout{ ragged-right = ##t }
   8
   9
  10 \relative c'{
  11   \override Beam  #'positions =
  12   #(ly:make-simple-closure
  13     (ly:make-simple-closure
  14      (list chain-grob-member-functions
  15       `(,cons 0 0)
  16       ly:beam::calc-least-squares-positions
  17       ly:beam::slope-damping
  18       ly:beam::shift-region-to-valid
  19     )))
  20
  21   \stemUp
  22   f'4  f8[ f]  f16[ f]  f32[ f]  f64[ f]  f128[ f]
  23 }
  24