]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/beam-shortened-lengths.ly
bump .ly \version to 2.10.0
[lilypond.git] / input / regression / beam-shortened-lengths.ly
index 16f651676bbd5a36d6a9a080e8edc066421e1eed..084cd9abf1ea774240298e6b97745dbe3215b659 100644 (file)
@@ -1,18 +1,24 @@
 
-\version "2.1.22"
+\version "2.10.0"
 
 \header{
-    texidoc="Beams in unnatural direction, have shortened stems, but do not look too short."
-    }
+  texidoc="Beams in unnatural direction, have shortened stems, but do not look too short."
+}
+\layout{ ragged-right = ##t }
+
+
+\relative c'{
+  \override Beam  #'positions =
+  #(ly:make-simple-closure
+    (ly:make-simple-closure
+     (list chain-grob-member-functions
+      `(,cons 0 0)
+      ly:beam::calc-least-squares-positions
+      ly:beam::slope-damping
+      ly:beam::shift-region-to-valid
+    )))
+  
+  \stemUp
+  f'4  f8[ f]  f16[ f]  f32[ f]  f64[ f]  f128[ f] 
+}
 
-\score{
-    \notes\relative c'{
-       \override Beam  #'position-callbacks =
-        #`(,Beam::least_squares
-        ,Beam::check_concave
-        ,Beam::slope_damping)
-       \stemUp
-        f'4  f8[ f]  f16[ f]  f32[ f]  f64[ f]  f128[ f] 
-    }
-    \paper{ raggedright = ##t}
-}