Consider accidentals in optical spacing correction.
[lilypond.git] / input / regression / page-spacing.ly
blobdfafe2f1beb7997c47e941f9475f94498b2989c0
2 \header {
4 texidoc = "By setting properties in NonMusicalPaperColumn, vertical
5 spacing of page layout can be adjusted.
7 For technical reasons, @code{overrideProperty} has to be used for
8 setting properties on individual object. @code{\override} may still be
9 used for global overrides.
11 By setting @code{annotate-spacing}, we can see the effect of each property.
16 \version "2.12.0"
18 #(set-global-staff-size 11)
20 \book {
21 \score {
22 \relative c'' \new PianoStaff <<
23 \new Voice {
24 c1_"followed by default spacing"\break
25 c\break
27 \overrideProperty
28 #"Score.NonMusicalPaperColumn"
29 #'line-break-system-details
30 #'((Y-extent . (-30 . 10)))
31 c_"Big bounding box (property Y-extent)"\break
33 \overrideProperty
34 #"Score.NonMusicalPaperColumn"
35 #'line-break-system-details
36 #'((refpoint-Y-extent . (-37 . -10)))
37 c_\markup {
38 \column {
39 "Refpoints further apart (property refpoint-Y-extent)."
40 "Stretchable space runs between refpoints"
44 \break
46 \overrideProperty
47 #"Score.NonMusicalPaperColumn"
48 #'line-break-system-details
49 #'((next-padding . 10))
51 c_"Followed by padding, ie unstretchable space. (property next-padding)" \break
52 \overrideProperty
53 #"Score.NonMusicalPaperColumn"
54 #'line-break-system-details
55 #'((next-space . 20))
56 c_"Followed by stretchable space (property next-space)"\break
57 c\break
58 \overrideProperty
59 #"Score.NonMusicalPaperColumn" #'line-break-system-details
60 #'((bottom-space . 25.0))
61 c_"25 staff space to the bottom of the page. (property bottom-space)"\break
65 { c1 c c c c c c c }
68 \paper {
69 ragged-last-bottom = ##f
70 annotate-spacing = ##t
71 between-system-space = 1.0
72 #(set! text-font-defaults
73 (acons
74 'font-size 6
75 text-font-defaults)