-;;;; grob-description.scm -- part of generated backend documentation
+;;;; define-grobs.scm --
;;;;
;;;; source file of the GNU LilyPond music typesetter
;;;;
-;;;; (c) 1998--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+;;;; (c) 1998--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
;;;; Jan Nieuwenhuizen <janneke@gnu.org>
;;;; distances are given in linethickness (thicknesses) and
(AccidentalPlacement
. (
(X-extent-callback . ,Axis_group_interface::group_extent_callback)
- (left-padding . 0.3)
+ (left-padding . 0.2)
;; this is quite small, but it is very ugly to have
;; accs closer to the previous note than to the next one.
- (right-padding . 0.25)
+ (right-padding . 0.15)
(meta . ((interfaces . (item-interface accidental-placement-interface))))
))
(Y-offset-callbacks . (,Staff_symbol_referencer::callback))
(X-offset-callbacks . (,Side_position_interface::aligned_side))
(direction . -1)
+ (padding . 0.5)
(staff-position . 0.0)
(meta . ((interfaces . (arpeggio-interface staff-symbol-referencer-interface side-position-interface item-interface font-interface))))
))
;; todo: clean this up a bit: the list is getting
;; rather long.
(print-function . ,Beam::print)
- (concaveness-gap . 2.0)
- (concaveness-threshold . 0.08)
+ (concaveness-gap . 1.85)
+ (concaveness-threshold . 0.26)
(gap . 0.8)
(positions . (#f . #f))
(position-callbacks . (,Beam::least_squares
(print-function . ,Custos::print)
(break-visibility . ,end-of-line-visible)
(style . vaticana)
- (neutral-position . 0)
(neutral-direction . -1)
- (adjust-if-on-staffline . #t)
(Y-offset-callbacks . (,Staff_symbol_referencer::callback))
(space-alist . (
(first-note . (minimum-fixed-space . 0.0))
. (
(print-function . ,Text_item::print)
(font-family . roman)
- (meta . ((interfaces . (note-name-interface text-interface font-interface item-interface ))))
+ (meta . ((interfaces . (note-name-interface
+ text-interface font-interface item-interface ))))
))
(OctavateEight
(axes . (0))
(X-extent-callback . ,Axis_group_interface::group_extent_callback)
(before-line-breaking-callback . ,Paper_column::before_line_breaking)
+ (breakable . #t)
;; debugging stuff: print column number.
; (print-function . ,Paper_column::print) (font-name . "cmr8") (Y-extent-callback . #f)
(meta . (
(interfaces . (font-interface
rhythmic-head-interface
- rhythmic-grob-interface
-
+ rhythmic-grob-interface
staff-symbol-referencer-interface
rest-interface item-interface ))
))))
(X-extent-callback . ,Span_bar::width_callback)
(Y-extent-callback . ())
(breakable . #t)
- (glyph . "|")
(before-line-breaking-callback . ,Span_bar::before_line_breaking)
;; ugh duplication!
(meta . ((interfaces . (spacing-interface note-spacing-interface item-interface ))))
))
- (StaffSymbol
- . (
- (print-function . ,Staff_symbol::print)
- (line-count . 5)
- (ledger-line-thickness . (1.0 . 0.1))
- (layer . 0)
- (meta . ((interfaces . (staff-symbol-interface spanner-interface))))
- ))
-
(SostenutoPedal
. (
(print-function . ,Text_item::print)
(direction . -1)
(meta . ((interfaces . (piano-pedal-interface axis-group-interface side-position-interface spanner-interface))))
))
+
+ (StaffSymbol
+ . (
+ (print-function . ,Staff_symbol::print)
+ (line-count . 5)
+ (ledger-line-thickness . (1.0 . 0.1))
+ (layer . 0)
+ (meta . ((interfaces . (staff-symbol-interface spanner-interface))))
+ ))
(Stem
. (
(X-extent-callback . ,Stem::dim_callback)
(Y-extent-callback . ,Stem::height)
(Y-offset-callbacks . (,Staff_symbol_referencer::callback))
- (adjust-if-on-staffline . #t)
(font-family . music)
(meta . ((interfaces . (stem-interface font-interface item-interface ))))
))
. (
(print-function . ,Text_spanner::print)
(font-family . roman)
+ (font-shape . italic)
(style . dashed-line)
(staff-padding . 0.1)