(time-signature . (extra-space . 0.75))
(custos . (minimum-space . 2.0))
(clef . (minimum-space . 1.0))
+ (key-signature . (extra-space . 1.0))
(first-note . (extra-space . 1.3))
(right-edge . (extra-space . 0.0))
))
(BassFigure
. (
- (molecule-callback . ,brew-new-markup-molecule)
+ (molecule-callback . ,Text_item::brew_molecule)
(Y-offset-callbacks . (,Self_alignment_interface::aligned_on_self))
(direction . 1)
(font-family . number)
- (font-relative-size . -1)
+ (font-relative-size . -3)
(kern . 0.2)
(meta . ((interfaces . (text-interface rhythmic-grob-interface
bass-figure-interface item-interface
(molecule-callback . ,Beam::brew_molecule)
(concaveness-gap . 2.0)
(concaveness-threshold . 0.08)
+
(positions . (#f . #f))
(position-callbacks . (,Beam::least_squares
,Beam::check_concave
(flag-width-function . ,beam-flag-width-function)
(damping . 1)
(auto-knee-gap . 5.5)
- (font-name . "cmr10")
+
+ ;; only for debugging.
+; (font-name . "cmr10")
+
(space-function . ,Beam::space_function)
(meta . ((interfaces . (staff-symbol-referencer-interface beam-interface spanner-interface))))
))
(first-note . (minimum-space . 1.0))
(right-edge . (extra-space . 0.1))
))
- (molecule-callback . ,Breathing_sign::brew_molecule)
- (lookup . name)
- (font-family . music)
- (text . "scripts-rcomma")
+ (molecule-callback . ,Text_item::brew_molecule)
+ (text . ,(make-musicglyph-markup "scripts-rcomma"))
(Y-offset-callbacks . (,Breathing_sign::offset_callback))
(break-visibility . ,begin-of-line-invisible)
(meta . ((interfaces . (break-aligned-interface breathing-sign-interface text-interface font-interface item-interface ))))
(Y-offset-callbacks . (,Staff_symbol_referencer::callback))
(meta . ((interfaces . (clef-interface staff-symbol-referencer-interface font-interface break-aligned-interface item-interface ))))
))
-
- (Cluster
+
+ (ClusterSpannerBeacon
+ . (
+ (molecule-callback . #f)
+ (meta . ((interfaces . (cluster-beacon-interface item-interface))))
+ ))
+
+ (ClusterSpanner
. (
(molecule-callback . ,Cluster::brew_molecule)
(spacing-procedure . ,Spanner::set_spacing_rods)
(minimum-length . 0.0)
(padding . 0.25)
- (shape . leftsided-stairs)
+ (style . ramp)
(meta . ((interfaces . (cluster-interface spanner-interface))))
))
(time-signature . (extra-space . 0.0))
(staff-bar . (extra-space . 0.0))
(breathing-sign . (minimum-space . 0.0))
- (clef . (extra-space . 1.0))
+ (clef . (extra-space . 0.85))
(first-note . (extra-space . 1.0))
(right-edge . (extra-space . 0.0))
(key-signature . (extra-space . 0.0))
))
- (HaraKiriVerticalGroup
+ (RemoveEmptyVerticalGroup
. (
(Y-offset-callbacks . (,Hara_kiri_group_spanner::force_hara_kiri_callback))
(Y-extent-callback . ,Hara_kiri_group_spanner::y_extent)
+ (remove-first . #t)
(axes . (1))
(meta . ((interfaces . (axis-group-interface hara-kiri-group-interface item-interface spanner-interface))))
))
(breakable . #t)
(Y-offset-callbacks . (,Self_alignment_interface::aligned_on_self
,Side_position_interface::aligned_on_support_refpoints))
- ;; huh? what's this for?
+ ;; This direction is for aligned_on_support_refpoints
+ ;; (?) --hwn
(direction . 0)
(space-alist . (
(left-edge . (extra-space . 1.0))
(gap . 0.0)
(padding . 2.0)
(thickness . 1.6)
- (edge-widen . (0.0 . 0.0))
(edge-height . (0.7 . 0.7))
(shorten-pair . (-0.2 . -0.2))
(before-line-breaking-callback . ,Tuplet_bracket::before_line_breaking)
(height . 0.4)
(minimum-length . 0.5)
(maximum-length . 100)
+ (spacing-procedure . ,Hyphen_spanner::set_spacing_rods)
(molecule-callback . ,Hyphen_spanner::brew_molecule)
(Y-extent-callback . ,Grob::point_dimension_callback)
(meta . ((interfaces . (lyric-hyphen-interface spanner-interface))))
(font-family . roman)
(font-shape . upright)
- ;; duh, side-position-interface?
(meta . ((interfaces . (rhythmic-grob-interface lyric-syllable-interface self-alignment-interface text-interface font-interface item-interface ))))
))
(RehearsalMark
. (
- (molecule-callback . ,brew-new-markup-molecule)
+ (molecule-callback . ,Text_item::brew_molecule)
(X-offset-callbacks . (,Self_alignment_interface::aligned_on_self))
(Y-offset-callbacks . (,Side_position_interface::aligned_side))
(self-alignment-X . 0)
(break-align-symbol . time-signature)
(direction . 1)
(breakable . #t)
+ (font-relative-size . 1)
(font-family . roman)
(baseline-skip . 2)
(break-visibility . ,end-of-line-invisible)
))
(MetronomeMark
. (
- (molecule-callback . ,brew-new-markup-molecule)
+ (molecule-callback . ,Text_item::brew_molecule)
(Y-offset-callbacks . (,Side_position_interface::aligned_side))
(direction . 1)
(breakable . #t)
(MultiMeasureRestNumber
. (
- (molecule-callback . ,brew-new-markup-molecule)
+ (molecule-callback . ,Text_item::brew_molecule)
(X-offset-callbacks . (,Self_alignment_interface::aligned_on_self
,Self_alignment_interface::centered_on_other_axis_parent))
(Y-offset-callbacks . (,Side_position_interface::aligned_side))
))
(MultiMeasureRestText
. (
- (molecule-callback . ,brew-new-markup-molecule)
+ (molecule-callback . ,Text_item::brew_molecule)
(X-offset-callbacks . (,Self_alignment_interface::aligned_on_self
,Self_alignment_interface::centered_on_other_axis_parent))
(Y-offset-callbacks . (,Side_position_interface::aligned_side))
(Glissando
. (
- (type . line)
+ (style . line)
(gap . 0.5)
(zigzag-width . 0.75)
(breakable . #t)
(X-extent-callback . #f)
(Y-extent-callback . #f)
+ (after-line-breaking-callback . ,Line_spanner::after_line_breaking)
(molecule-callback . ,Line_spanner::brew_molecule)
(meta . ((interfaces . (line-spanner-interface spanner-interface))))
))
(VoiceFollower
. (
- (type . line)
+ (style . line)
(gap . 0.5)
(breakable . #t)
(X-extent-callback . #f)
(Y-extent-callback . #f)
(molecule-callback . ,Line_spanner::brew_molecule)
+ (after-line-breaking-callback . ,Line_spanner::after_line_breaking)
(meta . ((interfaces . (line-spanner-interface spanner-interface))))
))
(PianoPedalBracket ;; an example of a text spanner
. (
(molecule-callback . ,Text_spanner::brew_molecule)
+ (after-line-breaking-callback . ,Piano_pedal_bracket::after_line_breaking)
(font-family . roman)
- (type . line)
+ (style . line)
(if-text-padding . 1.0)
(width-correct . 0)
- (outer . #t)
+ (enclose-bounds . #t)
(direction . -1)
- (edge-widen . (0.5 . 0.5))
+ (bracket-flare . (0.5 . 0.5))
(edge-height . (1.0 . 1.0))
(shorten-pair . (0.0 . 0.0))
(thickness . 1.0)
- (meta . ((interfaces . (text-spanner-interface piano-pedal-interface spanner-interface))))
+ (meta . ((interfaces . (text-spanner-interface piano-pedal-interface piano-pedal-bracket-interface spanner-interface))))
))
(RepeatSlash
. (
(breakable . #t)
(stem-spacing-correction . 0.4)
- (knee-spacing-correction . 0.75)
+
(meta . ((interfaces . (spacing-interface staff-spacing-interface item-interface ))))
))
(NoteSpacing
. (
(stem-spacing-correction . 0.5)
- (knee-spacing-correction . 0.75)
+
+ ;; Changed this from 0.75.
+ ;; If you ever change this back, please document! --hwn
+ (knee-spacing-correction . 1.0)
+
(meta . ((interfaces . (spacing-interface note-spacing-interface item-interface ))))
))
(X-offset-callbacks . (,Self_alignment_interface::aligned_on_self))
(no-spacing-rods . #t)
(padding . 0.0) ;; padding relative to SostenutoPedalLineSpanner
- (pedal-type . mixed)
(font-family . roman)
(font-shape . italic)
(self-alignment-X . 0)
(Stem
. (
+
+ ;; this list is rather long. Trim --hwn
(before-line-breaking-callback . ,Stem::before_line_breaking)
(molecule-callback . ,Stem::brew_molecule)
(thickness . 1.3)
;; looking at Baerenreiter examples) for a number of common
;; boundary cases. Subtracting half a beam thickness fixes
;; this, but the bug may well be somewhere else.
- (beamed-lengths . (3.26))
-
+ (beamed-lengths . (3.26 3.26 1.5))
+
;; [Wanske] lists three sets of minimum lengths. One
;; set for the nomal case, and one set for beams with `der
;; Balkenendpunkt weiter "uber bzw. unter die Systemgrenze
;; and the extreme minima as abolute minimum length.
;; The 'normal' minima
- (beamed-minimum-free-lengths . (2.5 2.0 1.5))
-
- ;; The 'far outside staff' minima, not used
- ;(beamed-far-minimum-free-lengths . (1.83))
+ (beamed-minimum-free-lengths . (2.5 2.0 1.0))
;; The 'extreme case' minima
- (beamed-extreme-minimum-free-lengths . (1.83 1.5))
+ (beamed-extreme-minimum-free-lengths . (1.83 1.5 1.25))
(X-offset-callbacks . (,Stem::off_callback))
(X-extent-callback . ,Stem::dim_callback)
(self-alignment-X . 0)
(direction . 1)
(padding . 0.0) ;; padding relative to SustainPedalLineSpanner
- (pedal-type . text)
(X-offset-callbacks . (,Self_alignment_interface::aligned_on_self))
(meta . ((interfaces . (piano-pedal-interface text-spanner-interface text-interface self-alignment-interface font-interface item-interface))))
))
. (
(molecule-callback . ,Text_spanner::brew_molecule)
(font-family . roman)
- (type . line)
+ (style . line)
;; urg, only for (de)cresc. text spanners
(if-text-padding . 1.0)
(width-correct . -1)
-
(direction . 1)
(meta . ((interfaces . (text-spanner-interface side-position-interface font-interface spanner-interface))))
))
(Y-offset-callbacks . (,Side_position_interface::aligned_side))
(molecule-callback . ,Text_spanner::brew_molecule)
(font-family . roman)
- (outer . #t)
+ (enclose-bounds . #t)
(width-correct . 0.0)
- (type . dotted-line)
+ (style . dashed-line)
(edge-height . (0 . 1.5))
(direction . 1)
(meta . ((interfaces . (text-spanner-interface side-position-interface font-interface spanner-interface))))
(gap . 2.0)
(padding . 0.9)
(thickness . 1.6)
- (edge-widen . (0.0 . 0.0))
(edge-height . (0.7 . 0.7))
(shorten-pair . (-0.2 . -0.2))
(before-line-breaking-callback . ,Tuplet_bracket::before_line_breaking)
(molecule-callback . ,Tuplet_bracket::brew_molecule)
(font-family . roman)
(font-shape . italic)
+ (font-series . bold)
(font-relative-size . -1)
(meta . ((interfaces . (text-interface tuplet-bracket-interface font-interface spanner-interface))))
(no-spacing-rods . #t)
(self-alignment-X . 0)
(direction . 1)
- (pedal-type . text)
(padding . 0.0) ;; padding relative to UnaCordaPedalLineSpanner
(X-offset-callbacks . (,Self_alignment_interface::aligned_on_self))
(meta . ((interfaces . (text-interface self-alignment-interface font-interface item-interface ))))
(VaticanaLigature
. (
- (thickness . 1.0)
+ (thickness . 0.6)
(flexa-width . 2.0)
(ligature-primitive-callback . ,Vaticana_ligature::brew_ligature_primitive)
(molecule-callback . ,Vaticana_ligature::brew_molecule)
(molecule-callback . ,Volta_bracket_interface::brew_molecule)
(direction . 1)
(padding . 1)
- (font-style . volta)
+ (font-family . number)
(Y-offset-callbacks . (,Side_position_interface::aligned_side))
(thickness . 1.6) ; stafflinethickness
(height . 2.0) ; staffspace;