9 \description "Hard coded entry point for LilyPond. Cannot be tuned."
10 \grobdescriptions #all-grob-descriptions
13 % FIXME: replace minimum-Y-extents with proper spacing commands.
16 \type "Engraver_group"
18 \description "A context for displaying fret diagrams."
20 \consists "Fretboard_engraver"
21 \consists "Rest_swallow_translator"
22 \consists "Output_property_engraver"
23 \consists "Skip_event_swallow_translator"
24 \consists "Hara_kiri_engraver"
25 \consists "Separating_line_group_engraver"
26 \consists "Font_size_engraver"
27 \consists "Instrument_name_engraver"
29 predefinedDiagramTable = #fretboard-table
33 \type "Engraver_group"
36 \consists "Output_property_engraver"
37 \consists "Bar_engraver"
38 %% Bar_engraver must be first so default bars aren't overwritten
41 \consists "Font_size_engraver"
42 \consists "Separating_line_group_engraver"
43 \consists "Dot_column_engraver"
44 \consists "Staff_collecting_engraver"
46 %% perhaps move to Voice context?
47 \consists "Ottava_spanner_engraver"
48 \consists "Clef_engraver"
49 \consists "Key_engraver"
50 \consists "Time_signature_engraver"
51 \consists "Ledger_line_engraver"
52 \consists "Staff_symbol_engraver"
53 \consists "Collision_engraver"
54 \consists "Grob_pq_engraver"
55 \consists "Rest_collision_engraver"
56 \consists "Accidental_engraver"
57 \consists "Piano_pedal_engraver"
58 \consists "Piano_pedal_align_engraver"
59 \consists "Instrument_name_engraver"
60 \consists "String_number_engraver"
61 \consists "Axis_group_engraver"
62 \consists "Figured_bass_engraver"
63 \consists "Figured_bass_position_engraver"
64 \consists "Script_row_engraver"
66 localKeySignature = #'()
68 ignoreFiguredBassRest = ##t
69 \override VerticalAxisGroup #'minimum-Y-extent = #'(-4 . 4)
71 %% explicitly set instrument, so we don't get
72 %% weird effects when doing instrument names for
76 shortInstrumentName = #'()
82 \description "Handles clefs, bar lines, keys, accidentals. It can contain
83 @code{Voice} contexts."
89 \type "Engraver_group"
93 \remove "Accidental_engraver"
94 \remove "Ottava_spanner_engraver"
95 \remove "Key_engraver"
96 \remove "Piano_pedal_engraver"
97 \remove "String_number_engraver"
99 \description "Handles typesetting for percussion."
103 \defaultchild "DrumVoice"
105 clefGlyph = #"clefs.percussion"
107 \override Script #'staff-padding = #0.75
112 \type "Engraver_group"
114 \consists "Vertical_align_engraver"
115 topLevelAlignment = ##f
117 \consists "System_start_delimiter_engraver"
118 systemStartDelimiter = #'SystemStartBracket
120 shortVocalName = #'()
124 \accepts "RhythmicStaff"
125 \accepts "GrandStaff"
126 \accepts "PianoStaff"
128 \accepts "ChordNames"
129 \accepts "ChoirStaff"
130 \accepts "StaffGroup"
131 \defaultchild "Staff"
132 \description "Identical to @code{StaffGroup} except that the
133 contained staves are not connected vertically."
137 \type "Engraver_group"
139 \override VerticalAxisGroup #'minimum-Y-extent = ##f
140 localKeySignature = #'()
143 squashedPosition = #0
147 \override BarLine #'bar-size = #4
148 \override VoltaBracket #'staff-padding = #3
149 \override StaffSymbol #'line-count = #1
151 \override Stem #'neutral-direction = #UP
152 \override Beam #'neutral-direction = #UP
154 \consists "Output_property_engraver"
155 \consists "Font_size_engraver"
156 \consists "Separating_line_group_engraver"
157 \consists "Dot_column_engraver"
158 \consists "Bar_engraver"
159 \consists "Staff_symbol_engraver"
160 \consists "Pitch_squash_engraver"
161 \consists "Time_signature_engraver"
162 \consists "Instrument_name_engraver"
163 \consists "Axis_group_engraver"
164 \consists "Ledger_line_engraver"
168 \defaultchild "Voice"
170 \description "A context like @code{Staff} but for printing rhythms.
171 Pitches are ignored; the notes are printed on one line."
176 \type "Engraver_group"
179 \description "Corresponds to a voice on a staff. This context
180 handles the conversion of dynamic signs, stems, beams, super- and
181 subscripts, slurs, ties, and rests.
183 You have to instantiate this explicitly if you want to have
184 multiple voices on the same staff."
186 localKeySignature = #'()
187 \consists "Font_size_engraver"
189 \consists "Pitched_trill_engraver"
190 \consists "Output_property_engraver"
191 \consists "Arpeggio_engraver"
192 \consists "Multi_measure_rest_engraver"
193 \consists "Text_spanner_engraver"
194 \consists "Trill_spanner_engraver"
195 \consists "Grob_pq_engraver"
196 \consists "Forbid_line_break_engraver"
197 \consists "Laissez_vibrer_engraver"
198 \consists "Repeat_tie_engraver"
199 \consists "Note_head_line_engraver"
200 \consists "Glissando_engraver"
201 \consists "Ligature_bracket_engraver"
202 \consists "Breathing_sign_engraver"
203 \consists "Note_heads_engraver"
204 \consists "Dots_engraver"
205 \consists "Rest_engraver"
206 \consists "Tweak_engraver"
208 %% switch on to make stem directions interpolate for the
210 % \consists "Melody_engraver"
212 \consists "Stem_engraver"
213 \consists "Beam_engraver"
214 \consists "Grace_beam_engraver"
215 \consists "Auto_beam_engraver"
217 %% must come before Script_column_engraver.
218 \consists "New_fingering_engraver"
220 \consists "Chord_tremolo_engraver"
221 \consists "Percent_repeat_engraver"
222 \consists "Slash_repeat_engraver"
223 \consists "Part_combine_engraver"
225 \consists "Text_engraver"
226 \consists "New_dynamic_engraver"
227 \consists "Dynamic_align_engraver"
228 % \consists "Dynamic_engraver"
229 \consists "Fingering_engraver"
230 \consists "Bend_engraver"
232 \consists "Script_engraver"
233 \consists "Script_column_engraver"
234 \consists "Rhythmic_column_engraver"
235 \consists "Note_spacing_engraver"
236 \consists "Spanner_break_forbid_engraver"
237 \consists "Phrasing_slur_engraver"
238 \consists "Cluster_spanner_engraver"
239 \consists "Slur_engraver"
240 \consists "Tie_engraver"
241 \consists "Tuplet_engraver"
242 \consists "Grace_engraver"
243 \consists "Instrument_switch_engraver"
244 \consists "Skip_event_swallow_translator"
253 \override Stem #'length-fraction = #(magstep -4)
254 \override Beam #'length-fraction = #(magstep -4)
255 \override Beam #'thickness = #0.35
263 \description "A voice on a percussion staff."
264 \remove "Arpeggio_engraver"
265 \consists "Grob_pq_engraver"
267 \remove "Note_head_line_engraver"
268 \remove "Glissando_engraver"
269 \remove "Ligature_bracket_engraver"
270 \remove "Note_heads_engraver"
271 \consists "Drum_notes_engraver"
272 \remove "New_fingering_engraver"
274 \remove "Fingering_engraver"
276 \remove "Cluster_spanner_engraver"
278 \consists "Skip_event_swallow_translator"
282 \type "Engraver_group"
284 localKeySignature = #'()
286 \description "A group of staves, with a brace on the left
287 side, grouping the staves together. The bar lines of the
288 contained staves are connected vertically."
290 \consists "Span_bar_engraver"
291 \consists "Span_arpeggio_engraver"
292 \consists "System_start_delimiter_engraver"
293 systemStartDelimiter = #'SystemStartBrace
295 \defaultchild "Staff"
297 \accepts "FiguredBass"
306 \description "Just like @code{GrandStaff} but with support for
307 instrument names at the start of each system."
309 \consists "Instrument_name_engraver"
310 \consists "Vertical_align_engraver"
311 topLevelAlignment = ##f
313 \override StaffGrouper #'between-staff-spacing #'stretchability = #5
315 instrumentName = #'()
316 shortInstrumentName = #'()
320 \type "Engraver_group"
323 \consists "Vertical_align_engraver"
324 topLevelAlignment = ##f
326 \consists "Span_bar_engraver"
327 \consists "Span_arpeggio_engraver"
328 \consists "Output_property_engraver"
329 systemStartDelimiter = #'SystemStartBracket
331 \consists "System_start_delimiter_engraver"
333 \defaultchild "Staff"
335 \accepts "RhythmicStaff"
337 \accepts "GrandStaff"
338 \accepts "PianoStaff"
341 \accepts "ChordNames"
342 \accepts "FiguredBass"
343 \accepts "ChoirStaff"
344 \accepts "StaffGroup"
346 \description "Groups staves while adding a bracket on the left
347 side, grouping the staves together. The bar lines of the contained
348 staves are connected vertically. @code{StaffGroup} only consists of
349 a collection of staves, with a bracket in front and spanning bar lines."
353 \type "Engraver_group"
356 \consists "Output_property_engraver"
357 \consists "Piano_pedal_engraver"
358 \consists "Script_engraver"
359 \consists "New_dynamic_engraver"
360 \consists "Dynamic_align_engraver"
361 \consists "Text_engraver"
362 \consists "Skip_event_swallow_translator"
363 \consists "Axis_group_engraver"
365 pedalSustainStrings = #'("Ped." "*Ped." "*")
366 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
367 \override VerticalAxisGroup #'staff-affinity = #CENTER
368 \override VerticalAxisGroup #'inter-staff-spacing = #'((space . 5) (padding . 0.5))
369 \override TextScript #'font-shape = #'italic
371 \description "Holds a single line of dynamics, which will be
372 centered between the staves surrounding this context."
377 \type "Engraver_group"
378 \override VerticalAxisGroup #'minimum-Y-extent = #'(-0.75 . 2.0)
380 \description "Corresponds to a voice with lyrics. Handles the
381 printing of a single line of lyrics."
384 instrumentName = #'()
385 shortInstrumentName = #'()
387 \consists "Lyric_engraver"
388 \consists "Extender_engraver"
389 \consists "Hyphen_engraver"
390 \consists "Stanza_number_engraver"
391 \consists "Instrument_name_engraver"
392 \consists "Skip_event_swallow_translator"
393 \consists "Font_size_engraver"
394 \consists "Hara_kiri_engraver"
396 \override VerticalAxisGroup #'remove-first = ##t
397 \override VerticalAxisGroup #'remove-empty = ##t
398 \override VerticalAxisGroup #'staff-affinity = #UP
399 \override VerticalAxisGroup #'inter-staff-spacing = #'((space . 5.5) (stretchability . 1) (padding . 0.5))
400 \override VerticalAxisGroup #'inter-loose-line-spacing = #'((space . 2) (stretchability . 0.5) (padding . 0.2))
401 \override SeparationItem #'padding = #0.2
402 \override InstrumentName #'self-alignment-Y = ##f
404 %% sync with define-grobs.scm ;
405 \override InstrumentName #'font-size = #1.0
407 %% make sure that barlines aren't collapsed, when
408 %% Bar_engraver is there.
409 \override BarLine #'bar-size = #0.1
414 \type "Engraver_group"
416 \description "A context for printing the names of notes."
417 \consists "Axis_group_engraver"
419 \override VerticalAxisGroup #'minimum-Y-extent = ##f
420 % FIXME: not sure what the default should be here.
421 \override VerticalAxisGroup #'staff-affinity = #DOWN
424 \consists "Rest_swallow_translator"
425 \consists "Skip_event_swallow_translator"
426 \consists "Tie_engraver"
427 \consists "Note_name_engraver"
428 \consists "Separating_line_group_engraver"
432 \type "Engraver_group"
434 \description "Typesets chord names."
436 \consists "Rest_swallow_translator"
437 \consists "Output_property_engraver"
438 \consists "Separating_line_group_engraver"
439 \consists "Chord_name_engraver"
440 \consists "Skip_event_swallow_translator"
441 \consists "Hara_kiri_engraver"
442 % \consists "Note_spacing_engraver"
443 \override VerticalAxisGroup #'minimum-Y-extent = #'(0 . 2)
444 \override VerticalAxisGroup #'remove-first = ##t
445 \override VerticalAxisGroup #'remove-empty = ##t
446 \override VerticalAxisGroup #'staff-affinity = #DOWN
450 RemoveEmptyStaffContext= \context {
452 \remove "Axis_group_engraver"
453 \consists "Hara_kiri_engraver"
454 \override Beam #'auto-knee-gap = #'()
455 \override VerticalAxisGroup #'remove-empty = ##t
458 AncientRemoveEmptyStaffContext = \context {
459 %% why not add by default?
461 \RemoveEmptyStaffContext
462 \accepts "VaticanaVoice"
463 \accepts "GregorianTranscriptionVoice"
464 \accepts "MensuralVoice"
468 \type "Score_engraver"
471 \description "This is the top level notation context. No
472 other context can contain a @code{Score} context. This context
473 handles the administration of time signatures. It also makes sure
474 that items such as clefs, time signatures, and key-signatures are
475 aligned across staves.
477 You cannot explicitly instantiate a @code{Score} context (since it
478 is not contained in any other context). It is instantiated
479 automatically when an output definition (a @code{\score} or
480 @code{\layout} block) is processed."
482 \consists "Paper_column_engraver"
483 \consists "Vertically_spaced_contexts_engraver"
484 \consists "Repeat_acknowledge_engraver"
485 \consists "Staff_collecting_engraver"
487 %% move the alias along with the engraver.
489 \consists "Timing_translator"
490 \consists "Default_bar_line_engraver"
491 \consists "Output_property_engraver"
492 \consists "System_start_delimiter_engraver"
493 \consists "Mark_engraver"
494 \consists "Volta_engraver"
495 \consists "Metronome_mark_engraver"
496 \consists "Break_align_engraver"
497 \consists "Spacing_engraver"
498 \consists "Grace_spacing_engraver"
499 \consists "Vertical_align_engraver"
500 \consists "Stanza_number_align_engraver"
501 \consists "Bar_number_engraver"
502 \consists "Parenthesis_engraver"
504 \defaultchild "Staff"
506 \accepts "FretBoards"
508 \accepts "RhythmicStaff"
510 \accepts "VaticanaStaff"
511 \accepts "GregorianTranscriptionStaff"
512 \accepts "MensuralStaff"
513 \accepts "StaffGroup"
516 \accepts "ChordNames"
517 \accepts "GrandStaff"
518 \accepts "ChoirStaff"
519 \accepts "PianoStaff"
522 \accepts "FiguredBass"
525 noteToFretFunction = #determine-frets
527 soloIIText = #"Solo II"
529 printPartCombineTexts = ##t
530 systemStartDelimiter =#'SystemStartBar
532 drumStyleTable = #drums-style
534 melismaBusyProperties = #default-melisma-properties
536 clefGlyph = #"clefs.G"
538 middleCClefPosition = #-6
539 middleCPosition = #-6
542 crescendoSpanner = #'hairpin
543 decrescendoSpanner = #'hairpin
545 defaultBarType = #"|"
546 doubleRepeatType = #":|:"
547 barNumberVisibility = #first-bar-number-invisible
550 explicitClefVisibility = #all-visible
551 explicitKeySignatureVisibility = #all-visible
552 implicitTimeSignatureVisibility = #end-of-line-invisible
554 repeatCountVisibility = #all-repeat-counts-visible
556 autoBeamSettings = #default-auto-beam-settings
558 autoBeamCheck = #default-auto-beam-check
559 scriptDefinitions = #default-script-alist
561 pedalSustainStrings = #'("Ped." "*Ped." "*")
562 pedalSustainStyle = #'text
563 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
564 pedalUnaCordaStyle = #'text
566 %% These are in ordinary italic font, including the *,
567 %% but they are unlikely to be used,
568 %% as the default pedal-style for SostenutoPedal is 'mixed':
569 %% i.e. Sost. Ped_____________________
570 pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
571 pedalSostenutoStyle = #'mixed
573 harmonicAccidentals = ##t
574 fingeringOrientations = #'(up down)
575 stringNumberOrientations = #'(up down)
576 strokeFingerOrientations = #'(right)
578 lyricMelismaAlignment = #LEFT
579 markFormatter = #format-mark-letters
583 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0))
584 autoCautionaries = #'()
586 printKeyCancellation = ##t
587 keyAlterationOrder = #`(
588 (6 . ,FLAT) (2 . ,FLAT) (5 . ,FLAT ) (1 . ,FLAT) (4 . ,FLAT) (0 . ,FLAT) (3 . ,FLAT)
589 (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
590 (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
591 (3 . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
594 barCheckSynchronize = ##f
597 chordNameFunction = #ignatzek-chord-names
598 majorSevenSymbol = #whiteTriangleMarkup
599 chordNameSeparator = #(make-simple-markup "/")
600 chordNameExceptions = #ignatzekExceptions
601 chordNoteNamer = #'()
602 chordRootNamer = #note-name->markup
603 chordPrefixSpacer = #0
604 chordNameExceptionsFull = #fullJazzExceptions
605 chordNameExceptionsPartial = #partialJazzExceptions
606 noChordSymbol = #(make-simple-markup "N.C.")
608 bassStaffProperties = #'((assign clefGlyph "clefs.F")
609 (assign clefPosition 2)
610 (assign middleCPosition 6)
611 (assign middleCClefPosition 6))
613 stringOneTopmost = ##t
616 %% One may change the strings tuning as following :
617 %% The lenght of the list must be equal to the number of string
618 stringTunings = #guitar-tuning
619 tablatureFormat = #fret-number-tablature-format
622 figuredBassFormatter = #format-bass-figure
623 metronomeMarkFormatter = #format-metronome-markup
626 %% See also make-voice-props-set
628 (Voice Stem direction ,UP)
629 (Voice Stem font-size -3)
630 (Voice NoteHead font-size -3)
631 (Voice Dots font-size -3)
632 (Voice Stem length-fraction 0.8)
633 (Voice Stem no-stem-extend #t)
634 (Voice Beam thickness 0.384)
635 (Voice Beam length-fraction 0.8)
636 (Voice Accidental font-size -4)
637 (Voice AccidentalCautionary font-size -4)
638 (Voice Slur direction ,DOWN)
639 (Voice Script font-size -3)
640 (Voice Fingering font-size -8)
641 (Voice StringNumber font-size -8)
644 keepAliveInterfaces = #'(
645 rhythmic-grob-interface
647 percent-repeat-item-interface
648 percent-repeat-interface
650 ;; need this, as stanza numbers are items, and appear only once.
651 stanza-number-interface
653 quotedEventTypes = #'(
659 instrumentTransposition = #(ly:make-pitch 0 0 0)
661 verticallySpacedContexts = #'(Staff)
662 topLevelAlignment = ##t
671 \type "Engraver_group"
673 \description "A context for printing a figured bass line."
675 \consists "Figured_bass_engraver"
676 \consists "Note_swallow_translator"
677 \consists "Skip_event_swallow_translator"
678 \consists "Separating_line_group_engraver"
679 \consists "Hara_kiri_engraver"
681 \override VerticalAxisGroup #'remove-empty = ##t
682 \override VerticalAxisGroup #'remove-first = ##t
683 \override VerticalAxisGroup #'staff-affinity = #UP
684 \override VerticalAxisGroup #'minimum-Y-extent = #'(0 . 2)
689 \type "Engraver_group"
691 %% don't want to route anything out of here:
694 \consists "Swallow_engraver"
695 \description "Silently discards all musical information given to this
703 \consists "Tab_note_heads_engraver"
704 \consists "Tab_harmonic_engraver"
706 \remove "Note_heads_engraver"
707 \remove "Fingering_engraver"
708 \remove "New_fingering_engraver"
710 \description "Context for drawing notes in a Tab staff."
712 %% TabStaff increase the staff-space, which in turn
713 %% increases beam thickness and spacing; beams are
714 %% too big. We have to adjust the beam settings:
715 \override Beam #'thickness = #0.32
716 \override Beam #'length-fraction = #0.62
718 %% No accidental in tablature !
719 \remove "Accidental_engraver"
721 \override Glissando #'extra-dy = #0.75
722 \override Glissando #'bound-details #'right = #`((attach-dir . ,LEFT)
724 \override Glissando #'bound-details #'left = #`((attach-dir . ,RIGHT)
733 \consists "Tab_staff_symbol_engraver"
735 \description "Context for generating tablature. [DOCME]"
738 \defaultchild "TabVoice"
741 \override StaffSymbol #'staff-space = #1.5
743 %% Don't draw stems over the tablature figures !
744 \override Stem #'avoid-note-head = ##t
746 %% No accidental in tablature !
747 \remove "Accidental_engraver"
748 \remove "Key_engraver"
749 \remove "String_number_engraver"
750 %% Special "TAB" clef
751 clefGlyph = #"clefs.tab"
755 %% TODO: Gregorian Chant contexts should be moved to gregorian.ly,
756 %% but this does not work (is this a bug or intended behaviour?):
758 %% If I try to do so, I get "error: unknown escaped string:
759 %% `\VaticanaStaff'" in params-init.ly. If I also move
760 %% "\context { \Vaticana*Context }" from params-init.ly to the end
761 %% of gregorian.ly, then I get "error: parse error, unexpected
762 %% TRANSLATOR: \context { \VaticanaStaff }" in
763 %% gregorian.ly. --jr
767 \name "VaticanaVoice"
769 \description "Same as @code{Voice} context, except that it is
770 accommodated for typesetting Gregorian Chant in the notational style
773 \remove "Slur_engraver"
774 \remove "Stem_engraver"
775 \remove "Ligature_bracket_engraver"
776 \consists "Vaticana_ligature_engraver"
778 %% Set default head for notes outside of \[ \].
779 \override NoteHead #'style = #'vaticana.punctum
781 %% Put some space before and after divisiones.
782 %% FIXME: This does not seem to show any effect.
783 \override Script #'padding = #0.5
785 %% There are no beams in Gregorian Chant notation.
788 %% Prepare TextSpanner for \episem{Initium|Finis} use.
790 %% FIXME: The line @code{\override TextSpanner #'padding = #-0.1} is
791 %% required to force the articulation signs being placed vertically
792 %% tightly to the correpsonding note heads.
794 \override TextSpanner #'style = #'line
795 \override TextSpanner #'padding = #-0.1
800 \name "VaticanaStaff"
803 \accepts "VaticanaVoice"
804 \defaultchild "VaticanaVoice"
806 \description "Same as @code{Staff} context, except that it is
807 accommodated for typesetting Gregorian Chant in the notational style
810 \remove "Time_signature_engraver"
811 \consists "Custos_engraver"
813 %% We can not remove Bar_engraver; otherwise clefs and custodes will
814 %% not show up any more among other line breaking issues.
815 %% Instead, we make the grob transparent.
816 \override BarLine #'transparent = ##t
818 \override StaffSymbol #'line-count = #4
819 \override StaffSymbol #'thickness = #0.6
821 %% FIXME: unit on StaffSymbol's width should be \linewidth.
822 %% \override StaffSymbol #'width = #60.0
824 %% Choose vaticana do clef on 3rd line as default.
825 clefGlyph = #"clefs.vaticana.do"
827 middleCClefPosition = #1
831 %% Select vaticana style font.
832 \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
833 \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
834 \override Custos #'style = #'vaticana
835 \override Custos #'neutral-position = #3
836 \override Custos #'neutral-direction = #DOWN
837 \override Dots #'style = #'vaticana
842 \name "GregorianTranscriptionVoice"
845 %% Removing ligature bracket engraver without replacing it by some
846 %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
847 %% warning for every "\[" and "\]". Therefore, we make the grob
848 %% transparent instead.
849 \override LigatureBracket #'transparent = ##t
851 %% Put some space before and after divisiones.
852 %% FIXME: This does not seem to show any effect.
853 \override Script #'padding = #0.5
855 %% There are no beams in Gregorian Chant notation.
858 %% Prepare TextSpanner for \episem{Initium|Finis} use.
860 %% N.B.: dash-fraction MUST be unset; otherwise, TextSpanner will
861 %% always produce dashed lines, regardless of the style property.
863 %% FIXME: The line @code{\override TextSpanner #'padding = #-0.1} is
864 %% required to force the articulation signs being placed vertically
865 %% tightly to the correpsonding note heads.
867 \override TextSpanner #'dash-fraction = #'()
868 \override TextSpanner #'style = #'line
869 \override TextSpanner #'padding = #-0.1
874 \name "GregorianTranscriptionStaff"
877 \accepts "GregorianTranscriptionVoice"
878 \defaultchild "GregorianTranscriptionVoice"
880 %% We can not remove Bar_engraver; otherwise clefs and custodes will
881 %% not show up any more among other line breaking issues.
882 %% Instead, we make the grob transparent.
883 \override BarLine #'transparent = ##t
888 \name "MensuralVoice"
890 \description "Same as @code{Voice} context, except that it is
891 accommodated for typesetting a piece in mensural style."
893 \remove "Slur_engraver"
894 \remove "Ligature_bracket_engraver"
895 \consists "Mensural_ligature_engraver"
897 %% Set default head for notes outside of \[ \].
898 \override NoteHead #'style = #'mensural
899 \override Rest #'style = #'mensural
901 %% There are no beams in mensural notation.
907 \name "MensuralStaff"
910 \defaultchild "MensuralVoice"
911 \accepts "MensuralVoice"
912 \description "Same as @code{Staff} context, except that it is
913 accommodated for typesetting a piece in mensural style."
915 \consists "Custos_engraver"
917 %% We can not remove Bar_engraver; otherwise clefs and custodes will
918 %% not show up any more among other line breaking issues.
919 %% Instead, we make the grob transparent.
920 \override BarLine #'transparent = ##t
922 \override StaffSymbol #'thickness = #0.6
924 %% FIXME: unit on StaffSymbol's width should be \linewidth.
925 %% \override StaffSymbol #'width = #60.0
927 %% Choose mensural g clef on 2nd line as default.
928 clefGlyph = #"clefs.mensural.g"
929 middleCClefPosition = #-6
930 middleCPosition = #-6
934 %% Select mensural style font.
935 \override TimeSignature #'style = #'mensural
936 \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
937 \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
938 \override Custos #'style = #'mensural
939 \override Custos #'neutral-position = #3
940 \override Custos #'neutral-direction = #DOWN
942 %% Accidentals are valid only once (same as
943 %% #(set-accidental-style 'forget))
945 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
946 autoCautionaries = #'()
947 printKeyCancellation = ##f
951 RemoveEmptyRhythmicStaffContext= \context {
953 \remove "Axis_group_engraver"
954 \override VerticalAxisGroup #'remove-empty = ##t
955 \consists "Hara_kiri_engraver"