1 ; distances are given in stafflinethickness (thicknesses) and
2 ; staffspace (distances)
4 (define all-element-descriptions
6 (X-extent-callback . ,Arpeggio::width_callback)
7 (molecule-callback . ,Arpeggio::brew_molecule)
8 (Y-offset-callbacks . (,Staff_symbol_referencer::callback))
9 (X-offset-callbacks . (,Side_position::aligned_side))
11 (staff-position . 0.0)
12 (meta . ,(element-description "Arpeggio" arpeggio-interface side-position-interface font-interface))
16 (break-align-symbol . Staff_bar)
18 (break-glyph-function . ,default-break-barline)
19 (barsize-procedure . ,Bar::get_staff_bar_size)
20 (molecule-callback . ,Bar::brew_molecule)
21 (visibility-lambda . ,all-visible)
23 (before-line-breaking-callback . ,Bar::before_line_breaking)
25 ;; Ross. page 151 lists other values, we opt for a leaner look
29 (hair-thickness . 1.6)
30 (thick-thickness . 6.0)
31 (meta . ,(element-description "BarLine" bar-line-interface font-interface))
35 (molecule-callback . ,Text_item::brew_molecule)
37 (visibility-lambda . ,begin-of-line-visible)
41 (font-relative-size . -1)
42 (meta . ,(element-description "BarNumber"
43 text-interface font-interface break-aligned-interface))
46 (Beam . ,basic-beam-properties)
52 (X-offset-callbacks . (,Break_align_interface::self_align_callback))
53 (space-alist . ,default-break-align-space-alist)
54 (meta . ,(element-description "BreakAlignment"
55 axis-group-interface align-interface
62 (X-offset-callbacks . (,Break_align_interface::alignment_callback))
64 (meta . ,(element-description "BreakAlignGroup" axis-group-interface))
68 (break-align-symbol . Breathing_sign)
70 (molecule-callback . ,Breathing_sign::brew_molecule)
71 (Y-offset-callbacks . (,Breathing_sign::offset_callback))
72 (visibility-lambda . ,begin-of-line-invisible)
73 (meta . ,(element-description "BreathingSign" break-aligned-interface))
77 (molecule-callback . ,Clef::brew_molecule)
78 (before-line-breaking-callback . ,Clef::before_line_breaking)
81 (break-align-symbol . Clef_item)
82 (visibility-lambda . ,begin-of-line-visible)
83 (Y-offset-callbacks . (,Staff_symbol_referencer::callback))
84 (meta . ,(element-description "Clef" clef-interface font-interface break-aligned-interface ))
88 (molecule-callback . ,Chord_name::brew_molecule)
89 (after-line-breaking-callback . ,Chord_name::after_line_breaking)
90 (chord-name-function . ,default-chord-name-function)
92 (meta . ,(element-description "ChordNames" font-interface text-interface chord-name-interface))
96 (break-align-symbol . Custos)
98 (molecule-callback . ,Custos::brew_molecule)
99 (visibility-lambda . ,end-of-line-visible)
101 (Y-offset-callbacks . (,Staff_symbol_referencer::callback))
102 (meta . ,(element-description "Custos" custos-interface staff-symbol-interface break-aligned-interface) )
106 (molecule-callback . ,Crescendo::brew_molecule)
108 (shorten-for-letter . 4.0)
110 (dash-thickness . 1.2)
112 (self-alignment-Y . 0)
113 (Y-offset-callbacks . (,Side_position::aligned_on_self))
114 (meta . ,(element-description "Crescendo" hairpin-interface))
119 (meta . ,(element-description "DotColumn" dot-column-interface axis-group-interface))
123 (molecule-callback . ,Dots::brew_molecule)
125 (font-family . music)
126 (staff-position . 0.0)
127 (Y-offset-callbacks . (,Dots::quantised_position_callback ,Staff_symbol_referencer::callback))
128 (meta . ,(element-description "Dots" font-interface dot-interface ))
132 (Y-offset-callbacks . (,Side_position::aligned_on_self))
133 (molecule-callback . ,Text_item::brew_molecule)
134 (script-priority . 100)
136 (font-family . dynamic)
137 (self-alignment-Y . 0)
138 (meta . ,(element-description "DynamicText" font-interface text-interface ))
141 (DynamicLineSpanner . (
144 (minimum-space . 1.2)
145 (meta . ,(element-description "DynamicLineSpanner" dynamic-interface axis-group-interface side-position-interface))
149 (break-align-symbol . Left_edge_item)
150 (X-offset-callbacks . (,Break_align_interface::alignment_callback))
152 (meta . ,(element-description "LeftEdge" break-aligned-interface))
156 (molecule-callback . ,Text_item::brew_molecule)
157 (X-offset-callbacks . (,Side_position::centered_on_parent ,Side_position::aligned_on_self))
159 (self-alignment-X . 0)
160 (font-family . number)
161 (font-relative-size . -3)
162 (font-shape . upright)
163 (meta . ,(element-description "Fingering" finger-interface font-interface text-script-interface text-interface side-position-interface))
168 (horizontal-space . 1.2)
170 (before-line-breaking-callback . ,Grace_align_item::before_line_breaking)
171 (meta . ,(element-description "GraceAlignment" axis-group-interface align-interface grace-alignment-interface))
174 (HaraKiriVerticalGroup . (
175 (Y-offset-callbacks . (,Hara_kiri_group_spanner::force_hara_kiri_callback))
176 (Y-extent-callback . ,Hara_kiri_group_spanner::y_extent)
178 (meta . ,(element-description "HaraKiriVerticalGroup" axis-group-interface hara-kiri-group-interface))
184 (minimum-length . 0.5)
185 (molecule-callback . ,Hyphen_spanner::brew_molecule)
186 (Y-extent-callback . ,Score_element::point_dimension_callback)
187 (meta . ,(element-description "LyricHyphen" lyric-hyphen-interface ))
192 (Y-offset-callbacks . (,Side_position::centered_on_parent
193 ,Side_position::aligned_on_self))
194 (self-alignment-Y . 0)
195 (molecule-callback . ,Text_item::brew_molecule)
196 (break-align-symbol . Instrument_name)
197 (visibility-lambda . ,begin-of-line-visible)
198 (font-family . roman)
199 (meta . ,(element-description "InstrumentName" font-interface text-interface break-aligned-interface))
203 (molecule-callback . ,Key_item::brew_molecule)
204 (break-align-symbol . Key_item)
205 (visibility-lambda . ,begin-of-line-visible)
207 (meta . ,(element-description "KeySignature" key-signature-interface font-interface break-aligned-interface))
211 (molecule-callback . ,Local_key_item::brew_molecule)
212 (X-offset-callbacks . (,Side_position::aligned_side))
215 (right-padding . 0.4)
216 (meta . ,(element-description "Accidentals" accidentals-interface font-interface ))
221 (meta . ,(element-description "LineOfScore" line-of-score-interface axis-group-interface))
225 (molecule-callback . ,Lyric_extender::brew_molecule)
226 (height . 0.8) ; stafflinethickness;
227 (right-trim-amount . 0.5)
228 (Y-extent-callback . ,Score_element::point_dimension_callback)
229 (meta . ,(element-description "LyricExtender" lyric-extender-interface))
233 (molecule-callback . ,Text_item::brew_molecule)
234 (X-offset-callbacks . (,Side_position::aligned_on_self))
235 (self-alignment-X . 0)
238 (font-family . roman)
239 (font-shape . upright)
240 (font-relative-size . 0)
241 (meta . ,(element-description "LyricText" lyric-syllable-interface text-interface font-interface ))
245 (molecule-callback . ,Text_item::brew_molecule)
247 (font-family . number)
248 (font-relative-size . 1)
249 (visibility-lambda . ,end-of-line-invisible)
251 (meta . ,(element-description "RehearsalMark" mark-interface side-position-interface))
254 (MultiMeasureRest . (
255 (spacing-procedure . ,Multi_measure_rest::set_spacing_rods)
256 (molecule-callback . ,Multi_measure_rest::brew_molecule)
259 (padding . 2.0) ; staffspace
260 (minimum-width . 12.5) ; staffspace
261 (font-family . number)
262 (font-relative-size . 1)
263 (meta . ,(element-description "MultiMeasureRest" multi-measure-rest-interface font-interface ))
268 (meta . ,(element-description "NoteCollision"
269 note-collision-interface axis-group-interface
275 (meta . ,(element-description "NoteColumn" axis-group-interface note-column-interface))
280 (molecule-callback . ,Note_head::brew_molecule)
281 (Y-offset-callbacks . (,Staff_symbol_referencer::callback))
282 (meta . ,(element-description "NoteHead"
283 rhythmic-head-interface font-interface
284 note-head-interface ))
289 (molecule-callback . ,Text_item::brew_molecule)
290 (meta . ,(element-description "NoteName"
291 note-name-interface font-interface
292 general-element-interface))
296 (self-alignment-X . 0)
298 (visibility-lambda . ,begin-of-line-visible)
299 (X-offset-callbacks . (,Side_position::centered_on_parent ,Side_position::aligned_on_self))
300 (Y-offset-callbacks . (,Side_position::aligned_side))
301 (molecule-callback . ,Text_item::brew_molecule)
302 (font-shape . italic)
303 (meta . ,(element-description "OctavateEight" text-interface font-interface ))
308 (before-grace-spacing-factor . 1.2)
309 (before-musical-spacing-factor . 0.4)
310 (meta . ,(element-description "PaperColumn" paper-column-interface axis-group-interface spaceable-element-interface))
312 (NonMusicalPaperColumn . (
314 (before-musical-spacing-factor . 1.0)
315 (column-space-strength . 2.0)
316 (meta . ,(element-description "NonMusicalPaperColumn" paper-column-interface axis-group-interface spaceable-element-interface))
320 (after-line-breaking-callback . ,Rest::after_line_breaking)
321 (molecule-callback . ,Rest::brew_molecule)
322 (minimum-beam-collision-distance . 1.5)
323 (meta . ,(element-description "Rest"
324 rhythmic-head-interface
328 (minimum-distance . 0.75)
329 (meta . ,(element-description "RestCollision" rest-collision-interface ))
333 (molecule-callback . ,Script::brew_molecule)
334 (X-offset-callbacks . (,Side_position::centered_on_parent))
335 (meta . ,(element-description "Script" script-interface side-position-interface font-interface))
339 (before-line-breaking-callback . ,Script_column::before_line_breaking)
340 (meta . ,(element-description "ScriptColumn" script-column-interface))
343 (Slur . ,default-basic-slur-properties)
345 (spacing-procedure . ,Spacing_spanner::set_springs)
346 (stem-spacing-correction . 0.5)
347 (arithmetic-basicspace . 2.0)
348 (arithmetic-multiplier . ,(* 0.9 1.32))
349 ;; assume that notes at least this long are present.
350 (maximum-duration-for-spacing . ,(make-moment 1 8))
351 (meta . ,(element-description "SpacingSpanner" spacing-spanner-interface))
355 (break-align-symbol . Staff_bar)
356 (barsize-procedure . ,Span_bar::get_bar_size)
357 (molecule-callback . ,Bar::brew_molecule)
358 (visibility-lambda . ,begin-of-line-invisible)
359 (X-extent-callback . ,Span_bar::width_callback)
360 (Y-offset-callbacks . (,Span_bar::center_on_spanned_callback))
364 (before-line-breaking-callback . ,Span_bar::before_line_breaking)
368 ;; Ross. page 151 lists other values, we opt for a leaner look
372 (hair-thickness . 1.6)
373 (thick-thickness . 6.0)
374 (meta . ,(element-description "SpanBar" span-bar-interface bar-line-interface ))
379 (molecule-callback . ,Text_item::brew_molecule)
380 (break-align-symbol . Clef_item)
381 (visibility-lambda . ,begin-of-line-visible)
382 (font-family . roman)
383 (meta . ,(element-description "StanzaNumber" break-aligned-interface text-interface font-interface))
387 (molecule-callback . ,Staff_symbol::brew_molecule)
390 (meta . ,(element-description "StaffSymbol" staff-symbol-interface ))
393 (molecule-callback . ,Text_item::brew_molecule)
394 (X-offset-callbacks . (,Side_position::aligned_on_self))
395 (Y-offset-callbacks .
396 (,Side_position::aligned_side
397 ,Side_position::centered_on_parent))
398 (no-spacing-rods . #t)
399 (font-shape . italic)
400 (self-alignment-X . 0)
401 (meta . ,(element-description "SostenutoPedal" text-interface font-interface))
405 (before-line-breaking-callback . ,Stem::before_line_breaking)
406 (molecule-callback . ,Stem::brew_molecule)
408 (beamed-lengths . (0.0 2.5 2.0 1.5))
409 (beamed-minimum-lengths . (0.0 1.5 1.25 1.0))
411 ;; Stems in unnatural (forced) direction should be shortened,
412 ;; according to [Roush & Gourlay]. Their suggestion to knock off
413 ;; a whole staffspace seems a bit drastical: we'll do half.
415 (lengths . (3.5 3.5 3.5 4.5 5.0))
416 (stem-shorten . (0.5))
417 ; if stem is on middle line, choose this direction.
418 (default-neutral-direction . 1)
419 (X-offset-callbacks . (,Stem::off_callback))
420 (meta . ,(element-description "Stem" stem-interface font-interface))
424 (molecule-callback . ,Stem_tremolo::brew_molecule)
425 (beam-width . 2.0) ; staff-space
426 (beam-thickness . 0.42) ; staff-space
427 (beam-space-function . ,default-beam-space-function)
428 (meta . ,(element-description "StemTremolo" stem-tremolo-interface ))
432 (meta . ,(element-description "SeparationItem" separation-item-interface ))
434 (SeparatingGroupSpanner . (
435 (spacing-procedure . ,Separating_group_spanner::set_spacing_rods)
436 (meta . ,(element-description "SeparatingGroupSpanner" separation-spanner-interface))
440 (no-spacing-rods . #t)
441 (molecule-callback . ,Sustain_pedal::brew_molecule)
442 (self-alignment-X . 0)
443 (X-offset-callbacks . (,Side_position::aligned_on_self))
444 (Y-offset-callbacks .
445 (,Side_position::aligned_side
446 ,Side_position::centered_on_parent))
448 (meta . ,(element-description "SustainPedal" sustain-pedal-interface side-position-interface font-interface))
451 (SystemStartDelimiter . (
452 (molecule-callback . ,System_start_delimiter::brew_molecule)
453 (after-line-breaking-callback . ,System_start_delimiter::after_line_breaking)
454 (collapse-height . 1.0)
461 (bracket-thick . 0.25)
462 (bracket-width . 2.0)
463 (font-family . braces)
464 (font-point-size . 20)
465 (Y-extent-callback . #f)
466 (meta . ,(element-description "SystemStartDelimiter" system-start-delimiter font-interface))
470 (molecule-callback . ,Text_item::brew_molecule)
471 (no-spacing-rods . #t)
473 (font-family . roman)
474 (font-shape . italic)
475 (font-relative-size . 0)
476 (meta . ,(element-description "TextScript" text-script-interface text-interface side-position-interface font-interface ))
479 (molecule-callback . ,Text_spanner::brew_molecule)
480 (font-shape . italic)
483 (meta . ,(element-description "TextSpanner" text-spanner-interface font-interface))
486 (molecule-callback . ,Tie::brew_molecule)
487 (spacing-procedure . ,Tie::set_spacing_rods)
488 (staffline-clearance . 0.35)
489 (details . ((ratio . 0.333) (height-limit . 1.0)))
492 (minimum-length . 2.5)
493 (meta . ,(element-description "Tie" tie-interface ))
497 (after-line-breaking-callback . ,Tie_column::after_line_breaking)
498 (meta . ,(element-description "TieColumn" tie-column-interface ))
502 (molecule-callback . ,Time_signature::brew_molecule)
503 (break-align-symbol . Time_signature)
504 (visibility-lambda . ,all-visible)
506 (font-family . number)
507 (meta . ,(element-description "TimeSignature" time-signature-interface font-interface))
514 (after-line-breaking-callback . ,Tuplet_spanner::after_line_breaking)
515 (molecule-callback . ,Tuplet_spanner::brew_molecule)
516 (font-shape . italic)
517 (font-relative-size . -1)
518 (meta . ,(element-description "TupletBracket" text-interface
519 tuplet-bracket-interface font-interface))
523 (molecule-callback . ,Text_item::brew_molecule)
524 (font-shape . italic)
525 (no-spacing-rods . #t)
526 (self-alignment-X . 0)
527 (X-offset-callbacks . (,Side_position::aligned_on_self))
528 (Y-offset-callbacks .
529 (,Side_position::aligned_side
530 ,Side_position::centered_on_parent))
531 (meta . ,(element-description "UnaChordaPedal" text-interface font-interface))
535 (molecule-callback . ,Volta_spanner::brew_molecule)
540 (Y-offset-callbacks . (,Side_position::aligned_side))
541 (thickness . 1.6) ; stafflinethickness
542 (height . 2.0) ; staffspace;
544 (font-family . number)
545 (font-relative-size . -2)
546 (meta . ,(element-description "VoltaBracket" volta-bracket-interface side-position-interface font-interface))
549 (VerticalAlignment . (
551 (Y-extent-callback . ,Axis_group_interface::group_extent_callback)
552 (X-extent-callback . #f)
554 (meta . ,(element-description "VerticalAlignment" align-interface axis-group-interface))
557 (VerticalAxisGroup . (
559 (meta . ,(element-description "VerticalAxisGroup" axis-group-interface))
565 ; (display (map pair? all-element-descriptions))