LEFT | RIGHT |
(no file at all) | |
1 \version "2.14.0" | 1 \version "2.14.0" |
2 \header{ | 2 \header{ |
3 | 3 |
4 texidoc = "Fully concave beams should be horizontal. Informally spoken, | 4 texidoc = "Fully concave beams should be horizontal. Informally spoken, |
5 concave refers to the shape of the notes that are opposite a | 5 concave refers to the shape of the notes that are opposite a |
6 beam. If an up-beam has high notes on its center stems, then we call | 6 beam. If an up-beam has high notes on its center stems, then we call |
7 it concave. | 7 it concave. |
8 | 8 |
9 If a beam fails a test, the desired slope is printed next to it. | 9 If a beam fails a test, the desired slope is printed next to it. |
10 | 10 |
(...skipping 40 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
51 \layout{ | 51 \layout{ |
52 ragged-right = ##t | 52 ragged-right = ##t |
53 #(define debug-beam-quanting #t) | 53 #(define debug-beam-quanting #t) |
54 } | 54 } |
55 | 55 |
56 | 56 |
57 | 57 |
58 | 58 |
59 #(define (<> x y) (not (= x y))) | 59 #(define (<> x y) (not (= x y))) |
60 \new Voice { | 60 \new Voice { |
61 \override Beam #'positions = #(ly:make-simple-closure | 61 \override Beam #'positions = #(check-slope-callbacks =) |
62 » » » » (ly:make-simple-closure | |
63 » » » » (append | |
64 » » » » (list chain-grob-member-functions `(,cons 0 0
)) | |
65 » » » » (check-slope-callbacks =)))) | |
66 \rossBeams | 62 \rossBeams |
67 ·· | 63 ·· |
68 } | 64 } |
LEFT | RIGHT |