-\version "2.13.46"
+\version "2.17.6"
-forcedLastBreak = { \break }
+forcedLastBreak = {} %% { \break } if needed to match original breaks
%% We want this to perfectly match the Bärenreiter spacing.
%% If we're not using 6 systems, there's definitely a problem.
#(define (assert-system-count-override count)
- (ly:export #{ \override NoteHead #'after-line-breaking
- = #(lambda (smob) (assert-system-count smob $count))
- #}))
+ #{ \override NoteHead.after-line-breaking
+ = #(lambda (smob) (assert-system-count smob count))
+ #})
\header {
sarabandeA = \context Voice \relative c {
- \override Staff.NoteCollision #'merge-differently-dotted = ##t
+ \override Staff.NoteCollision.merge-differently-dotted = ##t
<< { d8. e16 e4.\trill d16 e } \\
d'[ cis] |
%% d4 d,,2 |
d4
-% #(assert-system-count-override 6)
+% $(assert-system-count-override 6)
d,,2 |
}
\context {
\Staff
fontSize = #-1
- \override StaffSymbol #'staff-space = #0.8
+ \override StaffSymbol.staff-space = #0.8
}
\context {
\Score
- \override SpacingSpanner #'spacing-increment = #0.96
+ \override SpacingSpanner.spacing-increment = #0.96
}
indent = 5.6 \mm
ragged-bottom = ##t
indent = 7. \mm
line-width =183.5 \mm
- obsolete-between-system-space = 25\mm
- system-system-spacing #'basic-distance = #(/ obsolete-between-system-space staff-space)
+ system-system-spacing #'basic-distance = 14.22 % 25mm, in staff-spaces
system-system-spacing #'padding = #0
- score-system-spacing #'basic-distance = #(/ obsolete-between-system-space staff-space)
+ score-system-spacing #'basic-distance = #0
score-system-spacing #'padding = #0
system-count = 6
\layout { }
\midi {
- \context {
- \Score
- tempoWholesPerMinute = #(ly:make-moment 40 4)
- }
+ \tempo 4 = 40
}