-#(define (grace-beam-space-function multiplicity)
- (* (if (<= multiplicity 3) 0.816 0.844) 0.8))
-
-
startGraceMusic = {
\property Voice.Stem \override #'direction = #1
\property Voice.Stem \override #'length = #6
stopGraceMusic = {
\property Staff.Accidentals \revert #'font-relative-size
- \property Voice.Beam \revert #'space-function
\property Voice.Beam \revert #'thickness
\property Voice.Stem \revert #'flag-style
s = s + '\\include{%s}\n' \
% string.join (extra['latexheaders'], '}\n\\include{')
+ unit = extra['unit'][-1]
+
textheight = ''
if extra['textheight']:
- textheight = ',textheight=%fpt' % extra['textheight'][0]
+ textheight = ',textheight=%f%s' % (extra['textheight'][0], unit)
orientation = 'portrait'
if extra['orientation']:
orientation = extra['orientation'][0]
- unit = extra['unit'][-1]
# set sane geometry width (a4-width) for linewidth = -1.
maxlw = max (extra['linewidth'] + [-1])
if maxlw < 0: