input/regression/beam-extreme.ly

   1
   2 \version "1.9.1"
   3 \header{
   4 texidoc="
   5 Beams should behave reasonably well, even under extreme circumstances.
   6 Stems may be short, but noteheads should never touch the beam.  Note that
   7 under normal circumstances, these beams would get knees here
   8 Beam.auto-knee-gap was set to false.
   9 "
  10 }
  11
  12 extreme = \notes\relative c'' {
  13   \stemBoth
  14    g8[ c c,]
  15    c16[ c'' a f]
  16   \stemUp
  17    c,,32[ c'' a f]
  18
  19   %%%%%%%
  20   \stemBoth
  21   \times 2/3{ d16[ fis' d,]} \times 2/3{ cis[ g'' cis,,]}
  22   a'16 cis a, g''' % Used to give a nice beam directed upwards.
  23   \stemBoth
  24
  25   \transpose c c {
  26           \stemDown  e'8[ e e']
  27       }
  28 }
  29
  30 \score {
  31   {
  32     % If we want to test extreme beams,
  33     % we should not have them auto-kneed
  34     \property Voice.Beam \override #'auto-knee-gap = ##f
  35     \extreme
  36
  37
  38     %% what does this test? --hwn
  39 %{
  40     \property Voice.Beam \override #'slope-limit = #1000
  41     \extreme
  42     %}
  43   }
  44   \paper{
  45 %    raggedright = ##t
  46     raggedright = ##t
  47   }
  48 }