7 %%% if you add any new dimensions, don't forget to update
8 %%% the dimension-variables variable. see paper.scm
16 %% This is weird; `everyone' uses LATIN1? How does I select TeX
17 %% input encoding in EMACS? -- jcn
18 %%%%inputencoding = #"TeX"
19 inputencoding
= #"latin1"
23 %% 20pt staff, 5 pt = 1.75 mm
28 #(define-public book-title
(marked-up-title
'bookTitleMarkup
))
29 #(define-public score-title
(marked-up-title
'scoreTitleMarkup
))
30 #(define-public force-eps-font-include
#f)
36 #(layout-set-staff-size
(* 20.0 pt
))
39 %% this dimension includes the extent of the
42 betweensystemspace
= #(* 20 mm
)
45 %% fixed space between systems.
47 betweensystempadding
= #(* 4 mm
)
49 aftertitlespace
= 5 \mm
50 beforetitlespace
= 10 \mm
51 betweentitlespace
= 2 \mm
56 %% looks best for shorter scores.
60 %% ugh. Should use /etc/papersize and set explicitly for
64 #(define font-defaults
65 '((font-encoding
. fetaMusic
)))
67 %% use lmodern in latin1 (cork) flavour if EC is not available.
68 #(define text-font-defaults
71 (tex-backend?
'Extended-T
eX-Font-Encoding---Latin
)
78 #(define page-breaking ly
:optimal-page-breaks
)
79 #(define page-music-height default-page-music-height
)
80 #(define page-make-stencil default-page-make-stencil
)
82 #(define make-header
(marked-up-headfoot
'oddHeaderMarkup
'evenHeaderMarkup
))
83 #(define make-footer
(marked-up-headfoot
'oddFooterMarkup
'evenFooterMarkup
))
84 #(set-paper-dimension-variables
(current-module
))
86 \include "titling-init.ly"