input/regression/beam-extreme.ly

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