]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/beam-extreme.ly
Merge commit 'origin/dev/jneeman' into systems-per-page
[lilypond.git] / input / regression / beam-extreme.ly
index e39079160405b82345b020b4240d5c2658461391..61462dd7b846773ebdf368a03bf21d78277e2562 100644 (file)
@@ -1,47 +1,40 @@
-\version "1.7.5"
+
+\version "2.12.0"
 \header{
 texidoc="
 Beams should behave reasonably well, even under extreme circumstances.
 Stems may be short, but noteheads should never touch the beam.  Note that
-under normal circumstances, these beams would get knees here
-Beam.auto-knee-gap was set to false.
+under normal circumstances, these beams would get knees.  Here
+@code{Beam.auto-knee-gap} was set to false.
 "
 }
 
-extreme = \notes\relative c'' {
-  \stemBoth
-  [g8 c c,]
-  [c16 c'' a f]
+\layout{
+  %%    ragged-right = ##t
+  ragged-right = ##t
+}
+
+extreme = \relative c'' {
+  \stemNeutral
+   g8[ c c,]
+   c16[ c'' a f]
   \stemUp 
-  [c,,32 c'' a f]
+   c,,32[ c'' a f]
 
   %%%%%%%
-  \stemBoth
-  \times 2/3{[d16 fis' d,]} \times 2/3{[cis g'' cis,,]}
+  \stemNeutral
+  \times 2/3{ d16[ fis' d,]} \times 2/3{ cis[ g'' cis,,]}
   a'16 cis a, g''' % Used to give a nice beam directed upwards.
-  \stemBoth
+  \stemNeutral
 
   \transpose c c {
-         \stemDown [e'8 e e']
+         \stemDown  e'8[ e e']
       }
 }
 
-\score {
-  {
-    % If we want to test extreme beams,
-    % we should not have them auto-kneed
-    \property Voice.Beam \override #'auto-knee-gap = ##f
-    \extreme
-
-
-    %% what does this test? --hwn
-%{
-    \property Voice.Beam \override #'slope-limit = #1000
-    \extreme
-    %}
-  }
-  \paper{
-%    raggedright = ##t
-    linewidth = -1
-  }
+{
+                               % If we want to test extreme beams,
+                               % we should not have them auto-kneed
+  \override Beam  #'auto-knee-gap = ##f
+  \extreme
 }