]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/page-spacing.ly
* lily/book.cc (process): bugfix: flip ?: cases.
[lilypond.git] / input / regression / page-spacing.ly
1
2 \header {
3
4   texidoc = "By setting properties in NonMusicalPaperColumn, vertical
5 spacing of page layout can be adjusted.
6
7 For technical reasons, @code{outputProperty} has to be used for
8 setting properties on individual object. @code{\override} may still be
9 used for global overrides.
10
11 "
12
13 }
14
15 \version "2.7.10"
16
17 #(set-global-staff-size 11)
18
19 \book {
20   \score {
21     \relative c'' \new StaffGroup <<
22       \new Voice  {
23         c1\break
24
25         \outputProperty
26         #"Score.NonMusicalPaperColumn"
27         #'line-break-system-details
28         #'((Y-extent . (-30 . 10)))
29         c^"This system has big extents (property Y-extent)"\break
30
31         c\break
32         \outputProperty
33         #"Score.NonMusicalPaperColumn"
34         #'line-break-system-details
35         #'((next-padding . 20))
36
37         c^"This system is followed by padding, ie unstretchable space. (property next-padding)" \break
38         \outputProperty
39         #"Score.NonMusicalPaperColumn"
40         #'line-break-system-details
41         #'((next-space . 20))
42         c^"This system is followed by stretchable space (property next-space)"\break
43         c\break
44         c\break
45         \outputProperty
46         #"Score.NonMusicalPaperColumn" #'line-break-system-details
47         #'((bottom-space . 25.0)) 
48         c^"This system has 25 staff space to the bottom of the page. (property bottom-space)"\break
49
50
51       }
52       { c1 c c c c c c c }
53     >>
54   }
55   \paper {
56     raggedlastbottom = ##f
57     betweensystemspace = 1.0
58   }
59 }