2 ; distances are given in stafflinethickness (thicknesses) and
3 ; staffspace (distances)
5 (define all-element-descriptions
7 (X-extent-callback . ,Arpeggio::width_callback)
8 (molecule-callback . ,Arpeggio::brew_molecule)
9 (Y-offset-callbacks . (,Staff_symbol_referencer::callback))
10 (X-offset-callbacks . (,Side_position::aligned_side))
12 (staff-position . 0.0)
13 (meta . ,(element-description "Arpeggio" arpeggio-interface side-position-interface))
17 (break-align-symbol . Staff_bar)
19 (break-glyph-function . ,default-break-barline)
20 (barsize-procedure . ,Bar::get_staff_bar_size)
21 (molecule-callback . ,Bar::brew_molecule)
22 (visibility-lambda . ,all-visible)
24 (before-line-breaking-callback . ,Bar::before_line_breaking)
26 ;; Ross. page 151 lists other values, we opt for a leaner look
30 (hair-thickness . 1.6)
31 (thick-thickness . 6.0)
32 (meta . ,(element-description "BarLine" bar-line-interface ))
36 (molecule-callback . ,Text_item::brew_molecule)
38 (visibility-lambda . ,begin-of-line-visible)
41 (properties-to-font-name . ,properties-to-font-name)
42 (style-to-font-name . ,style-to-font-name)
43 (markup-to-properties . ,markup-to-properties)
45 (font-relative-size . -1)
46 (meta . ,(element-description "BarNumber"
47 text-interface break-aligned-interface))
50 (Beam . ,basic-beam-properties)
56 (X-offset-callbacks . (,Break_align_interface::self_align_callback))
57 (space-alist . ,default-break-align-space-alist)
58 (meta . ,(element-description "BreakAlignment"
59 axis-group-interface align-interface
66 (X-offset-callbacks . (,Break_align_interface::alignment_callback))
68 (meta . ,(element-description "BreakAlignGroup" axis-group-interface))
72 (break-align-symbol . Breathing_sign)
74 (molecule-callback . ,Breathing_sign::brew_molecule)
75 (Y-offset-callbacks . (,Breathing_sign::offset_callback))
76 (visibility-lambda . ,begin-of-line-invisible)
77 (meta . ,(element-description "BreathingSign" break-aligned-interface))
81 (molecule-callback . ,Clef::brew_molecule)
82 (before-line-breaking-callback . ,Clef::before_line_breaking)
84 (break-align-symbol . Clef_item)
85 (visibility-lambda . ,begin-of-line-visible)
86 (Y-offset-callbacks . (,Staff_symbol_referencer::callback))
87 (meta . ,(element-description "Clef" clef-interface break-aligned-interface ))
91 (molecule-callback . ,Chord_name::brew_molecule)
92 (after-line-breaking-callback . ,Chord_name::after_line_breaking)
93 (chord-name-function . ,default-chord-name-function)
94 (properties-to-font-name . ,properties-to-font-name)
95 (style-to-font-name . ,style-to-font-name)
96 (markup-to-properties . ,markup-to-properties)
97 (font-relative-size . 0)
99 (font-shape . upright)
100 (meta . ,(element-description "ChordNames" chord-name-interface))
106 (meta . ,(element-description "NoteCollision"
107 note-collision-interface axis-group-interface
112 (molecule-callback . ,Crescendo::brew_molecule)
114 (shorten-for-letter . 4.0)
116 (dash-thickness . 1.2)
118 (self-alignment-Y . 0)
119 (Y-offset-callbacks . (,Side_position::aligned_on_self))
120 (meta . ,(element-description "Crescendo" hairpin-interface))
125 (meta . ,(element-description "DotColumn" dot-column-interface axis-group-interface))
129 (molecule-callback . ,Dots::brew_molecule)
131 (staff-position . 0.0)
132 (Y-offset-callbacks . (,Dots::quantised_position_callback ,Staff_symbol_referencer::callback))
133 (meta . ,(element-description "Dots" dot-interface ))
137 (Y-offset-callbacks . (,Side_position::aligned_on_self))
138 (molecule-callback . ,Text_item::brew_molecule)
139 (script-priority . 100)
140 (font-style . dynamic)
141 (properties-to-font-name . ,properties-to-font-name)
142 (style-to-font-name . ,style-to-font-name)
143 (markup-to-properties . ,markup-to-properties)
144 (self-alignment-Y . 0)
145 (meta . ,(element-description "DynamicText" text-interface ))
148 (DynamicLineSpanner . (
152 (meta . ,(element-description "DynamicLineSpanner" dynamic-interface axis-group-interface side-position-interface))
156 (break-align-symbol . Left_edge_item)
157 (X-offset-callbacks . (,Break_align_interface::alignment_callback))
159 (meta . ,(element-description "LeftEdge" break-aligned-interface))
163 (molecule-callback . ,Text_item::brew_molecule)
164 (X-offset-callbacks . (,Side_position::centered_on_parent ,Side_position::aligned_on_self))
166 (self-alignment-X . 0)
167 (font-style . finger)
168 (properties-to-font-name . ,properties-to-font-name)
169 (style-to-font-name . ,style-to-font-name)
170 (markup-to-properties . ,markup-to-properties)
171 (meta . ,(element-description "Fingering" finger-interface text-script-interface text-interface side-position-interface))
176 (horizontal-space . 1.2)
178 (before-line-breaking-callback . ,Grace_align_item::before_line_breaking)
179 (meta . ,(element-description "GraceAlignment" axis-group-interface align-interface grace-alignment-interface))
182 (HaraKiriVerticalGroup . (
183 (Y-offset-callbacks . (,Hara_kiri_group_spanner::force_hara_kiri_callback))
184 (Y-extent-callback . ,Hara_kiri_group_spanner::y_extent)
186 (meta . ,(element-description "HaraKiriVerticalGroup" axis-group-interface hara-kiri-group-interface))
192 (minimum-length . 0.5)
193 (molecule-callback . ,Hyphen_spanner::brew_molecule)
194 (Y-extent-callback . ,Score_element::point_dimension_callback)
195 (meta . ,(element-description "LyricHyphen" lyric-hyphen-interface ))
200 (Y-offset-callbacks . (,Side_position::centered_on_parent
201 ,Side_position::aligned_on_self))
202 (self-alignment-Y . 0)
203 (molecule-callback . ,Text_item::brew_molecule)
204 (break-align-symbol . Instrument_name)
205 (visibility-lambda . ,begin-of-line-visible)
206 (properties-to-font-name . ,properties-to-font-name)
207 (style-to-font-name . ,style-to-font-name)
208 (markup-to-properties . ,markup-to-properties)
209 (font-family . roman)
210 (meta . ,(element-description "InstrumentName" text-interface break-aligned-interface))
214 (molecule-callback . ,Key_item::brew_molecule)
215 (break-align-symbol . Key_item)
216 (visibility-lambda . ,begin-of-line-visible)
218 (meta . ,(element-description "KeySignature" key-signature-interface break-aligned-interface))
222 (molecule-callback . ,Local_key_item::brew_molecule)
223 (X-offset-callbacks . (,Side_position::aligned_side))
226 (right-padding . 0.4)
227 (meta . ,(element-description "Accidentals" accidentals-interface))
232 (meta . ,(element-description "LineOfScore" line-of-score-interface axis-group-interface))
236 (molecule-callback . ,Lyric_extender::brew_molecule)
237 (height . 0.8) ; stafflinethickness;
238 (right-trim-amount . 0.5)
239 (Y-extent-callback . ,Score_element::point_dimension_callback)
240 (meta . ,(element-description "LyricExtender" lyric-extender-interface))
244 (molecule-callback . ,Text_item::brew_molecule)
245 (X-offset-callbacks . (,Side_position::aligned_on_self))
246 (self-alignment-X . 0)
250 (properties-to-font-name . ,properties-to-font-name)
251 (style-to-font-name . ,style-to-font-name)
252 (markup-to-properties . ,markup-to-properties)
253 (font-family . roman)
254 (font-shape . upright)
255 (font-relative-size . 0)
257 (meta . ,(element-description "LyricText" lyric-syllable-interface text-interface))
261 (molecule-callback . ,Text_item::brew_molecule)
263 (properties-to-font-name . ,properties-to-font-name)
264 (style-to-font-name . ,style-to-font-name)
265 (markup-to-properties . ,markup-to-properties)
267 (visibility-lambda . ,end-of-line-invisible)
269 (meta . ,(element-description "RehearsalMark" mark-interface side-position-interface))
272 (MultiMeasureRest . (
273 (spacing-procedure . ,Multi_measure_rest::set_spacing_rods)
274 (molecule-callback . ,Multi_measure_rest::brew_molecule)
277 (padding . 2.0) ; staffspace
278 (minimum-width . 12.5) ; staffspace
279 (properties-to-font-name . ,properties-to-font-name)
280 (style-to-font-name . ,style-to-font-name)
281 (markup-to-properties . ,markup-to-properties)
282 (font-style . mmrest)
283 (meta . ,(element-description "MultiMeasureRest" multi-measure-rest-interface ))
288 (meta . ,(element-description "NoteColumn" axis-group-interface note-column-interface))
293 (molecule-callback . ,Note_head::brew_molecule)
294 (Y-offset-callbacks . (,Staff_symbol_referencer::callback))
295 (meta . ,(element-description "NoteHead"
296 rhythmic-head-interface
297 note-head-interface ))
302 (molecule-callback . ,Text_item::brew_molecule)
303 (properties-to-font-name . ,properties-to-font-name)
304 (style-to-font-name . ,style-to-font-name)
305 (markup-to-properties . ,markup-to-properties)
306 (font-family . roman)
307 (font-shape . upright)
308 (font-relative-size . 0)
309 (meta . ,(element-description "NoteName"
311 general-element-interface))
315 (self-alignment-X . 0)
317 (visibility-lambda . ,begin-of-line-visible)
318 (X-offset-callbacks . (,Side_position::centered_on_parent ,Side_position::aligned_on_self))
319 (Y-offset-callbacks . (,Side_position::aligned_side))
320 (molecule-callback . ,Text_item::brew_molecule)
321 (font-shape . italic)
322 (properties-to-font-name . ,properties-to-font-name)
323 (style-to-font-name . ,style-to-font-name)
324 (markup-to-properties . ,markup-to-properties)
326 (meta . ,(element-description "OctavateEight" text-interface ))
331 (before-grace-spacing-factor . 1.2)
332 (before-musical-spacing-factor . 0.4)
333 (meta . ,(element-description "PaperColumn" paper-column-interface axis-group-interface spaceable-element-interface))
335 (NonMusicalPaperColumn . (
337 (before-musical-spacing-factor . 1.0)
338 (column-space-strength . 2.0)
339 (meta . ,(element-description "NonMusicalPaperColumn" paper-column-interface axis-group-interface spaceable-element-interface))
343 (after-line-breaking-callback . ,Rest::after_line_breaking)
344 (molecule-callback . ,Rest::brew_molecule)
345 (minimum-beam-collision-distance . 1.5)
346 (meta . ,(element-description "Rest"
347 rhythmic-head-interface
351 (minimum-distance . 0.75)
352 (meta . ,(element-description "RestCollision" rest-collision-interface ))
356 (molecule-callback . ,Script::brew_molecule)
357 (X-offset-callbacks . (,Side_position::centered_on_parent))
358 (meta . ,(element-description "Script" script-interface side-position-interface))
362 (before-line-breaking-callback . ,Script_column::before_line_breaking)
363 (meta . ,(element-description "ScriptColumn" script-column-interface))
366 (Slur . ,default-basic-slur-properties)
368 (spacing-procedure . ,Spacing_spanner::set_springs)
369 (stem-spacing-correction . 0.5)
370 (arithmetic-basicspace . 2.0)
371 (arithmetic-multiplier . ,(* 0.9 1.32))
372 ;; assume that notes at least this long are present.
373 (maximum-duration-for-spacing . ,(make-moment 1 8))
374 (meta . ,(element-description "SpacingSpanner" spacing-spanner-interface))
378 (break-align-symbol . Staff_bar)
379 (barsize-procedure . ,Span_bar::get_bar_size)
380 (molecule-callback . ,Bar::brew_molecule)
381 (visibility-lambda . ,begin-of-line-invisible)
382 (X-extent-callback . ,Span_bar::width_callback)
383 (Y-offset-callbacks . (,Span_bar::center_on_spanned_callback))
387 (before-line-breaking-callback . ,Span_bar::before_line_breaking)
391 ;; Ross. page 151 lists other values, we opt for a leaner look
395 (hair-thickness . 1.6)
396 (thick-thickness . 6.0)
397 (meta . ,(element-description "SpanBar" span-bar-interface bar-line-interface ))
402 (molecule-callback . ,Text_item::brew_molecule)
403 (break-align-symbol . Clef_item)
404 (visibility-lambda . ,begin-of-line-visible)
405 (properties-to-font-name . ,properties-to-font-name)
406 (style-to-font-name . ,style-to-font-name)
407 (markup-to-properties . ,markup-to-properties)
408 (font-family . roman)
409 (meta . ,(element-description "StanzaNumber" break-aligned-interface text-interface))
413 (molecule-callback . ,Staff_symbol::brew_molecule)
416 (meta . ,(element-description "StaffSymbol" staff-symbol-interface ))
419 (molecule-callback . ,Text_item::brew_molecule)
420 (X-offset-callbacks . (,Side_position::aligned_on_self))
421 (Y-offset-callbacks .
422 (,Side_position::aligned_side
423 ,Side_position::centered_on_parent))
424 (no-spacing-rods . #t)
425 (font-shape . italic)
426 (properties-to-font-name . ,properties-to-font-name)
427 (style-to-font-name . ,style-to-font-name)
428 (markup-to-properties . ,markup-to-properties)
430 (self-alignment-X . 0)
431 (meta . ,(element-description "SostenutoPedal" text-interface ))
435 (before-line-breaking-callback . ,Stem::before_line_breaking)
436 (molecule-callback . ,Stem::brew_molecule)
438 (beamed-lengths . (0.0 2.5 2.0 1.5))
439 (beamed-minimum-lengths . (0.0 1.5 1.25 1.0))
441 ;; Stems in unnatural (forced) direction should be shortened,
442 ;; according to [Roush & Gourlay]. Their suggestion to knock off
443 ;; a whole staffspace seems a bit drastical: we'll do half.
445 (lengths . (3.5 3.5 3.5 4.5 5.0))
446 (stem-shorten . (0.5))
447 ; if stem is on middle line, choose this direction.
448 (default-neutral-direction . 1)
449 (X-offset-callbacks . (,Stem::off_callback))
450 (meta . ,(element-description "Stem" stem-interface ))
454 (molecule-callback . ,Stem_tremolo::brew_molecule)
455 (beam-width . 2.0) ; staff-space
456 (beam-thickness . 0.42) ; staff-space
457 (beam-space-function . ,default-beam-space-function)
458 (meta . ,(element-description "StemTremolo" stem-tremolo-interface ))
462 (meta . ,(element-description "SeparationItem" separation-item-interface ))
464 (SeparatingGroupSpanner . (
465 (spacing-procedure . ,Separating_group_spanner::set_spacing_rods)
466 (meta . ,(element-description "SeparatingGroupSpanner" separation-spanner-interface))
470 (no-spacing-rods . #t)
471 (molecule-callback . ,Sustain_pedal::brew_molecule)
472 (self-alignment-X . 0)
473 (X-offset-callbacks . (,Side_position::aligned_on_self))
474 (Y-offset-callbacks .
475 (,Side_position::aligned_side
476 ,Side_position::centered_on_parent))
478 (meta . ,(element-description "SustainPedal" sustain-pedal-interface side-position-interface))
481 (SystemStartDelimiter . (
482 (molecule-callback . ,System_start_delimiter::brew_molecule)
483 (after-line-breaking-callback . ,System_start_delimiter::after_line_breaking)
484 (collapse-height . 1.0)
491 (bracket-thick . 0.25)
492 (bracket-width . 2.0)
493 (Y-extent-callback . #f)
494 (meta . ,(element-description "SystemStartDelimiter" system-start-delimiter ))
498 (molecule-callback . ,Text_item::brew_molecule)
499 (no-spacing-rods . #t)
501 (properties-to-font-name . ,properties-to-font-name)
502 (style-to-font-name . ,style-to-font-name)
503 (markup-to-properties . ,markup-to-properties)
504 (font-family . roman)
505 (font-shape . italic)
506 (font-relative-size . 0)
507 (meta . ,(element-description "TextScript" text-script-interface text-interface side-position-interface ))
510 (molecule-callback . ,Text_spanner::brew_molecule)
511 (font-shape . italic)
512 (properties-to-font-name . ,properties-to-font-name)
513 (style-to-font-name . ,style-to-font-name)
514 (markup-to-properties . ,markup-to-properties)
517 (meta . ,(element-description "TextSpanner" text-spanner-interface ))
520 (molecule-callback . ,Tie::brew_molecule)
521 (spacing-procedure . ,Tie::set_spacing_rods)
522 (staffline-clearance . 0.35)
523 (details . ((ratio . 0.333) (height-limit . 1.0)))
526 (minimum-length . 2.5)
527 (meta . ,(element-description "Tie" tie-interface ))
531 (after-line-breaking-callback . ,Tie_column::after_line_breaking)
532 (meta . ,(element-description "TieColumn" tie-column-interface ))
536 (molecule-callback . ,Time_signature::brew_molecule)
537 (break-align-symbol . Time_signature)
538 (visibility-lambda . ,all-visible)
540 (properties-to-font-name . ,properties-to-font-name)
541 (style-to-font-name . ,style-to-font-name)
542 (markup-to-properties . ,markup-to-properties)
543 (font-style . timesig)
545 (meta . ,(element-description "TimeSignature" time-signature-interface ))
552 (after-line-breaking-callback . ,Tuplet_spanner::after_line_breaking)
553 (molecule-callback . ,Tuplet_spanner::brew_molecule)
554 (properties-to-font-name . ,properties-to-font-name)
555 (style-to-font-name . ,style-to-font-name)
556 (markup-to-properties . ,markup-to-properties)
557 (font-style . tuplet)
558 (meta . ,(element-description "TupletBracket" text-interface
559 tuplet-bracket-interface))
563 (molecule-callback . ,Text_item::brew_molecule)
564 (font-shape . italic)
565 (properties-to-font-name . ,properties-to-font-name)
566 (style-to-font-name . ,style-to-font-name)
567 (markup-to-properties . ,markup-to-properties)
568 (no-spacing-rods . #t)
569 (self-alignment-X . 0)
570 (X-offset-callbacks . (,Side_position::aligned_on_self))
571 (Y-offset-callbacks .
572 (,Side_position::aligned_side
573 ,Side_position::centered_on_parent))
574 (meta . ,(element-description "UnaChordaPedal" text-interface ))
578 (molecule-callback . ,Volta_spanner::brew_molecule)
581 (properties-to-font-name . ,properties-to-font-name)
582 (style-to-font-name . ,style-to-font-name)
583 (markup-to-properties . ,markup-to-properties)
586 (thickness . 1.6) ; stafflinethickness
587 (height . 2.0) ; staffspace;
589 (meta . ,(element-description "VoltaBracket" volta-bracket-interface side-position-interface))
592 (VerticalAlignment . (
594 (Y-extent-callback . ,Axis_group_interface::group_extent_callback)
595 (X-extent-callback . #f)
597 (meta . ,(element-description "VerticalAlignment" align-interface axis-group-interface))
600 (VerticalAxisGroup . (
602 (meta . ,(element-description "VerticalAxisGroup" axis-group-interface))
608 ; (display (map pair? all-element-descriptions))