-\version "2.12.0"
+\version "2.16.0"
\header {
texidoc = "Concave beaming works for chords as well as monophonic
music.
% cut & paste from beam-concave.ly
-#(define (<> x y) (not (= x y)))
+#(define (<> x y) (not (= x y)))
mustBeHorizontal = {
- \override Staff.Beam #'positions =
- #(ly:make-simple-closure
- (ly:make-simple-closure
- (append
- (list chain-grob-member-functions `(,cons 0 0))
- (check-slope-callbacks =))))
+ \override Staff.Beam #'positions = #(check-slope-callbacks =)
}
mustNotBeHorizontal = {
- \override Staff.Beam #'positions =
- #(ly:make-simple-closure
- (ly:make-simple-closure
- (append
- (list chain-grob-member-functions `(,cons 0 0))
- (check-slope-callbacks <>))))
+ \override Staff.Beam #'positions = #(check-slope-callbacks <>)
}
\new Voice {