8 \description "Hard coded entry point for LilyPond. Cannot be tuned."
9 \grobdescriptions #all-grob-descriptions
13 \type "Engraver_group_engraver"
16 \consists "Output_property_engraver"
17 \consists "Bar_engraver"
18 %% Bar_engraver must be first so default bars aren't overwritten
21 \consists "Font_size_engraver"
22 \consists "Volta_engraver"
23 \consists "Separating_line_group_engraver"
24 \consists "Dot_column_engraver"
26 %% perhaps move to Voice context?
27 \consists "Ottava_spanner_engraver"
28 \consists "Clef_engraver"
29 \consists "Key_engraver"
30 \consists "Time_signature_engraver"
31 \consists "Ledger_line_engraver"
32 \consists "Staff_symbol_engraver"
33 \consists "Collision_engraver"
34 \consists "Rest_collision_engraver"
35 \consists "Accidental_engraver"
36 \consists "Piano_pedal_engraver"
37 \consists "Instrument_name_engraver"
38 \consists "String_number_engraver"
39 \consists "Axis_group_engraver"
41 minimumVerticalExtent = #'(-4 . 4)
42 extraVerticalExtent = ##f
44 localKeySignature = #'()
47 %% explicitly set instrument, so we don't get
48 %% weird effects when doing instrument names for
58 \description "Handles clefs, bar lines, keys, accidentals. It can contain
59 @code{Voice} contexts."
65 \type "Engraver_group_engraver"
68 \remove "Accidental_engraver"
69 \remove "Ottava_spanner_engraver"
70 \remove "Key_engraver"
71 \remove "Piano_pedal_engraver"
72 \remove "String_number_engraver"
74 \description "Handles typesetting for percussion."
78 \defaultchild DrumVoice
80 clefGlyph = #"clefs.percussion"
82 \override Script #'staff-padding = #0.75
87 \type "Engraver_group_engraver"
89 \consists "System_start_delimiter_engraver"
90 systemStartDelimiter = #'SystemStartBracket
94 \accepts "RhythmicStaff"
106 \defaultchild "InnerChoirStaff"
107 \accepts "InnerChoirStaff"
108 \accepts "InnerStaffGroup"
109 \description "Identical to @code{StaffGroup} except that the
110 contained staves are not connected vertically."
116 \type "Engraver_group_engraver"
118 \consists "Output_property_engraver"
120 minimumVerticalExtent = ##f
121 extraVerticalExtent = ##f
123 localKeySignature = #'()
125 \consists "Pitch_squash_engraver"
126 squashedPosition = #0
127 \consists "Separating_line_group_engraver"
131 \override BarLine #'bar-size = #4
132 \override VoltaBracket #'minimum-space = #15
133 \override VoltaBracket #'padding = #5
134 \override StaffSymbol #'line-count = #1
136 \override Stem #'neutral-direction = #1
137 \override Beam #'neutral-direction = #1
138 %% \consists "Repeat_engraver"
139 \consists "Dot_column_engraver"
140 \consists "Volta_engraver"
141 \consists "Bar_engraver"
142 \consists "Time_signature_engraver"
143 \consists "Staff_symbol_engraver"
144 \consists "Ledger_line_engraver"
145 \consists "Instrument_name_engraver"
146 \consists "Axis_group_engraver"
149 \defaultchild "Voice"
151 A context like @code{Staff} but for printing rhythms. Pitches are
152 ignored; the notes are printed on one line.
158 \type "Engraver_group_engraver"
162 Corresponds to a voice on a staff. This context handles the
163 conversion of dynamic signs, stems, beams, super- and subscripts,
164 slurs, ties, and rests.
166 You have to instantiate this explicitly if you want to have
167 multiple voices on the same staff."
169 localKeySignature = #'()
170 \consists "Font_size_engraver"
172 \consists "Output_property_engraver"
173 \consists "Arpeggio_engraver"
174 \consists "Multi_measure_rest_engraver"
175 \consists "Text_spanner_engraver"
176 \consists "Trill_spanner_engraver"
177 \consists "Grob_pq_engraver"
178 \consists "Forbid_line_break_engraver"
180 \consists "Note_head_line_engraver"
181 \consists "Glissando_engraver"
182 \consists "Ligature_bracket_engraver"
183 \consists "Breathing_sign_engraver"
184 %% \consists "Rest_engraver"
185 \consists "Note_heads_engraver"
186 \consists "Rest_engraver"
188 \consists "Stem_engraver"
189 \consists "Beam_engraver"
190 \consists "Grace_beam_engraver"
191 \consists "Auto_beam_engraver"
192 \consists "New_fingering_engraver"
193 \consists "Chord_tremolo_engraver"
194 \consists "Percent_repeat_engraver"
195 \consists "Slash_repeat_engraver"
196 \consists "Melisma_translator"
197 \consists "Part_combine_engraver"
199 \consists "Text_engraver"
200 \consists "Dynamic_engraver"
201 \consists "Fingering_engraver"
203 \consists "Script_engraver"
204 \consists "Script_column_engraver"
205 \consists "Rhythmic_column_engraver"
206 \consists "Phrasing_slur_engraver"
207 \consists "Cluster_spanner_engraver"
208 \consists "Slur_engraver"
209 \consists "Tie_engraver"
210 \consists "Tuplet_engraver"
211 \consists "Grace_engraver"
213 \consists "Skip_event_swallow_translator"
222 \override Stem #'lengths = #'(2.5 2.5 3.0 3.0)
230 \description "A voice on a percussion staff."
231 \remove "Arpeggio_engraver"
232 \consists "Multi_measure_rest_engraver"
233 \consists "Text_spanner_engraver"
234 \consists "Grob_pq_engraver"
236 \remove "Note_head_line_engraver"
237 \remove "Glissando_engraver"
238 \remove "Ligature_bracket_engraver"
239 \remove "Note_heads_engraver"
240 \consists "Rest_engraver"
241 \consists "Drum_notes_engraver"
242 \remove "New_fingering_engraver"
244 \remove "Fingering_engraver"
246 \remove "Cluster_spanner_engraver"
247 \consists "Tuplet_engraver"
249 \consists "Skip_event_swallow_translator"
253 \type "Engraver_group_engraver"
255 localKeySignature = #'()
257 \description " A group of staffs, with a brace on the left
258 side, grouping the staves together. The bar lines of the
259 contained staves are connected vertically. "
261 \consists "Span_bar_engraver"
262 \consists "Span_arpeggio_engraver"
263 \consists "System_start_delimiter_engraver"
264 systemStartDelimiter = #'SystemStartBrace
275 "Just like @code{GrandStaff} but with a forced distance between
276 the staves, so cross staff beaming and slurring can be used."
278 verticalAlignmentChildCallback = #Align_interface::fixed_distance_alignment_callback
279 \override VerticalAlignment #'forced-distance = #12
280 \override VerticalAlignment #'self-alignment-Y = #0
282 \consists "Vertical_align_engraver"
283 \consists "Instrument_name_engraver"
290 \type "Engraver_group_engraver"
291 \name InnerStaffGroup
293 \consists "Span_bar_engraver"
294 \consists "Span_arpeggio_engraver"
295 \consists "Output_property_engraver"
296 systemStartDelimiter = #'SystemStartBracket
298 \consists "System_start_delimiter_engraver"
300 \accepts "RhythmicStaff"
302 \accepts "GrandStaff"
303 \accepts "PianoStaff"
306 \accepts "ChordNames"
315 "Groups staffs while adding a bracket on the left side, grouping
316 the staves together. The bar lines of the contained staves are
317 connected vertically. "
319 \accepts "InnerChoirStaff"
320 \accepts "ChoirStaff"
321 \accepts "InnerStaffGroup"
322 \accepts "FiguredBass"
327 \type "Engraver_group_engraver"
328 minimumVerticalExtent = #'(-1.2 . 2.4)
329 extraVerticalExtent = ##f
332 \description " Corresponds to a voice with lyrics. Handles the
333 printing of a single line of lyrics. "
336 \consists "Separating_line_group_engraver"
337 \consists "Lyric_engraver"
338 \consists "Extender_engraver"
339 \consists "Hyphen_engraver"
340 \consists "Stanza_number_engraver"
341 \consists "Vocal_name_engraver"
342 \consists "Skip_event_swallow_translator"
343 \consists "Font_size_engraver"
344 \consists "Hara_kiri_engraver"
345 \override SeparationItem #'padding = #0.2
349 \type "Engraver_group_engraver"
351 \consists "Axis_group_engraver"
353 minimumVerticalExtent = ##f
354 extraVerticalExtent = ##f
358 \consists "Rest_swallow_translator"
359 \consists "Skip_event_swallow_translator"
360 \consists "Tie_engraver"
361 \consists "Note_name_engraver"
362 \consists "Separating_line_group_engraver"
366 \type "Engraver_group_engraver"
368 \description "Typesets chord names."
370 \consists "Volta_engraver"
372 \consists "Rest_swallow_translator"
373 \consists "Output_property_engraver"
374 \consists "Separating_line_group_engraver"
375 \consists "Chord_name_engraver"
376 \consists "Skip_event_swallow_translator"
377 \consists "Hara_kiri_engraver"
379 voltaOnThisStaff = ##f
380 minimumVerticalExtent = #'(0 . 2.5)
381 extraVerticalExtent = ##f
382 \override SeparatingGroupSpanner #'padding = #0.8
387 RemoveEmptyStaffContext= \context {
389 \remove "Axis_group_engraver"
390 \consists "Hara_kiri_engraver"
391 \override Beam #'auto-knee-gap = #'()
394 AncientRemoveEmptyStaffContext = \context {
395 %% why not add by default?
397 \RemoveEmptyStaffContext
398 \accepts "VaticanaVoice"
399 \accepts "GregorianTranscriptionVoice"
400 \accepts "MensuralVoice"
407 \description "This is the top level notation context. No
408 other context can contain a @code{Score} context. This context
409 handles the administration of time signatures. It also makes sure
410 that items such as clefs, time signatures, and key-signatures are
411 aligned across staves.
413 You cannot explicitly instantiate a Score context (since it is
414 not contained in any other context). It is instantiated
415 automatically when an output definition (a @code{\score} or
416 @code{\layout} block) is processed."
418 \consists "Repeat_acknowledge_engraver"
419 \consists "Staff_collecting_engraver"
421 %% move the alias along with the engraver.
423 \consists "Timing_engraver"
425 \consists "Output_property_engraver"
426 \consists "System_start_delimiter_engraver"
427 \consists "Mark_engraver"
428 \consists "Metronome_mark_engraver"
429 \consists "Break_align_engraver"
430 \consists "Spacing_engraver"
431 \consists "Vertical_align_engraver"
432 \consists "Stanza_number_align_engraver"
433 \consists "Bar_number_engraver"
434 \consists "Span_arpeggio_engraver"
436 \defaultchild "Staff"
439 \accepts "VaticanaStaff"
440 \accepts "GregorianTranscriptionStaff"
441 \accepts "MensuralStaff"
442 \accepts "StaffGroup"
443 \accepts "RhythmicStaff"
446 \accepts "ChordNames"
447 \accepts "GrandStaff"
448 \accepts "ChoirStaff"
449 \accepts "PianoStaff"
452 \accepts "FiguredBass"
455 soloIIText = #"Solo II"
457 printPartCombineTexts = ##t
458 systemStartDelimiter =#'SystemStartBar
460 drumStyleTable = #drums-style
462 melismaBusyProperties = #default-melisma-properties
464 clefGlyph = #"clefs.G"
466 middleCPosition = #-6
468 defaultBarType = #"|"
469 barNumberVisibility = #default-bar-number-visibility
472 explicitClefVisibility = #all-visible
473 explicitKeySignatureVisibility = #all-visible
474 autoBeamSettings = #default-auto-beam-settings
476 autoBeamCheck = #default-auto-beam-check
477 scriptDefinitions = #default-script-alist
479 verticalAlignmentChildCallback = #Align_interface::alignment_callback
481 pedalSustainStrings = #'("Ped." "*Ped." "*")
482 pedalSustainStyle = #'text
483 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
484 pedalUnaCordaStyle = #'text
486 %% These are in ordinary italic font, including the *,
487 %% but they are unlikely to be used,
488 %% as the default pedal-style for SostenutoPedal is 'mixed':
489 %% i.e. Sost. Ped_____________________
490 pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
491 pedalSostenutoStyle = #'mixed
494 harmonicAccidentals = ##t
495 fingeringOrientations = #'(up down)
496 stringNumberOrientations = #'(up down)
497 tupletNumberFormatFunction = #denominator-tuplet-formatter
498 markFormatter = #format-mark-letters
503 autoAccidentals = #'(Staff (same-octave . 0))
504 autoCautionaries = #'()
506 printKeyCancellation = ##t
507 keyAccidentalOrder = #`(
508 (6 . ,FLAT) (2 . ,FLAT) (5 . ,FLAT ) (1 . ,FLAT) (4 . ,FLAT) (0 . ,FLAT) (3 . ,FLAT)
509 (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
510 (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
511 (3 . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
514 barCheckSynchronize = ##f
517 chordNameFunction = #ignatzek-chord-names
518 majorSevenSymbol = #whiteTriangleMarkup
519 chordNameSeparator = #(make-simple-markup "/")
520 chordNameExceptions = #ignatzekExceptions
521 chordNoteNamer = #'()
522 chordRootNamer = #note-name->markup
523 chordPrefixSpacer = #0
524 chordNameExceptionsFull = #fullJazzExceptions
525 chordNameExceptionsPartial = #partialJazzExceptions
528 bassStaffProperties = #'((assign clefGlyph "clefs.F")
529 (assign clefPosition 2)
530 (assign middleCPosition 6))
532 stringOneTopmost = ##t
535 %% One may change the strings tuning as following :
536 %% The lenght of the list must be equal to the number of string
537 stringTunings = #guitar-tuning
538 tablatureFormat = #fret-number-tablature-format
541 bassFigureFormatFunction = #format-bass-figure
542 metronomeMarkFormatter = #format-metronome-markup
544 (Voice Stem direction 1)
545 ;; TODO: should take from existing definition.
546 ;; c&p from define-grobs.scm
548 (Voice Stem lengths ,(map (lambda (x) (* 0.8 x)) '(3.5 3.5 3.5 4.5 5.0)))
549 (Voice Stem stem-shorten (0.4 0.4))
550 (Voice Stem font-size -3)
551 (Voice NoteHead font-size -3)
552 (Voice Dots font-size -3)
553 (Voice Stem beamed-lengths
554 ,(map (lambda (x) (* 0.8 x)) '(3.3 3.3 4.0)))
555 (Voice Stem beamed-minimum-free-lengths
556 ,(map (lambda (x) (* 0.8 x)) '(2.5 2.0 1.5)))
557 (Voice Stem beamed-extreme-minimum-free-lengths
558 ,(map (lambda (x) (* 0.8 x)) '(1.83 1.5)))
560 (Voice Stem no-stem-extend #t)
561 (Voice Beam thickness 0.384)
562 (Voice Beam space-function ,(lambda (beam mult)
563 (* 0.8 (Beam::space_function
565 (Voice Accidental font-size -4)
566 (Voice Slur direction -1)
569 keepAliveInterfaces = #'(rhythmic-grob-interface lyric-interface percent-repeat-interface)
570 quotedEventTypes = #'(note-event rest-event time-scaled-music tie-event)
571 instrumentTransposition = #(ly:make-pitch 0 0 0)
573 verticallySpacedContexts = #'(Staff)
576 EasyNotation = \context { %% TODO: why \context override?
578 \override NoteHead #'print-function = #Note_head::brew_ez_stencil
579 \override NoteHead #'Y-extent-callback = #'()
580 \override NoteHead #'X-extent-callback = #'()
586 \type "Engraver_group_engraver"
589 \consists "Figured_bass_engraver"
590 \consists "Rest_swallow_translator"
591 \consists "Note_swallow_translator"
592 \consists "Skip_event_swallow_translator"
593 \consists "Separating_line_group_engraver"
594 \consists "Hara_kiri_engraver"
599 \type "Engraver_group_engraver"
601 %% don't want to route anything out of here:
604 \consists "Swallow_engraver"
605 \description "Silently discards all musical information given to this context. "
611 \consists "Tab_note_heads_engraver"
612 \remove "Note_heads_engraver"
613 \remove "Fingering_engraver"
614 \remove "New_fingering_engraver"
616 \description "Context for drawing notes in a Tab staff. "
617 \override Slur #'font-family = #'roman
618 \override Slur #'print-function = #hammer-print-function
619 \override Slur #'direction = #-1
621 %% Draws all stems/beams out of the staff (and not in the middle of the staff !)
622 %% This feature is now disabled because most of the tab does not use it.
623 %%\override Beam #'damping = #100000
624 %%\override Stem #'up-to-staff = ##t
626 %% TabStaff increase the staff-space, which in turn
627 %% increases beam thickness and spacing; beams are
628 %% too big. We have to adjust the beam settings:
629 \override Beam #'thickness = #0.32
630 \override Beam #'space-function =
631 #(lambda (beam mult) (* 0.62 (Beam::space_function beam mult)))
633 %% No accidental in tablature !
634 \remove Accidental_engraver
642 \remove "Staff_symbol_engraver"
643 \consists "Tab_staff_symbol_engraver"
645 \description "Context for generating tablature. [DOCME]"
648 \defaultchild "TabVoice"
651 \override StaffSymbol #'staff-space = #1.5
653 %% Don't draw stems over the tablature figures !
654 \override Stem #'avoid-note-head = ##t
656 %% No accidental in tablature !
657 \remove "Accidental_engraver"
658 \remove "Key_engraver"
659 \remove "String_number_engraver"
660 %% Special "TAB" clef
661 clefGlyph = #"clefs.tab"
665 %% TODO: Gregorian Chant contexts should be moved to gregorian-init.ly,
666 %% but this does not work (is this a bug or intended behaviour?):
668 %% If I try to do so, I get "error: unknown escaped string:
669 %% `\VaticanaStaff'" in params-init.ly. If I also move
670 %% "\context { \Vaticana*Context }" from params-init.ly to the end
671 %% of gregorian-init.ly, then I get "error: parse error, unexpected
672 %% TRANSLATOR: \context { \VaticanaStaff }" in
673 %% gregorian-init.ly. --jr
677 \name "VaticanaVoice"
679 \description "Same as @code{Voice} context, except that it is accommodated for tyepsetting Gregorian Chant in the notational style of Editio Vaticana."
681 \remove "Slur_engraver"
682 \remove "Stem_engraver"
683 \remove "Ligature_bracket_engraver"
684 \consists "Vaticana_ligature_engraver"
686 %% Set default head for notes outside of \[ \].
687 \override NoteHead #'style = #'vaticana.punctum
689 %% Put some space before and after divisiones.
690 %% FIXME: This does not seem to show any effect.
691 \override Script #'padding = #0.5
693 %% There are no beams in Gregorian Chant notation.
696 %% Prepare TextSpanner for \episem{Initium|Finis} use.
698 %% N.B.: dash-fraction MUST be unset; otherwise, TextSpanner will
699 %% always produce dashed lines, regardless of the style property.
701 %% FIXME: The line @code{\override TextSpanner #'padding = #-0.1} is
702 %% required to force the articulation signs being placed vertically
703 %% tightly to the correpsonding note heads.
705 \override TextSpanner #'dash-fraction = #'()
706 \override TextSpanner #'style = #'line
707 \override TextSpanner #'edge-height = #'(0 . 0)
708 \override TextSpanner #'padding = #-0.1
709 \override TextSpanner #'enclose-bounds = #1
710 \override TextSpanner #'edge-text = #'("" . "")
713 %% FIXME: need something like
714 %% \remove "Bar_number_engraver" (which lives on score level)
715 %% for vaticana and gregorian transcription staves
719 \name "VaticanaStaff"
722 \accepts "VaticanaVoice"
723 \defaultchild "VaticanaVoice"
725 \description "Same as @code{Staff} context, except that it is accommodated for tyepsetting Gregorian Chant in the notational style of Editio Vaticana."
727 \remove "Time_signature_engraver"
728 \consists "Custos_engraver"
730 %% We can not remove Bar_engraver; otherwise clefs and custodes will
731 %% not show up any more among other line breaking issues.
732 %% Instead, we make the grob transparent.
733 \override BarLine #'transparent = ##t
735 \override StaffSymbol #'line-count = #4
736 \override StaffSymbol #'thickness = #0.6
738 %% FIXME: unit on StaffSymbol's width should be \linewidth.
739 %% \override StaffSymbol #'width = #60.0
741 %% Choose vaticana do clef on 3rd line as default.
742 clefGlyph = #"clefs.vaticana.do"
747 %% Select vaticana style font.
748 \override KeySignature #'style = #'vaticana
749 \override Accidental #'style = #'vaticana
750 \override Custos #'style = #'vaticana
751 \override Custos #'neutral-position = #3
752 \override Custos #'neutral-direction = #-1
754 %% Score.timing = ##f
755 %% Score.barAlways = ##t
760 \name "GregorianTranscriptionVoice"
763 %% Removing ligature bracket engraver without replacing it by some
764 %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
765 %% warning for every "\[" and "\]". Therefore, we make the grob
766 %% transparent instead.
767 \override LigatureBracket #'transparent = ##t
769 %% Put some space before and after divisiones.
770 %% FIXME: This does not seem to show any effect.
771 \override Script #'padding = #0.5
773 %% There are no beams in Gregorian Chant notation.
776 %% Prepare TextSpanner for \episem{Initium|Finis} use.
778 %% N.B.: dash-fraction MUST be unset; otherwise, TextSpanner will
779 %% always produce dashed lines, regardless of the style property.
781 %% FIXME: The line @code{\override TextSpanner #'padding = #-0.1} is
782 %% required to force the articulation signs being placed vertically
783 %% tightly to the correpsonding note heads.
785 \override TextSpanner #'dash-fraction = #'()
786 \override TextSpanner #'style = #'line
787 \override TextSpanner #'edge-height = #'(0 . 0)
788 \override TextSpanner #'padding = #-0.1
789 \override TextSpanner #'enclose-bounds = #1
790 \override TextSpanner #'edge-text = #'("" . "")
795 \name "GregorianTranscriptionStaff"
798 \accepts "GregorianTranscriptionVoice"
799 \defaultchild "GregorianTranscriptionVoice"
801 %% We can not remove Bar_engraver; otherwise clefs and custodes will
802 %% not show up any more among other line breaking issues.
803 %% Instead, we make the grob transparent.
804 \override BarLine #'transparent = ##t
809 \name "MensuralVoice"
811 \description "Same as @code{Voice} context, except that it is accommodated for tyepsetting a piece in mensural style."
813 \remove "Slur_engraver"
814 \remove "Ligature_bracket_engraver"
815 \consists "Mensural_ligature_engraver"
817 %% Set default head for notes outside of \[ \].
818 \override NoteHead #'style = #'mensural
820 %% There are no beams in mensural notation.
826 \name "MensuralStaff"
829 \defaultchild "MensuralVoice"
830 \accepts "MensuralVoice"
831 \description "Same as @code{Staff} context, except that it is accommodated for tyepsetting a piece in mensural style."
833 \consists "Custos_engraver"
835 %% We can not remove Bar_engraver; otherwise clefs and custodes will
836 %% not show up any more among other line breaking issues.
837 %% Instead, we make the grob transparent.
838 \override BarLine #'transparent = ##t
840 \override StaffSymbol #'thickness = #0.6
842 %% FIXME: unit on StaffSymbol's width should be \linewidth.
843 %% \override StaffSymbol #'width = #60.0
845 %% Choose petrucci g clef on 2nd line as default.
846 clefGlyph = #"clefs.petrucci.g"
847 middleCPosition = #-6
851 %% Select mensural style font.
852 \override TimeSignature #'style = #'mensural
853 \override KeySignature #'style = #'mensural
854 \override Accidental #'style = #'mensural
855 \override Custos #'style = #'mensural
856 \override Custos #'neutral-position = #3
857 \override Custos #'neutral-direction = #-1
859 %% Score.timing = ##f
860 %% Score.barAlways = ##t
864 RemoveEmptyRhythmicStaffContext= \context {
866 \remove "Axis_group_engraver"
867 \consists "Hara_kiri_engraver"