-#(ly:set-option 'old-relative)
-\version "1.9.1"
+\version "2.12.0"
\header{
- texidoc="Simple beams on middle staffline are allowed to be
+ texidoc="Simple beams on middle staffline are allowed to be
slightly sloped, even if the notes have ledgers. Beams reaching
beyond middle line can have bigger slope."
}
-\score{
- \notes\relative c'{
- %%\property Staff.Stem \set #'beamed-lengths = #'(3.50)
- %% c8[ d]
- %% d[ c]
- %% r2
- %% \property Staff.Stem \set #'beamed-lengths = #'(3.26)
-
- a8[^"small slope" b]
- b[ a]
-
- c''[ b]
- b[ c]
-
- c,,[ d]
- d[ c]
-
- a''[ g]
- g[ a]
-
- c,,[^"bigger slope" e]
- e[ c]
-
- a''[ f]
- f[ a]
- }
- \paper{
- linewidth = 0.0
- }
+\layout{
+ ragged-right = ##t
+ indent = 0
+}
+
+\relative c'{
+ %%\override Staff.Stem #'beamed-lengths = #'(3.50)
+ %% c8[ d]
+ %% d[ c]
+ %% r2
+ %% \override Staff.Stem #'beamed-lengths = #'(3.26)
+
+ a8[^"small slope" b]
+ b[ a]
+
+ c''[ b]
+ b[ c]
+
+ % baerenreiter test
+ b,,[ c]
+ c[ b]
+
+ b''[ a]
+ a[ b]
+
+ c,,[ d]
+ d[ c]
+
+ a''[ g]
+ g[ a]
+
+ c,,[^"bigger slope" e]
+ e[ c]
+
+ a''[ f]
+ f[ a]
}