- (NoteName . (
- (molecule-callback . ,Text_item::brew_molecule)
- (font-family . roman)
- (meta . ,(grob-description "NoteName"
- note-name-interface font-interface
- ))
- ))
-
- (OctavateEight . (
- (self-alignment-X . 0)
- (text . "8")
- (visibility-lambda . ,begin-of-line-visible)
- (X-offset-callbacks . (,Side_position::centered_on_parent ,Side_position::aligned_on_self))
- (Y-offset-callbacks . (,Side_position::aligned_side))
- (molecule-callback . ,Text_item::brew_molecule)
- (font-shape . italic)
- (font-family . roman)
- (meta . ,(grob-description "OctavateEight" text-interface font-interface ))
- ))
-
- (PaperColumn . (
- (axes 0)
- (before-grace-spacing-factor . 1.2)
- (before-musical-spacing-factor . 0.4)
- (meta . ,(grob-description "PaperColumn" paper-column-interface axis-group-interface spaceable-element-interface))
- ))
- (PhrasingSlur . (
- (molecule-callback . ,Slur::brew_molecule)
- (thickness . 1.2)
- (spacing-procedure . ,Slur::set_spacing_rods)
- (minimum-length . 1.5)
- (after-line-breaking-callback . ,Slur::after_line_breaking)
- (extremity-rules . ,default-slur-extremity-rules)
- (extremity-offset-alist . ,default-phrasing-slur-extremity-offset-alist)
- (de-uglify-parameters . ( 1.5 0.8 -2.0))
- (Y-extent-callback . ,Slur::height)
- (details . ((height-limit . 2.0) (ratio . 0.333) (force-blowfit . 0.5)
- (bezier-pct-c0 . -0.2) (bezier-pct-c3 . 0.000006)
- (bezier-pct-out-max . 0.8) (bezier-pct-in-max . 1.2)
- (bezier-area-steps . 1.0)))
- (beautiful . 0.5)
- (y-free . 0.75)
- (attachment . (#f . #f))
- (attachment-offset . ((0 . 0) . (0 . 0)))
- (slope-limit . 0.8)
- (meta . ,(grob-description "PhrasingSlur" slur-interface))
- ))
- (NonMusicalPaperColumn . (
- (axes 0)
- (before-musical-spacing-factor . 1.0)
- (column-space-strength . 2.0)
- (meta . ,(grob-description "NonMusicalPaperColumn" paper-column-interface axis-group-interface spaceable-element-interface))
- ))
-
- (Rest . (
- (after-line-breaking-callback . ,Rest::after_line_breaking)
- (X-extent-callback . ,Rest::extent_callback)
- (Y-extent-callback . ,Rest::extent_callback)
- (molecule-callback . ,Rest::brew_molecule)
- (minimum-beam-collision-distance . 1.5)
- (meta . ,(grob-description "Rest"
- rhythmic-head-interface
- rest-interface))
- ))
- (RestCollision . (
- (minimum-distance . 0.75)
- (meta . ,(grob-description "RestCollision" rest-collision-interface ))
- ))
-
- (Script . (
- (molecule-callback . ,Script::brew_molecule)
- (X-offset-callbacks . (,Side_position::centered_on_parent))
- (after-line-breaking-callback . ,Script::after_line_breaking)
- (meta . ,(grob-description "Script" script-interface side-position-interface font-interface))
- ))
-
- (ScriptColumn . (
- (before-line-breaking-callback . ,Script_column::before_line_breaking)
- (meta . ,(grob-description "ScriptColumn" script-column-interface))
- ))
-
- (Slur . (
- (molecule-callback . ,Slur::brew_molecule)
- (thickness . 1.2)
- (spacing-procedure . ,Slur::set_spacing_rods)
- (minimum-length . 1.5)
- (after-line-breaking-callback . ,Slur::after_line_breaking)
- (extremity-rules . ,default-slur-extremity-rules)
- (extremity-offset-alist . ,default-slur-extremity-offset-alist)
- (de-uglify-parameters . ( 1.5 0.8 -2.0))
- (Y-extent-callback . ,Slur::height)
- (details . ((height-limit . 2.0) (ratio . 0.333) (force-blowfit . 0.5)
- (bezier-pct-c0 . -0.2) (bezier-pct-c3 . 0.000006)
- (bezier-pct-out-max . 0.8) (bezier-pct-in-max . 1.2)
- (bezier-area-steps . 1.0)))
- (beautiful . 0.5)
- (y-free . 0.75)
- (attachment . (#f . #f))
- (attachment-offset . ((0 . 0) . (0 . 0)))
- (slope-limit . 0.8)
- (meta . ,(grob-description "Slur" slur-interface))
- ))
-
- (SpacingSpanner . (
- (spacing-procedure . ,Spacing_spanner::set_springs)
- (stem-spacing-correction . 0.5)
- (arithmetic-basicspace . 2.0)
- (arithmetic-multiplier . ,(* 0.9 1.32))
- ;; assume that notes at least this long are present.
- (maximum-duration-for-spacing . ,(make-moment 1 8))
- (meta . ,(grob-description "SpacingSpanner" spacing-spanner-interface))
- ))
- (SpanBar . (
- (break-align-symbol . Staff_bar)
- (barsize-procedure . ,Span_bar::get_bar_size)
- (molecule-callback . ,Bar::brew_molecule)
- (visibility-lambda . ,begin-of-line-invisible)
- (X-extent-callback . ,Span_bar::width_callback)
- (Y-offset-callbacks . (,Span_bar::center_on_spanned_callback))
-
- (breakable . #t)
- (glyph . "|")
- (before-line-breaking-callback . ,Span_bar::before_line_breaking)
- ;; ugh duplication!
-
- ;;
- ;; Ross. page 151 lists other values, we opt for a leaner look
- ;;
- (kern . 3.0)
- (thin-kern . 3.0)
- (hair-thickness . 1.6)
- (thick-thickness . 6.0)
- (meta . ,(grob-description "SpanBar" span-bar-interface bar-line-interface ))
- ))
-
- (StanzaNumber . (
- (breakable . #t)
- (molecule-callback . ,Text_item::brew_molecule)
- (break-align-symbol . Clef_item)
- (visibility-lambda . ,begin-of-line-visible)
- (font-family . roman)
- (meta . ,(grob-description "StanzaNumber" break-aligned-interface text-interface font-interface))
- ))
-
- (StaffSymbol . (
- (molecule-callback . ,Staff_symbol::brew_molecule)
- (staff-space . 1.0)
- (line-count . 5 )
- (meta . ,(grob-description "StaffSymbol" staff-symbol-interface ))
- ))
- (SostenutoPedal . (
- (molecule-callback . ,Text_item::brew_molecule)
- (X-offset-callbacks . (,Side_position::aligned_on_self))
- (Y-offset-callbacks .
- (,Side_position::aligned_side
- ,Side_position::centered_on_parent))
- (no-spacing-rods . #t)
- (font-shape . italic)
- (self-alignment-X . 0)
- (meta . ,(grob-description "SostenutoPedal" text-interface font-interface))
- ))
-
- (Stem . (
- (before-line-breaking-callback . ,Stem::before_line_breaking)
- (molecule-callback . ,Stem::brew_molecule)
- (thickness . 0.8)
- (beamed-lengths . (0.0 2.5 2.0 1.5))
- (beamed-minimum-lengths . (0.0 1.5 1.25 1.0))
-
-;; Stems in unnatural (forced) direction should be shortened,
-;; according to [Roush & Gourlay]. Their suggestion to knock off
-;; a whole staffspace seems a bit drastical: we'll do half.
-
- (lengths . (3.5 3.5 3.5 4.5 5.0))
- (stem-shorten . (0.5))
- ; if stem is on middle line, choose this direction.
- (default-neutral-direction . 1)
- (X-offset-callbacks . (,Stem::off_callback))
- (X-extent-callback . ,Stem::dim_callback)
- (Y-extent-callback . ,Stem::height)
- (meta . ,(grob-description "Stem" stem-interface font-interface))
- ))
-
- (StemTremolo . (
- (molecule-callback . ,Stem_tremolo::brew_molecule)
- (Y-extent-callback . ,Stem_tremolo::height)
- (X-extent-callback . #f)
-
- (beam-width . 2.0) ; staff-space
- (beam-thickness . 0.42) ; staff-space
- (beam-space-function . ,default-beam-space-function)
- (meta . ,(grob-description "StemTremolo" stem-tremolo-interface ))
- ))
-
- (SeparationItem . (
- (meta . ,(grob-description "SeparationItem" separation-item-interface ))
- ))
- (SeparatingGroupSpanner . (
- (spacing-procedure . ,Separating_group_spanner::set_spacing_rods)
- (meta . ,(grob-description "SeparatingGroupSpanner" separation-spanner-interface))
- ))
-
- (SustainPedal . (
- (no-spacing-rods . #t)
- (molecule-callback . ,Sustain_pedal::brew_molecule)
- (self-alignment-X . 0)
- (X-offset-callbacks . (,Side_position::aligned_on_self))
- (Y-offset-callbacks .
- (,Side_position::aligned_side
- ,Side_position::centered_on_parent))
-
- (meta . ,(grob-description "SustainPedal" sustain-pedal-interface side-position-interface font-interface))
- ))
-
- ; should split in 3
- (SystemStartDelimiter . (
- (molecule-callback . ,System_start_delimiter::brew_molecule)
- (after-line-breaking-callback . ,System_start_delimiter::after_line_breaking)
- ;; ugh, in practice, brace has height of 4.1 staff-spaces
- (brace-collapse-height . 4.1)
- (bracket-collapse-height . 1)
- (thickness . 1.6)
- (arch-height . 1.5)
- (arch-angle . 50.0)
- (arch-thick . 0.25)
- (glyph . bar-line)
- (arch-width . 1.5)
- (bracket-thick . 0.25)
- (Y-extent-callback . #f)
- (font-family . braces)
- ;; if you want to set point-size, you cannot set
- ;; relative-size, as no font will be found for other
- ;; sheets than 20
- ;;(font-point-size . 20)
- ;;(font-relative-size . #f)
- (meta . ,(grob-description "SystemStartDelimiter" system-start-delimiter-interface font-interface))
- ))
-
- (TextScript . (
- (molecule-callback . ,Text_item::brew_molecule)
- (no-spacing-rods . #t)
- (padding . 0.5)
- (font-family . roman)
- (font-shape . italic)
- (meta . ,(grob-description "TextScript" text-script-interface text-interface side-position-interface font-interface ))
- ))
- (TextSpanner . (
- (molecule-callback . ,Text_spanner::brew_molecule)
- (font-shape . italic)
- (font-family . roman)
- (type . "line")
-
- ;; urg, only for (de)cresc. text spanners
- (if-text-padding . 1.0)
- (width-correct . -1)
-
- (direction . 1)
- (meta . ,(grob-description "TextSpanner" text-spanner-interface font-interface))
- ))
- (Tie . (
- (molecule-callback . ,Tie::brew_molecule)
- (spacing-procedure . ,Tie::set_spacing_rods)
- (staffline-clearance . 0.35)
- (details . ((ratio . 0.333) (height-limit . 1.0)))
- (thickness . 1.2)
- (x-gap . 0.2)
- (minimum-length . 2.5)
- (meta . ,(grob-description "Tie" tie-interface ))
- ))
-
- (TieColumn . (
- (after-line-breaking-callback . ,Tie_column::after_line_breaking)
- (meta . ,(grob-description "TieColumn" tie-column-interface ))
- ))
-
- (TimeSignature . (
- (molecule-callback . ,Time_signature::brew_molecule)
- (break-align-symbol . Time_signature)
- (visibility-lambda . ,all-visible)
- (breakable . #t)
- (font-family . number)
- (meta . ,(grob-description "TimeSignature" time-signature-interface font-interface))
- ))
-
- (TupletBracket . (
- (number-gap . 2.0)
- (delta-y . 0)
- (thick . 1.0)
- (after-line-breaking-callback . ,Tuplet_spanner::after_line_breaking)
- (molecule-callback . ,Tuplet_spanner::brew_molecule)
- (font-family . roman)
- (font-shape . italic)
- (font-relative-size . -1)
- (meta . ,(grob-description "TupletBracket" text-interface
- tuplet-bracket-interface font-interface))
- ))
-
- (UnaChordaPedal . (
- (molecule-callback . ,Text_item::brew_molecule)
- (font-shape . italic)
- (no-spacing-rods . #t)
- (self-alignment-X . 0)
- (X-offset-callbacks . (,Side_position::aligned_on_self))
- (Y-offset-callbacks .
- (,Side_position::aligned_side
- ,Side_position::centered_on_parent))
- (meta . ,(grob-description "UnaChordaPedal" text-interface font-interface))
- ))
-
- (VoltaBracket . (
- (molecule-callback . ,Volta_spanner::brew_molecule)
-
- (direction . 1)
- (padding . 1)
- (font-style . volta)
- (Y-offset-callbacks . (,Side_position::aligned_side))
- (thickness . 1.6) ; stafflinethickness
- (height . 2.0) ; staffspace;
- (minimum-space . 5)
- (font-family . number)
- (font-relative-size . -2)
- (meta . ,(grob-description "VoltaBracket" volta-bracket-interface side-position-interface font-interface))
- ))