]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/beam-extreme.ly
Mf2pt1 fixes: run mf2pt1 in a temp dir to fix filesystem pollution.
[lilypond.git] / input / regression / beam-extreme.ly
index 2c8d7ddf74633946a801de0e46ab239e18b74f61..b622dbd2770a4e8b270c6b4505f867430055f71f 100644 (file)
@@ -1,48 +1,40 @@
-#(ly:set-option 'old-relative)
-\version "1.9.0"
+
+\version "2.10.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.
+@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
-    raggedright = ##t
-  }
+{
+                               % If we want to test extreme beams,
+                               % we should not have them auto-kneed
+  \override Beam  #'auto-knee-gap = ##f
+  \extreme
 }