;;;;
;;;; source file of the GNU LilyPond music typesetter
;;;;
-;;;; (c) 1998--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
+;;;; (c) 1998--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>
;;;; Jan Nieuwenhuizen <janneke@gnu.org>
;;;; distances are given in line-thickness (thicknesses) and
(alteration . ,accidental-interface::calc-alteration)
(stencil . ,ly:accidental-interface::print)
(Y-extent . ,ly:accidental-interface::height)
+ (X-extent . ,ly:accidental-interface::width)
(meta . ((class . Item)
(interfaces . (accidental-interface
font-interface))))))
(Y-extent . ,ly:accidental-interface::height)
(X-offset . ,(ly:make-simple-closure
`(,+
- ,(ly:make-simple-closure (list ly:self-alignment-interface::centered-on-x-parent))
- ,(ly:make-simple-closure (list ly:self-alignment-interface::x-aligned-on-self)))))
+ ,(ly:make-simple-closure
+ (list ly:self-alignment-interface::centered-on-x-parent))
+ ,(ly:make-simple-closure
+ (list ly:self-alignment-interface::x-aligned-on-self)))))
(self-alignment-X . ,CENTER)
(font-size . -2)
(glyph-name-alist . ,standard-alteration-glyph-name-alist)
(Y-offset . ,ly:staff-symbol-referencer::callback)
(X-offset . ,ly:side-position-interface::x-aligned-side)
(direction . ,LEFT)
+ (positions . ,ly:arpeggio::calc-positions)
(padding . 0.5)
(script-priority . 0)
(side-axis . ,X)
(stencil . ,ly:bar-line::print)
(glyph-name . ,bar-line::calc-glyph-name)
(bar-size . ,ly:bar-line::calc-bar-size)
+ (bar-extent . ,ly:bar-line::calc-bar-extent)
+ (allow-span-bar . #t)
(space-alist . (
(time-signature . (extra-space . 0.75))
(font-size . -2)
(Y-offset . ,ly:side-position-interface::y-aligned-side)
(side-axis . ,Y)
+ (outside-staff-priority . 100)
(X-offset . ,(ly:make-simple-closure
`(,+
,(ly:make-simple-closure
(stencil . ,ly:cluster::print)
(minimum-length . 0.0)
(padding . 0.25)
+ (cross-staff . ,ly:cluster::calc-cross-staff)
(style . ramp)
(meta . ((class . Spanner)
(interfaces . (cluster-interface))))))
(outside-staff-priority . 250)
(Y-extent . ,ly:axis-group-interface::height)
(X-extent . ,ly:axis-group-interface::width)
+ (cross-staff . ,ly:side-position-interface::calc-cross-staff)
(meta . ((class . Spanner)
(interfaces . (axis-group-interface
dynamic-interface
(direction . ,UP)
(self-alignment-X . ,CENTER)
(meta . ((class . Item)
- (interfaces . (system-start-text-interface
- side-position-interface
+ (interfaces . (side-position-interface
font-interface))))))
(KeyCancellation
(word-space . 0.6)
(font-series . bold-narrow)
(font-size . 1.0)
+ (extra-spacing-width . (0.0 . 0.0))
(meta . ((class . Item)
(interfaces . (rhythmic-grob-interface
lyric-syllable-interface
(direction . ,UP)
(padding . 0.8)
(side-axis . ,Y)
+ (extra-spacing-width . (+inf.0 . -inf.0))
(outside-staff-priority . 1000)
(meta . ((class . Item)
(interfaces . (text-interface
(direction . ,UP)
(padding . 0.2)
(staff-padding . 0.25)
+ (outside-staff-priority . 450)
(meta . ((class . Spanner)
(interfaces . (side-position-interface
multi-measure-interface
. (
(stem-spacing-correction . 0.5)
(same-direction-correction . 0.25)
+ (space-to-barline . #t)
;; Changed this from 0.75.
;; If you ever change this back, please document! --hwn
(knee-spacing-correction . 1.0)
(staff-padding . 1.0)
(padding . 0.5)
(minimum-length . 1.0)
+ (style . dashed-line)
(dash-fraction . 0.3)
(edge-height . (0 . 1.2))
(direction . ,UP)
;; (font-size . -6) (font-name . "sans") (Y-extent . #f)
(meta . ((class . Paper_column)
(interfaces . (paper-column-interface
+ separation-item-interface
axis-group-interface
spaceable-grob-interface))))))
(list ly:self-alignment-interface::x-aligned-on-self)))))
(Y-offset . ,ly:side-position-interface::y-aligned-side)
+ (extra-spacing-width . (+inf.0 . -inf.0))
(self-alignment-X . 0)
(direction . ,UP)
(non-musical . #t)
. (
(axes . (1))
(Y-extent . ,ly:axis-group-interface::height)
+ (X-extent . ,ly:axis-group-interface::width)
(Y-offset . ,ly:side-position-interface::y-aligned-side)
(side-axis . ,Y)
(staff-padding . 1.0)
(SpanBar
. (
(break-align-symbol . staff-bar)
- (Y-extent . ())
+ (Y-extent . ,ly:axis-group-interface::height)
+ (cross-staff . #t)
(layer . 0)
(non-musical . #t)
(stencil . ,ly:span-bar::print)
(bar-size . ,ly:span-bar::calc-bar-size)
+ (bar-extent . ,ly:axis-group-interface::height)
(X-extent . ,ly:span-bar::width)
(glyph-name . ,ly:span-bar::calc-glyph-name)
(before-line-breaking . ,ly:span-bar::before-line-breaking)
+ (allow-span-bar . #t)
;; ugh duplication!
. (
(axes . (1))
(Y-extent . ,ly:axis-group-interface::height)
+ (X-extent . ,ly:axis-group-interface::width)
(Y-offset . ,ly:side-position-interface::y-aligned-side)
(side-axis . ,Y)
(padding . 1.2)
(Y-extent . ,ly:axis-group-interface::height)
(vertical-skylines . ,ly:axis-group-interface::calc-skylines)
(max-stretch . ,ly:axis-group-interface::calc-max-stretch)
- (skyline-horizontal-padding . 1.0)
(meta . ((class . System)
(interfaces . (system-interface
axis-group-interface))))))
(X-offset . ,ly:side-position-interface::x-aligned-side)
(direction . ,LEFT)
(style . bar-line)
+ (collapse-height . 5.0)
(thickness . 1.6)
(stencil . ,ly:system-start-delimiter::print)
(meta . ((class . Spanner)
(avoid-slur . around)
(slur-padding . 0.5)
(script-priority . 200)
+ (cross-staff . ,ly:script-interface::calc-cross-staff)
;; todo: add X self alignment?
(meta . ((class . Item)
(interfaces . (text-script-interface
. (
(stencil . ,ly:time-signature::print)
(break-align-symbol . time-signature)
- (break-align-anchor . ,ly:break-aligned-interface::calc-extent-aligned-anchor)
+ (break-align-anchor
+ . ,ly:break-aligned-interface::calc-extent-aligned-anchor)
(break-visibility . ,all-visible)
(avoid-slur . inside)
(space-alist . (
(right-bound-info . ,ly:line-spanner::calc-right-bound-info)
(bound-details . ((left . ((text . ,(make-translate-scaled-markup
- '(0.5 . -0.6)
+ '(0.0 . -1.0)
(make-musicglyph-markup "scripts.trill")))
(Y . 0)
- (padding . 0.25)
+ (stencil-offset . (-0.5 . 0))
+ (padding . 1.5)
(attach-dir . ,LEFT)
))
+ (left-broken . ((end-on-note . #t)))
(right . ((Y . 0)))
))
. (
(axes . (1))
(Y-extent . ,ly:axis-group-interface::height)
+ (X-extent . ,ly:axis-group-interface::width)
(Y-offset . ,ly:side-position-interface::y-aligned-side)
(side-axis . ,Y)
(padding . 1.2)
(stacking-dir . -1)
(padding . 0.5)
(vertical-skylines . ,ly:axis-group-interface::combine-skylines)
- (max-stretch . ,ly:align-interface::calc-max-stretch)
+ (max-stretch . 0)
(meta . ((class . Spanner)
(object-callbacks . ((Y-common . ,ly:axis-group-interface::calc-y-common)))
(interfaces . (align-interface
(VoltaBracket
. (
(stencil . ,ly:volta-bracket-interface::print)
- (direction . ,UP)
- (padding . 1)
(font-encoding . fetaNumber)
- (minimum-Y-extent . (0 . 2))
- (Y-offset . ,ly:side-position-interface::y-aligned-side)
- (side-axis . ,Y)
(thickness . 1.6) ;; line-thickness
(edge-height . (2.0 . 2.0)) ;; staff-space;
- (minimum-space . 5)
(font-size . -4)
- (outside-staff-priority . 100)
+ (direction . ,UP)
(meta . ((class . Spanner)
(interfaces . (volta-bracket-interface
horizontal-bracket-interface
font-interface)))
)))
+ (VoltaBracketSpanner
+ . (
+ (axes . (1))
+ (side-axis . ,Y)
+ (direction . ,UP)
+ (padding . 1)
+ (Y-offset . ,ly:side-position-interface::y-aligned-side)
+ (outside-staff-priority . 100)
+ (Y-extent . ,ly:axis-group-interface::height)
+ (X-extent . ,ly:axis-group-interface::width)
+ (no-alignment . ,#t)
+ (meta . ((class . Spanner)
+ (interfaces . (side-position-interface
+ axis-group-interface)))
+ )))
(VoiceFollower
. (
(define pure-functions
(list
+ parenthesize-elements
ly:staff-symbol-referencer::callback
ly:staff-symbol::height))