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))
35 #(layout-set-staff-size (* 20.0 pt))
38 %% this dimension includes the extent of the
41 betweensystemspace = #(* 20 mm)
44 %% fixed space between systems.
46 betweensystempadding = #(* 4 mm)
48 aftertitlespace = 5 \mm
49 beforetitlespace = 10 \mm
50 betweentitlespace = 2 \mm
56 %% looks best for shorter scores.
60 %% ugh. Should use /etc/papersize and set explicitely 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 ; . ,(if (and ; (not (ly:kpathsea-find-file "ecrm10.pfa"))
72 ; (ly:kpathsea-find-file "cork-lm.enc")) 'cork-lm 'Extended-TeX-Font-Encoding---Latin))
76 #(define page-breaking ly:optimal-page-breaks)
77 #(define page-music-height default-page-music-height )
78 #(define page-make-stencil default-page-make-stencil )
80 #(define make-header (marked-up-headfoot 'oddHeaderMarkup 'evenHeaderMarkup))
81 #(define make-footer (marked-up-headfoot 'oddFooterMarkup 'evenFooterMarkup))
82 #(set-paper-dimension-variables (current-module))
84 \include "titling-init.ly"