]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/beam-extreme.ly
* input/regression/override-nest.ly: new file.
[lilypond.git] / input / regression / beam-extreme.ly
index ebdda9481c135fd606d5a07f66d63dacb196f841..157463bebf6267a0ef26f896f1bad245bccbd365 100644 (file)
@@ -1,48 +1,40 @@
 
-\version "1.9.8"
+\version "2.7.13"
 \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.
+@code{Beam.auto-knee-gap} was set to false.
 "
 }
 
-extreme = \notes\relative c'' {
-  \stemBoth
+\layout{
+  %%    raggedright = ##t
+  raggedright = ##t
+}
+
+extreme = \relative c'' {
+  \stemNeutral
    g8[ c c,]
    c16[ c'' a f]
   \stemUp 
    c,,32[ c'' a f]
 
   %%%%%%%
-  \stemBoth
+  \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']
       }
 }
 
-\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
-    raggedright = ##t
-  }
+{
+                               % If we want to test extreme beams,
+                               % we should not have them auto-kneed
+  \override Beam  #'auto-knee-gap = ##f
+  \extreme
 }