9 \description "Hard coded entry point for LilyPond. Cannot be tuned."
10 \grobdescriptions #all-grob-descriptions
14 \type "Engraver_group"
17 \consists "Output_property_engraver"
18 \consists "Bar_engraver"
19 %% Bar_engraver must be first so default bars aren't overwritten
22 \consists "Font_size_engraver"
23 \consists "Volta_engraver"
24 \consists "Separating_line_group_engraver"
25 \consists "Dot_column_engraver"
27 %% perhaps move to Voice context?
28 \consists "Ottava_spanner_engraver"
29 \consists "Clef_engraver"
30 \consists "Key_engraver"
31 \consists "Time_signature_engraver"
32 \consists "Ledger_line_engraver"
33 \consists "Staff_symbol_engraver"
34 \consists "Collision_engraver"
35 \consists "Rest_collision_engraver"
36 \consists "Accidental_engraver"
37 \consists "Piano_pedal_engraver"
38 \consists "Instrument_name_engraver"
39 \consists "String_number_engraver"
40 \consists "Axis_group_engraver"
41 \consists "Figured_bass_engraver"
42 \consists "Figured_bass_position_engraver"
44 \override VerticalAxisGroup #'minimum-Y-extent = #'(-4 . 4)
45 extraVerticalExtent = ##f
47 localKeySignature = #'()
50 %% explicitly set instrument, so we don't get
51 %% weird effects when doing instrument names for
61 \description "Handles clefs, bar lines, keys, accidentals. It can contain
62 @code{Voice} contexts."
68 \type "Engraver_group"
72 \remove "Accidental_engraver"
73 \remove "Ottava_spanner_engraver"
74 \remove "Key_engraver"
75 \remove "Piano_pedal_engraver"
76 \remove "String_number_engraver"
78 \description "Handles typesetting for percussion."
82 \defaultchild "DrumVoice"
84 clefGlyph = #"clefs.percussion"
86 \override Script #'staff-padding = #0.75
91 \type "Engraver_group"
92 \name "InnerChoirStaff"
93 \consists "System_start_delimiter_engraver"
94 systemStartDelimiter = #'SystemStartBracket
100 \accepts "RhythmicStaff"
101 \accepts "GrandStaff"
102 \accepts "PianoStaff"
104 \accepts "ChordNames"
105 \defaultchild "Staff"
112 \defaultchild "Staff"
113 \accepts "InnerChoirStaff"
114 \accepts "InnerStaffGroup"
115 \description "Identical to @code{StaffGroup} except that the
116 contained staves are not connected vertically."
121 \type "Engraver_group"
123 \override VerticalAxisGroup #'minimum-Y-extent = ##f
124 extraVerticalExtent = ##f
126 localKeySignature = #'()
129 squashedPosition = #0
133 \override BarLine #'bar-size = #4
134 \override VoltaBracket #'staff-padding = #3
135 \override StaffSymbol #'line-count = #1
137 \override Stem #'neutral-direction = #UP
138 \override Beam #'neutral-direction = #UP
140 \consists "Output_property_engraver"
141 \consists "Font_size_engraver"
142 \consists "Volta_engraver"
143 \consists "Separating_line_group_engraver"
144 \consists "Dot_column_engraver"
145 \consists "Bar_engraver"
146 \consists "Staff_symbol_engraver"
147 \consists "Pitch_squash_engraver"
148 \consists "Time_signature_engraver"
149 \consists "Instrument_name_engraver"
150 \consists "Axis_group_engraver"
151 \consists "Ledger_line_engraver"
155 \defaultchild "Voice"
158 A context like @code{Staff} but for printing rhythms. Pitches are
159 ignored; the notes are printed on one line.
165 \type "Engraver_group"
169 Corresponds to a voice on a staff. This context handles the
170 conversion of dynamic signs, stems, beams, super- and subscripts,
171 slurs, ties, and rests.
173 You have to instantiate this explicitly if you want to have
174 multiple voices on the same staff."
176 localKeySignature = #'()
177 \consists "Font_size_engraver"
179 \consists "Pitched_trill_engraver"
180 \consists "Output_property_engraver"
181 \consists "Arpeggio_engraver"
182 \consists "Multi_measure_rest_engraver"
183 \consists "Text_spanner_engraver"
184 \consists "Trill_spanner_engraver"
185 \consists "Grob_pq_engraver"
186 \consists "Forbid_line_break_engraver"
187 \consists "Laissez_vibrer_engraver"
188 \consists "Repeat_tie_engraver"
189 \consists "Note_head_line_engraver"
190 \consists "Glissando_engraver"
191 \consists "Ligature_bracket_engraver"
192 \consists "Breathing_sign_engraver"
193 \consists "Note_heads_engraver"
194 \consists "Rest_engraver"
196 %% switch on to make stem directions interpolate for the
198 % \consists "Melody_engraver"
200 \consists "Stem_engraver"
201 \consists "Beam_engraver"
202 \consists "Grace_beam_engraver"
203 \consists "Auto_beam_engraver"
204 \consists "New_fingering_engraver"
205 \consists "Chord_tremolo_engraver"
206 \consists "Percent_repeat_engraver"
207 \consists "Slash_repeat_engraver"
208 \consists "Melisma_translator"
209 \consists "Part_combine_engraver"
211 \consists "Text_engraver"
212 \consists "Dynamic_engraver"
213 \consists "Fingering_engraver"
215 \consists "Script_engraver"
216 \consists "Script_column_engraver"
217 \consists "Rhythmic_column_engraver"
218 \consists "Phrasing_slur_engraver"
219 \consists "Cluster_spanner_engraver"
220 \consists "Slur_engraver"
221 \consists "Tie_engraver"
222 \consists "Tuplet_engraver"
223 \consists "Grace_engraver"
225 \consists "Skip_event_swallow_translator"
234 \override Stem #'length-fraction = #(magstep -4)
235 \override Beam #'length-fraction = #(magstep -4)
243 \description "A voice on a percussion staff."
244 \remove "Arpeggio_engraver"
245 \consists "Multi_measure_rest_engraver"
246 \consists "Text_spanner_engraver"
247 \consists "Grob_pq_engraver"
249 \remove "Note_head_line_engraver"
250 \remove "Glissando_engraver"
251 \remove "Ligature_bracket_engraver"
252 \remove "Note_heads_engraver"
253 \consists "Drum_notes_engraver"
254 \remove "New_fingering_engraver"
256 \remove "Fingering_engraver"
258 \remove "Cluster_spanner_engraver"
259 \consists "Tuplet_engraver"
261 \consists "Skip_event_swallow_translator"
265 \type "Engraver_group"
267 localKeySignature = #'()
269 \description " A group of staffs, with a brace on the left
270 side, grouping the staves together. The bar lines of the
271 contained staves are connected vertically. "
273 \consists "Span_bar_engraver"
274 \consists "Span_arpeggio_engraver"
275 \consists "System_start_delimiter_engraver"
276 systemStartDelimiter = #'SystemStartBrace
287 "Just like @code{GrandStaff} but with a forced distance between
288 the staves, so cross staff beaming and slurring can be used."
290 \override VerticalAlignment #'forced-distance = #12
291 \override VerticalAlignment #'self-alignment-Y = #0
293 \consists "Vertical_align_engraver"
294 \consists "Instrument_name_engraver"
301 \type "Engraver_group"
302 \name InnerStaffGroup
304 \consists "Span_bar_engraver"
305 \consists "Span_arpeggio_engraver"
306 \consists "Output_property_engraver"
307 systemStartDelimiter = #'SystemStartBracket
309 \consists "System_start_delimiter_engraver"
311 \defaultchild "Staff"
313 \accepts "RhythmicStaff"
315 \accepts "GrandStaff"
316 \accepts "PianoStaff"
319 \accepts "ChordNames"
328 "Groups staffs while adding a bracket on the left side, grouping
329 the staves together. The bar lines of the contained staves are
330 connected vertically. StaffGroup only consists of a collection of
331 staffs, with a bracket in front and spanning bar lines. "
333 \accepts "InnerChoirStaff"
334 \accepts "ChoirStaff"
335 \accepts "InnerStaffGroup"
336 \accepts "FiguredBass"
341 \type "Engraver_group"
342 \override VerticalAxisGroup #'minimum-Y-extent = #'(-1.2 . 2.4)
343 extraVerticalExtent = ##f
346 \description " Corresponds to a voice with lyrics. Handles the
347 printing of a single line of lyrics. "
350 \consists "Lyric_engraver"
351 \consists "Extender_engraver"
352 \consists "Hyphen_engraver"
353 \consists "Stanza_number_engraver"
354 \consists "Instrument_name_engraver"
355 \consists "Skip_event_swallow_translator"
356 \consists "Font_size_engraver"
357 \consists "Hara_kiri_engraver"
358 \override VerticalAxisGroup #'remove-first = ##t
359 \override VerticalAxisGroup #'remove-empty = ##t
360 \override SeparationItem #'padding = #0.2
361 \override InstrumentName #'self-alignment-Y = ##f
363 %% sync with define-grobs.scm ;
364 \override InstrumentName #'font-size = #1.0
366 %% make sure that barlines aren't collapsed, when
367 %% Bar_engraver is there.
368 \override BarLine #'bar-size = #0.1
373 \type "Engraver_group"
375 \consists "Axis_group_engraver"
377 \override VerticalAxisGroup #'minimum-Y-extent = ##f
378 extraVerticalExtent = ##f
382 \consists "Rest_swallow_translator"
383 \consists "Skip_event_swallow_translator"
384 \consists "Tie_engraver"
385 \consists "Note_name_engraver"
386 \consists "Separating_line_group_engraver"
390 \type "Engraver_group"
392 \description "Typesets chord names."
394 \consists "Volta_engraver"
396 \consists "Rest_swallow_translator"
397 \consists "Output_property_engraver"
398 \consists "Separating_line_group_engraver"
399 \consists "Chord_name_engraver"
400 \consists "Skip_event_swallow_translator"
401 \consists "Hara_kiri_engraver"
403 voltaOnThisStaff = ##f
404 \override VerticalAxisGroup #'minimum-Y-extent = #'(0 . 2.5)
405 extraVerticalExtent = ##f
406 \override SeparatingGroupSpanner #'padding = #0.8
407 \override VerticalAxisGroup #'remove-first = ##t
408 \override VerticalAxisGroup #'remove-empty = ##t
413 RemoveEmptyStaffContext= \context {
415 \remove "Axis_group_engraver"
416 \consists "Hara_kiri_engraver"
417 \override Beam #'auto-knee-gap = #'()
418 \override VerticalAxisGroup #'remove-empty = ##t
421 AncientRemoveEmptyStaffContext = \context {
422 %% why not add by default?
424 \RemoveEmptyStaffContext
425 \accepts "VaticanaVoice"
426 \accepts "GregorianTranscriptionVoice"
427 \accepts "MensuralVoice"
431 \type "Score_engraver"
434 \description "This is the top level notation context. No
435 other context can contain a @code{Score} context. This context
436 handles the administration of time signatures. It also makes sure
437 that items such as clefs, time signatures, and key-signatures are
438 aligned across staves.
440 You cannot explicitly instantiate a Score context (since it is
441 not contained in any other context). It is instantiated
442 automatically when an output definition (a @code{\score} or
443 @code{\layout} block) is processed."
446 \consists "Paper_column_engraver"
447 \consists "Vertically_spaced_contexts_engraver"
448 \consists "Repeat_acknowledge_engraver"
449 \consists "Staff_collecting_engraver"
451 %% move the alias along with the engraver.
453 \consists "Timing_translator"
454 \consists "Default_bar_line_engraver"
455 \consists "Output_property_engraver"
456 \consists "System_start_delimiter_engraver"
457 \consists "Mark_engraver"
458 \consists "Metronome_mark_engraver"
459 \consists "Break_align_engraver"
460 \consists "Spacing_engraver"
461 \consists "Vertical_align_engraver"
462 \consists "Stanza_number_align_engraver"
463 \consists "Bar_number_engraver"
464 \consists "Tweak_engraver"
465 \consists "Parenthesis_engraver"
467 \defaultchild "Staff"
470 \accepts "RhythmicStaff"
472 \accepts "VaticanaStaff"
473 \accepts "GregorianTranscriptionStaff"
474 \accepts "MensuralStaff"
475 \accepts "StaffGroup"
478 \accepts "ChordNames"
479 \accepts "GrandStaff"
480 \accepts "ChoirStaff"
481 \accepts "PianoStaff"
484 \accepts "FiguredBass"
487 soloIIText = #"Solo II"
489 printPartCombineTexts = ##t
490 systemStartDelimiter =#'SystemStartBar
492 drumStyleTable = #drums-style
494 melismaBusyProperties = #default-melisma-properties
496 clefGlyph = #"clefs.G"
498 middleCPosition = #-6
501 defaultBarType = #"|"
502 barNumberVisibility = #first-bar-number-invisible
505 explicitClefVisibility = #all-visible
506 explicitKeySignatureVisibility = #all-visible
507 autoBeamSettings = #default-auto-beam-settings
509 autoBeamCheck = #default-auto-beam-check
510 scriptDefinitions = #default-script-alist
512 pedalSustainStrings = #'("Ped." "*Ped." "*")
513 pedalSustainStyle = #'text
514 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
515 pedalUnaCordaStyle = #'text
517 %% These are in ordinary italic font, including the *,
518 %% but they are unlikely to be used,
519 %% as the default pedal-style for SostenutoPedal is 'mixed':
520 %% i.e. Sost. Ped_____________________
521 pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
522 pedalSostenutoStyle = #'mixed
524 harmonicAccidentals = ##t
525 fingeringOrientations = #'(up down)
526 stringNumberOrientations = #'(up down)
527 tupletNumberFormatFunction = #denominator-tuplet-formatter
528 markFormatter = #format-mark-letters
533 autoAccidentals = #'(Staff (same-octave . 0))
534 autoCautionaries = #'()
536 printKeyCancellation = ##t
537 keyAlterationOrder = #`(
538 (6 . ,FLAT) (2 . ,FLAT) (5 . ,FLAT ) (1 . ,FLAT) (4 . ,FLAT) (0 . ,FLAT) (3 . ,FLAT)
539 (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
540 (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
541 (3 . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
544 barCheckSynchronize = ##f
547 chordNameFunction = #ignatzek-chord-names
548 majorSevenSymbol = #whiteTriangleMarkup
549 chordNameSeparator = #(make-simple-markup "/")
550 chordNameExceptions = #ignatzekExceptions
551 chordNoteNamer = #'()
552 chordRootNamer = #note-name->markup
553 chordPrefixSpacer = #0
554 chordNameExceptionsFull = #fullJazzExceptions
555 chordNameExceptionsPartial = #partialJazzExceptions
558 bassStaffProperties = #'((assign clefGlyph "clefs.F")
559 (assign clefPosition 2)
560 (assign middleCPosition 6))
562 stringOneTopmost = ##t
565 %% One may change the strings tuning as following :
566 %% The lenght of the list must be equal to the number of string
567 stringTunings = #guitar-tuning
568 tablatureFormat = #fret-number-tablature-format
571 figuredBassFormatter = #format-bass-figure
572 metronomeMarkFormatter = #format-metronome-markup
574 (Voice Stem direction ,UP)
575 (Voice Stem font-size -3)
576 (Voice NoteHead font-size -3)
577 (Voice Dots font-size -3)
578 (Voice Stem length-fraction 0.8)
579 (Voice Stem no-stem-extend #t)
580 (Voice Beam thickness 0.384)
581 (Voice Beam length-fraction 0.8)
582 (Voice Accidental font-size -4)
583 (Voice Slur direction ,DOWN)
586 keepAliveInterfaces = #'(rhythmic-grob-interface lyric-interface percent-repeat-interface)
587 quotedEventTypes = #'(note-event rest-event time-scaled-music tie-event beam-event)
588 instrumentTransposition = #(ly:make-pitch 0 0 0)
590 verticallySpacedContexts = #'(Staff)
592 hairpinToBarline = ##t
601 \type "Engraver_group"
604 \consists "Figured_bass_engraver"
605 \consists "Note_swallow_translator"
606 \consists "Skip_event_swallow_translator"
607 \consists "Separating_line_group_engraver"
608 \consists "Hara_kiri_engraver"
610 \override VerticalAxisGroup #'remove-empty = ##t
611 \override VerticalAxisGroup #'remove-first = ##t
612 \override VerticalAxisGroup #'minimum-Y-extent = #'(-0.5 . 2.5)
617 \type "Engraver_group"
619 %% don't want to route anything out of here:
622 \consists "Swallow_engraver"
623 \description "Silently discards all musical information given to this context. "
630 \consists "Tab_note_heads_engraver"
631 \remove "Note_heads_engraver"
632 \remove "Fingering_engraver"
633 \remove "New_fingering_engraver"
635 \description "Context for drawing notes in a Tab staff. "
637 %% TabStaff increase the staff-space, which in turn
638 %% increases beam thickness and spacing; beams are
639 %% too big. We have to adjust the beam settings:
640 \override Beam #'thickness = #0.32
641 \override Beam #'length-fraction = #0.62
643 %% No accidental in tablature !
644 \remove Accidental_engraver
652 \remove "Staff_symbol_engraver"
653 \consists "Tab_staff_symbol_engraver"
655 \description "Context for generating tablature. [DOCME]"
658 \defaultchild "TabVoice"
661 \override StaffSymbol #'staff-space = #1.5
663 %% Don't draw stems over the tablature figures !
664 \override Stem #'avoid-note-head = ##t
666 %% No accidental in tablature !
667 \remove "Accidental_engraver"
668 \remove "Key_engraver"
669 \remove "String_number_engraver"
670 %% Special "TAB" clef
671 clefGlyph = #"clefs.tab"
675 %% TODO: Gregorian Chant contexts should be moved to gregorian-init.ly,
676 %% but this does not work (is this a bug or intended behaviour?):
678 %% If I try to do so, I get "error: unknown escaped string:
679 %% `\VaticanaStaff'" in params-init.ly. If I also move
680 %% "\context { \Vaticana*Context }" from params-init.ly to the end
681 %% of gregorian-init.ly, then I get "error: parse error, unexpected
682 %% TRANSLATOR: \context { \VaticanaStaff }" in
683 %% gregorian-init.ly. --jr
687 \name "VaticanaVoice"
689 \description "Same as @code{Voice} context, except that it is accommodated for tyepsetting Gregorian Chant in the notational style of Editio Vaticana."
691 \remove "Slur_engraver"
692 \remove "Stem_engraver"
693 \remove "Ligature_bracket_engraver"
694 \consists "Vaticana_ligature_engraver"
696 %% Set default head for notes outside of \[ \].
697 \override NoteHead #'style = #'vaticana.punctum
699 %% Put some space before and after divisiones.
700 %% FIXME: This does not seem to show any effect.
701 \override Script #'padding = #0.5
703 %% There are no beams in Gregorian Chant notation.
706 %% Prepare TextSpanner for \episem{Initium|Finis} use.
708 %% N.B.: dash-fraction MUST be unset; otherwise, TextSpanner will
709 %% always produce dashed lines, regardless of the style property.
711 %% FIXME: The line @code{\override TextSpanner #'padding = #-0.1} is
712 %% required to force the articulation signs being placed vertically
713 %% tightly to the correpsonding note heads.
715 \override TextSpanner #'dash-fraction = #'()
716 \override TextSpanner #'style = #'line
717 \override TextSpanner #'edge-height = #'(0 . 0)
718 \override TextSpanner #'padding = #-0.1
719 \override TextSpanner #'enclose-bounds = #1
720 \override TextSpanner #'edge-text = #'("" . "")
723 %% FIXME: need something like
724 %% \remove "Bar_number_engraver" (which lives on score level)
725 %% for vaticana and gregorian transcription staves
729 \name "VaticanaStaff"
732 \accepts "VaticanaVoice"
733 \defaultchild "VaticanaVoice"
735 \description "Same as @code{Staff} context, except that it is accommodated for tyepsetting Gregorian Chant in the notational style of Editio Vaticana."
737 \remove "Time_signature_engraver"
738 \consists "Custos_engraver"
740 %% We can not remove Bar_engraver; otherwise clefs and custodes will
741 %% not show up any more among other line breaking issues.
742 %% Instead, we make the grob transparent.
743 \override BarLine #'transparent = ##t
745 \override StaffSymbol #'line-count = #4
746 \override StaffSymbol #'thickness = #0.6
748 %% FIXME: unit on StaffSymbol's width should be \linewidth.
749 %% \override StaffSymbol #'width = #60.0
751 %% Choose vaticana do clef on 3rd line as default.
752 clefGlyph = #"clefs.vaticana.do"
757 %% Select vaticana style font.
758 \override KeySignature #'style = #'vaticana
759 \override Accidental #'style = #'vaticana
760 \override Custos #'style = #'vaticana
761 \override Custos #'neutral-position = #3
762 \override Custos #'neutral-direction = #DOWN
767 \name "GregorianTranscriptionVoice"
770 %% Removing ligature bracket engraver without replacing it by some
771 %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
772 %% warning for every "\[" and "\]". Therefore, we make the grob
773 %% transparent instead.
774 \override LigatureBracket #'transparent = ##t
776 %% Put some space before and after divisiones.
777 %% FIXME: This does not seem to show any effect.
778 \override Script #'padding = #0.5
780 %% There are no beams in Gregorian Chant notation.
783 %% Prepare TextSpanner for \episem{Initium|Finis} use.
785 %% N.B.: dash-fraction MUST be unset; otherwise, TextSpanner will
786 %% always produce dashed lines, regardless of the style property.
788 %% FIXME: The line @code{\override TextSpanner #'padding = #-0.1} is
789 %% required to force the articulation signs being placed vertically
790 %% tightly to the correpsonding note heads.
792 \override TextSpanner #'dash-fraction = #'()
793 \override TextSpanner #'style = #'line
794 \override TextSpanner #'edge-height = #'(0 . 0)
795 \override TextSpanner #'padding = #-0.1
796 \override TextSpanner #'enclose-bounds = #1
797 \override TextSpanner #'edge-text = #'("" . "")
802 \name "GregorianTranscriptionStaff"
805 \accepts "GregorianTranscriptionVoice"
806 \defaultchild "GregorianTranscriptionVoice"
808 %% We can not remove Bar_engraver; otherwise clefs and custodes will
809 %% not show up any more among other line breaking issues.
810 %% Instead, we make the grob transparent.
811 \override BarLine #'transparent = ##t
816 \name "MensuralVoice"
818 \description "Same as @code{Voice} context, except that it is accommodated for tyepsetting a piece in mensural style."
820 \remove "Slur_engraver"
821 \remove "Ligature_bracket_engraver"
822 \consists "Mensural_ligature_engraver"
824 %% Set default head for notes outside of \[ \].
825 \override NoteHead #'style = #'petrucci
827 %% There are no beams in mensural notation.
833 \name "MensuralStaff"
836 \defaultchild "MensuralVoice"
837 \accepts "MensuralVoice"
838 \description "Same as @code{Staff} context, except that it is accommodated for tyepsetting a piece in mensural style."
840 \consists "Custos_engraver"
842 %% We can not remove Bar_engraver; otherwise clefs and custodes will
843 %% not show up any more among other line breaking issues.
844 %% Instead, we make the grob transparent.
845 \override BarLine #'transparent = ##t
847 \override StaffSymbol #'thickness = #0.6
849 %% FIXME: unit on StaffSymbol's width should be \linewidth.
850 %% \override StaffSymbol #'width = #60.0
852 %% Choose petrucci g clef on 2nd line as default.
853 clefGlyph = #"clefs.petrucci.g"
854 middleCPosition = #-6
858 %% Select mensural style font.
859 \override TimeSignature #'style = #'mensural
860 \override KeySignature #'style = #'mensural
861 \override Accidental #'style = #'mensural
862 \override Custos #'style = #'mensural
863 \override Custos #'neutral-position = #3
864 \override Custos #'neutral-direction = #DOWN
868 RemoveEmptyRhythmicStaffContext= \context {
870 \remove "Axis_group_engraver"
871 \override VerticalAxisGroup #'remove-empty = ##t
872 \consists "Hara_kiri_engraver"