%%%% This file is part of LilyPond, the GNU music typesetter.
%%%%
-%%%% Copyright (C) 1996--2011 Han-Wen Nienhuys <hanwen@xs4all.nl>
+%%%% Copyright (C) 1996--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>
%%%% Jan Nieuwenhuizen <janneke@gnu.org>
%%%%
%%%% LilyPond is free software: you can redistribute it and/or modify
%%%% You should have received a copy of the GNU General Public License
%%%% along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
-\version "2.14.0"
+\version "2.17.6"
\context {
\name "Global"
\defaultchild "Score"
\description "Hard coded entry point for LilyPond. Cannot be tuned."
\grobdescriptions #all-grob-descriptions
+ EventClasses = #all-event-classes
}
\context {
\type "Engraver_group"
\name "FretBoards"
+ \alias "Staff"
\description "A context for displaying fret diagrams."
\consists "Fretboard_engraver"
predefinedDiagramTable = #default-fret-table
handleNegativeFrets = #'recalculate
+ restrainOpenStrings = ##f
}
\context {
\consists "Output_property_engraver"
\consists "Bar_engraver"
+ \consists "Pure_from_neighbor_engraver"
%% Bar_engraver must be first so default bars aren't overwritten
%% with empty ones.
\consists "Ledger_line_engraver"
\consists "Staff_symbol_engraver"
\consists "Collision_engraver"
- \consists "Beam_collision_engraver"
\consists "Grob_pq_engraver"
\consists "Rest_collision_engraver"
\consists "Accidental_engraver"
clefGlyph = #"clefs.percussion"
clefPosition = #0
- \override Script #'staff-padding = #0.75
+ \override Script.staff-padding = #0.75
}
\name RhythmicStaff
\alias "Staff"
- \override BarLine #'bar-extent = #'(-2 . 2)
- \override VoltaBracket #'staff-padding = #3
- \override StaffSymbol #'line-count = #1
+ \override BarLine.bar-extent = #'(-2 . 2)
+ \override VoltaBracket.staff-padding = #3
+ \override StaffSymbol.line-count = #1
- \override Stem #'neutral-direction = #UP
- \override Beam #'neutral-direction = #UP
+ \override Stem.neutral-direction = #UP
+ \override Beam.neutral-direction = #UP
\consists "Output_property_engraver"
\consists "Font_size_engraver"
\consists "Dots_engraver"
\consists "Rest_engraver"
\consists "Tweak_engraver"
- \consists "Footnote_engraver"
%% switch on to make stem directions interpolate for the
%% center line.
\consists "Script_engraver"
\consists "Script_column_engraver"
+ \consists "Fingering_column_engraver"
\consists "Rhythmic_column_engraver"
\consists "Note_spacing_engraver"
\consists "Spanner_break_forbid_engraver"
\name CueVoice
\alias Voice
fontSize = #-4
- \override Stem #'length-fraction = #(magstep -4)
- \override Beam #'length-fraction = #(magstep -4)
- \override Beam #'beam-thickness = #0.35
+ \override Stem.length-fraction = #(magstep -4)
+ \override Beam.length-fraction = #(magstep -4)
+ \override Beam.beam-thickness = #0.35
}
\context {
\consists "Instrument_name_engraver"
\consists "Span_bar_engraver"
+ \consists "Span_bar_stub_engraver"
\consists "Span_arpeggio_engraver"
\consists "Output_property_engraver"
systemStartDelimiter = #'SystemStartBracket
\consists "Dynamic_align_engraver"
\consists "Text_engraver"
\consists "Text_spanner_engraver"
+ \consists "Font_size_engraver"
\consists "Axis_group_engraver"
\consists "Tweak_engraver"
pedalSustainStrings = #'("Ped." "*Ped." "*")
pedalUnaCordaStrings = #'("una corda" "" "tre corde")
- \override VerticalAxisGroup #'staff-affinity = #CENTER
- \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
+ \override VerticalAxisGroup.staff-affinity = #CENTER
+ \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
#'((basic-distance . 5)
(padding . 0.5))
- \override TextScript #'font-shape = #'italic
- \override DynamicLineSpanner #'Y-offset = #0
+ \override TextScript.font-shape = #'italic
+ \override DynamicLineSpanner.Y-offset = #0
+ \override DynamicText.X-offset =
+ #(ly:make-simple-closure
+ `(,+
+ ,(ly:make-simple-closure
+ (list ly:self-alignment-interface::centered-on-note-columns))
+ ,(ly:make-simple-closure
+ (list ly:self-alignment-interface::x-aligned-on-self))))
\description "Holds a single line of dynamics, which will be
centered between the staves surrounding this context."
\consists "Lyric_engraver"
\consists "Extender_engraver"
\consists "Hyphen_engraver"
+ \consists "Tweak_engraver"
\consists "Stanza_number_engraver"
\consists "Instrument_name_engraver"
\consists "Font_size_engraver"
instrumentName = #'()
shortInstrumentName = #'()
- \override VerticalAxisGroup #'remove-first = ##t
- \override VerticalAxisGroup #'remove-empty = ##t
- \override VerticalAxisGroup #'staff-affinity = #UP
- \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
+ \override VerticalAxisGroup.remove-first = ##t
+ \override VerticalAxisGroup.remove-empty = ##t
+ \override VerticalAxisGroup.staff-affinity = #UP
+ \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
#'((basic-distance . 5.5)
(padding . 0.5)
(stretchability . 1))
- \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
+ \override VerticalAxisGroup.nonstaff-nonstaff-spacing =
#'((basic-distance . 0)
(minimum-distance . 2.8)
(padding . 0.2)
(stretchability . 0))
- \override VerticalAxisGroup #'nonstaff-unrelatedstaff-spacing #'padding = #1.5
- \override InstrumentName #'self-alignment-Y = ##f
+ \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.padding = #1.5
+ \override InstrumentName.self-alignment-Y = ##f
%% sync with define-grobs.scm ;
- \override InstrumentName #'font-size = #1.0
+ \override InstrumentName.font-size = #1.0
%% make sure that barlines aren't collapsed, when
%% Bar_engraver is there.
- \override BarLine #'bar-extent = #'(-0.05 . 0.05)
+ \override BarLine.bar-extent = #'(-0.05 . 0.05)
}
\description "A context for printing the names of notes."
\consists "Axis_group_engraver"
- \override VerticalAxisGroup #'staff-affinity = #UP
- \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
+ \override VerticalAxisGroup.staff-affinity = #UP
+ \override VerticalAxisGroup.nonstaff-nonstaff-spacing =
#'((basic-distance . 0)
(minimum-distance . 2.8)
(padding . 0.2)
(stretchability . 0))
- \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
+ \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
#'((basic-distance . 5.5)
(padding . 0.5)
(stretchability . 1))
- \override VerticalAxisGroup
- #'nonstaff-unrelatedstaff-spacing #'padding = 1.5
+ \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.padding = 1.5
\consists "Tie_engraver"
\consists "Note_name_engraver"
\consists "Chord_name_engraver"
\consists "Hara_kiri_engraver"
% \consists "Note_spacing_engraver"
- \override VerticalAxisGroup #'remove-first = ##t
- \override VerticalAxisGroup #'remove-empty = ##t
- \override VerticalAxisGroup #'staff-affinity = #DOWN
- \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
- \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
+ \override VerticalAxisGroup.remove-first = ##t
+ \override VerticalAxisGroup.remove-empty = ##t
+ \override VerticalAxisGroup.staff-affinity = #DOWN
+ \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #0.5
+ \override VerticalAxisGroup.nonstaff-nonstaff-spacing.padding = #0.5
}
\context {
\consists "Repeat_acknowledge_engraver"
\consists "Staff_collecting_engraver"
- %% move the alias along with the engraver.
+ \alias "Timing"
+
+ %% An alias for Timing is established by the Timing_translator in
+ %% whatever context it is initialized, and the timing variables are
+ %% then copied from wherever Timing had been previously established.
+ %% The alias at Score level provides a target for initializing
+ %% Timing variables in layout definitions before any
+ %% Timing_translator has been run.
+ % timing translator must come BEFORE bar number engraver
\consists "Timing_translator"
\consists "Default_bar_line_engraver"
\consists "Output_property_engraver"
\consists "Stanza_number_align_engraver"
\consists "Bar_number_engraver"
\consists "Parenthesis_engraver"
+ \consists "Concurrent_hairpin_engraver"
+ \consists "Beam_collision_engraver"
+ \consists "Footnote_engraver"
\defaultchild "Staff"
\accepts "PetrucciStaff"
\accepts "StaffGroup"
\accepts "DrumStaff"
+ \accepts "KievanStaff"
\accepts "Lyrics"
\accepts "ChordNames"
\accepts "GrandStaff"
\accepts "NoteNames"
\accepts "FiguredBass"
-
noteToFretFunction = #determine-frets
predefinedDiagramTable = ##f
soloText = #"Solo"
decrescendoSpanner = #'hairpin
defaultBarType = #"|"
- doubleRepeatType = #":|:"
- barNumberVisibility = #first-bar-number-invisible
+ doubleRepeatType = #":..:"
+ startRepeatType = #".|:"
+ endRepeatType = #":|."
+ barNumberVisibility = #first-bar-number-invisible-and-no-parenthesized-bar-numbers
+ barNumberFormatter = #robust-bar-number-function
automaticBars = ##t
explicitClefVisibility = #all-visible
repeatCountVisibility = #all-repeat-counts-visible
timeSignatureSettings = #default-time-signature-settings
- timeSignatureFraction = #'(4 . 4)
+ timeSignatureFraction = 4/4
%% These defaults should be the same as the rules established in
%% scm/time-signature-settings.scm for 4/4 time
beatStructure = #'(1 1 1 1)
beamExceptions = #'((end . (((1 . 8) . (4 4))
((1 . 12) . (3 3 3 3)))))
+ beamHalfMeasure = ##t
+
autoBeaming = ##t
autoBeamCheck = #default-auto-beam-check
%% chord names:
chordNameFunction = #ignatzek-chord-names
+ minorChordModifier = #(make-simple-markup "m")
+ additionalPitchPrefix = #"" % was "add"
majorSevenSymbol = #whiteTriangleMarkup
chordNameLowercaseMinor = ##f
- chordNameSeparator = #(make-simple-markup "/")
+ chordNameSeparator = #(make-hspace-markup 0.5)
+ slashChordSeparator = #(make-simple-markup "/")
chordNameExceptions = #ignatzekExceptions
chordNoteNamer = #'()
chordRootNamer = #note-name->markup
\consists "Separating_line_group_engraver"
\consists "Hara_kiri_engraver"
- \override VerticalAxisGroup #'remove-empty = ##t
- \override VerticalAxisGroup #'remove-first = ##t
- \override VerticalAxisGroup #'staff-affinity = #UP
- \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
- \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
+ \override VerticalAxisGroup.remove-empty = ##t
+ \override VerticalAxisGroup.remove-first = ##t
+ \override VerticalAxisGroup.staff-affinity = #UP
+ \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #0.5
+ \override VerticalAxisGroup.nonstaff-nonstaff-spacing.padding = #0.5
}
\context {
\remove "Note_heads_engraver"
\remove "Fingering_engraver"
\remove "New_fingering_engraver"
+ \remove "Pitched_trill_engraver"
\description "Context for drawing notes in a Tab staff."
%% TabStaff increase the staff-space, which in turn
%% increases beam thickness and spacing; beams are
%% too big. We have to adjust the beam settings:
- \override Beam #'beam-thickness = #0.32
- \override Beam #'length-fraction = #0.62
+ \override Beam.beam-thickness = #0.32
+ \override Beam.length-fraction = #0.62
%% the same goes for tremolo beams
- \override StemTremolo #'beam-thickness = #0.32
+ \override StemTremolo.beam-thickness = #0.32
%% NOTE: in lily/stem-tremolo.cc, we have length-fraction = 1,
%% and the tablature staff space is scaled (1.5 by default),
%% so we use the inversion of the scale factor:
- \override StemTremolo #'length-fraction = #(lambda (grob)
+ \override StemTremolo.length-fraction = #(lambda (grob)
(/ 1 (ly:staff-symbol-staff-space grob)))
- \override StemTremolo #'beam-width = #stem-tremolo::calc-tab-width
+ \override StemTremolo.beam-width = #stem-tremolo::calc-tab-width
%% No accidental in tablature !
\remove "Accidental_engraver"
%% make the Stems as short as possible to minimize their influence
%% on the slur::calc-control-points routine
- \override Stem #'no-stem-extend = ##t
- \override Flag #'style = #'no-flag
- \override Stem #'details = #'((lengths 0 0 0 0 0 0)
+ \override Stem.no-stem-extend = ##t
+ \override Flag.style = #'no-flag
+ \override Stem.details = #'((lengths 0 0 0 0 0 0)
(beamed-lengths 0 0 0)
(beamed-minimum-free-lengths 0 0 0)
(beamed-extreme-minimum-free-lengths 0 0)
(stem-shorten 0 0))
%% after all, the stubs of the stems may still be visible, so ...
- \override Stem #'transparent = ##t
+ \override Stem.stencil = ##f
+ \override Flag.stencil = ##f
%% automatic beams should be suppressed for similar reasons ...
autoBeaming = ##f
%% remove beams, dots and rests ...
- \override Beam #'stencil = ##f
- \override StemTremolo #'stencil = ##f
- \override Dots #'stencil = ##f
- \override Rest #'stencil = ##f
- \override MultiMeasureRest #'stencil = ##f
- \override MultiMeasureRestNumber #'transparent = ##t
- \override MultiMeasureRestText #'transparent = ##t
+ \override Beam.stencil = ##f
+ \override StemTremolo.stencil = ##f
+ \override Dots.stencil = ##f
+ \override Rest.stencil = ##f
+ \override MultiMeasureRest.stencil = ##f
+ \override MultiMeasureRestNumber.stencil = ##f
+ \override MultiMeasureRestText.stencil = ##f
%% ... all kinds of ties/slurs
- \override Tie #'stencil = ##f
- \override RepeatTie #'stencil = ##f
- \override LaissezVibrerTie #'stencil = ##f
- \override Slur #'stencil = #slur::draw-tab-slur
- \override PhrasingSlur #'stencil = ##f
+ \override Tie.stencil = ##f
+ \override RepeatTie.stencil = ##f
+ \override LaissezVibrerTie.stencil = ##f
+ \override Slur.stencil = #slur::draw-tab-slur
+ \override PhrasingSlur.stencil = ##f
%% 'tied to' fret numbers become invisible or parenthesized, respectively)
- \override Tie #'after-line-breaking = #tie::handle-tab-note-head
- \override RepeatTie #'after-line-breaking = #repeat-tie::handle-tab-note-head
+ \override Tie.after-line-breaking = #tie::handle-tab-note-head
+ \override RepeatTie.after-line-breaking = #repeat-tie::handle-tab-note-head
%% ... and all kinds of markups, spanners etc.
- \override TupletBracket #'stencil = ##f
- \override TupletNumber #'stencil = ##f
- \override DynamicText #'transparent = ##t
- \override DynamicTextSpanner #'stencil = ##f
- \override TextSpanner #'stencil = ##f
- \override Hairpin #'transparent = ##t
- \override Script #'stencil = ##f
- \override TextScript #'stencil = ##f
- \override Glissando #'stencil = #glissando::draw-tab-glissando
+ \override TupletBracket.stencil = ##f
+ \override TupletNumber.stencil = ##f
+ \override DynamicText.stencil = ##f
+ \override DynamicTextSpanner.stencil = ##f
+ \override TextSpanner.stencil = ##f
+ \override Hairpin.stencil = ##f
+ \override Script.stencil = ##f
+ \override TextScript.stencil = ##f
+ \override Glissando.stencil = #glissando::draw-tab-glissando
%% the direction for glissando lines will be automatically corrected
- \override Glissando #'extra-dy = #glissando::calc-tab-extra-dy
- \override Glissando #'bound-details #'right = #`((attach-dir . ,LEFT)
+ \override Glissando.extra-dy = #glissando::calc-tab-extra-dy
+ \override Glissando.bound-details.right = #`((attach-dir . ,LEFT)
(padding . 0.3))
- \override Glissando #'bound-details #'left = #`((attach-dir . ,RIGHT)
+ \override Glissando.bound-details.left = #`((attach-dir . ,RIGHT)
(padding . 0.3))
%% dead notes
- \override TabNoteHead #'glyph-name = #tab-note-head::calc-glyph-name
- \override TabNoteHead #'stencil = #tab-note-head::whiteout-if-style-set
+ \override TabNoteHead.glyph-name = #tab-note-head::calc-glyph-name
+ \override TabNoteHead.stencil = #tab-note-head::whiteout-if-style-set
}
\context {
\defaultchild "TabVoice"
%% 6 strings, bigger spacing
- \override StaffSymbol #'staff-space = #1.5
+ \override StaffSymbol.staff-space = #1.5
%% Don't draw stems over the tablature figures !
- \override Stem #'avoid-note-head = ##t
+ \override Stem.avoid-note-head = ##t
%% No accidental in tablature !
\remove "Accidental_engraver"
\remove "Ottava_spanner_engraver"
%% the clef handler
- \override Clef #'stencil = #clef::print-modern-tab-if-set
+ \override Clef.stencil = #clef::print-modern-tab-if-set
%% no time signature
- \override TimeSignature #'stencil = ##f
+ \override TimeSignature.stencil = ##f
%% no arpeggios
- \override Arpeggio #'stencil = ##f
+ \override Arpeggio.stencil = ##f
%% we ignore collision warnings that may occur due to
%% stem overlapping, because we have no stems ;-)
- \override NoteColumn #'ignore-collision = ##t
+ \override NoteColumn.ignore-collision = ##t
%% Special "TAB" clef
clefGlyph = #"clefs.tab"
clefPosition = #0
%% Change string if note results in negative fret number
handleNegativeFrets = #'recalculate
+ %% Allow open strings even if minimumFret is set
+ restrainOpenStrings = ##f
}
\context {
\consists "Episema_engraver"
%% Set default head for notes outside of \[ \].
- \override NoteHead #'style = #'vaticana.punctum
+ \override NoteHead.style = #'vaticana.punctum
%% Put some space before and after divisiones.
%% FIXME: This does not seem to show any effect.
- \override Script #'padding = #0.5
+ \override Script.padding = #0.5
%% There are no beams in Gregorian Chant notation.
autoBeaming = ##f
%% We can not remove Bar_engraver; otherwise clefs and custodes will
%% not show up any more among other line breaking issues.
%% Instead, we make the grob transparent.
- \override BarLine #'transparent = ##t
+ \override BarLine.transparent = ##t
- \override StaffSymbol #'line-count = #4
- \override StaffSymbol #'thickness = #0.6
+ \override StaffSymbol.line-count = #4
+ \override StaffSymbol.thickness = #0.6
%% FIXME: unit on StaffSymbol's width should be \linewidth.
- %% \override StaffSymbol #'width = #60.0
+ %% \override StaffSymbol.width = #60.0
%% Choose vaticana do clef on 3rd line as default.
clefGlyph = #"clefs.vaticana.do"
clefOctavation = #0
%% Select vaticana style font.
- \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
- \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
- \override Custos #'style = #'vaticana
- \override Custos #'neutral-position = #3
- \override Custos #'neutral-direction = #DOWN
- \override Dots #'style = #'vaticana
+ \override KeySignature.glyph-name-alist = #alteration-vaticana-glyph-name-alist
+ \override Accidental.glyph-name-alist = #alteration-vaticana-glyph-name-alist
+ \override Custos.style = #'vaticana
+ \override Custos.neutral-position = #3
+ \override Custos.neutral-direction = #DOWN
+ \override Dots.style = #'vaticana
}
\context {
%% other ligature engraver would cause a "Junking event: `LigatureEvent'"
%% warning for every "\[" and "\]". Therefore, we make the grob
%% transparent instead.
- \override LigatureBracket #'transparent = ##t
+ \override LigatureBracket.transparent = ##t
%% Put some space before and after divisiones.
%% FIXME: This does not seem to show any effect.
- \override Script #'padding = #0.5
+ \override Script.padding = #0.5
%% There are no beams in Gregorian Chant notation.
autoBeaming = ##f
%% We can not remove Bar_engraver; otherwise clefs and custodes will
%% not show up any more among other line breaking issues.
%% Instead, we make the grob transparent.
- \override BarLine #'transparent = ##t
+ \override BarLine.transparent = ##t
}
\context {
\consists "Mensural_ligature_engraver"
%% Set default head for notes outside of \[ \].
- \override NoteHead #'style = #'mensural
- \override Rest #'style = #'mensural
- \override Flag #'style = #'mensural
+ \override NoteHead.style = #'mensural
+ \override Rest.style = #'mensural
+ \override Flag.style = #'mensural
%% There are no beams in mensural notation.
autoBeaming = ##f
%% We can not remove Bar_engraver; otherwise clefs and custodes will
%% not show up any more among other line breaking issues.
%% Instead, we make the grob transparent.
- \override BarLine #'transparent = ##t
+ \override BarLine.transparent = ##t
- \override StaffSymbol #'thickness = #0.6
+ \override StaffSymbol.thickness = #0.6
%% FIXME: unit on StaffSymbol's width should be \linewidth.
- %% \override StaffSymbol #'width = #60.0
+ %% \override StaffSymbol.width = #60.0
%% Choose mensural g clef on 2nd line as default.
clefGlyph = #"clefs.mensural.g"
clefOctavation = #0
%% Select mensural style font.
- \override TimeSignature #'style = #'mensural
- \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
- \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
- \override Custos #'style = #'mensural
- \override Custos #'neutral-position = #3
- \override Custos #'neutral-direction = #DOWN
+ \override TimeSignature.style = #'mensural
+ \override KeySignature.glyph-name-alist = #alteration-mensural-glyph-name-alist
+ \override Accidental.glyph-name-alist = #alteration-mensural-glyph-name-alist
+ \override Custos.style = #'mensural
+ \override Custos.neutral-position = #3
+ \override Custos.neutral-direction = #DOWN
%% Accidentals are valid only once (same as
- %% #(set-accidental-style 'forget))
+ %% \accidentalStyle forget)
extraNatural = ##f
autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
autoCautionaries = #'()
\consists "Mensural_ligature_engraver"
%% Set glyph styles.
- \override NoteHead #'style = #'petrucci
- \override Rest #'style = #'mensural
+ \override NoteHead.style = #'petrucci
+ \override Rest.style = #'mensural
% Thickens and shortens stems.
- \override Stem #'thickness = #1.7
- \override Stem #'length = #5
+ \override Stem.thickness = #1.7
+ \override Stem.length = #5
%% There are no beams in Petrucci notation.
autoBeaming = ##f
\consists "Custos_engraver"
- \override StaffSymbol #'thickness = #1.3
+ \override StaffSymbol.thickness = #1.3
%% Choose Petrucci g clef on 2nd line as default.
clefGlyph = #"clefs.petrucci.g"
clefPosition = #-2
clefOctavation = #0
- \override Custos #'style = #'mensural
- \override Custos #'neutral-position = #3
- \override Custos #'neutral-direction = #DOWN
+ \override Custos.style = #'mensural
+ \override Custos.neutral-position = #3
+ \override Custos.neutral-direction = #DOWN
%% Accidentals are valid only once (if the following note is different)
extraNatural = ##f
printKeyCancellation = ##f
}
+\context {
+ \Voice
+ \name "KievanVoice"
+ \alias "Voice"
+ \description "Same as @code{Voice} context, except that it is
+accommodated for typesetting a piece in Kievan style."
+
+ %% Set glyph styles.
+ \override NoteHead.style = #'kievan
+ \override Rest.style = #'mensural
+ \override Accidental.glyph-name-alist = #alteration-kievan-glyph-name-alist
+ \override Dots.style = #'kievan
+ \override Slur.stencil = ##f
+
+ %% There are beams in Kievan notation, but they are invoked manually
+ autoBeaming = ##f
+}
+
+\context {
+ \Staff
+ \name "KievanStaff"
+ \alias "Staff"
+ \denies "Voice"
+ \defaultchild "KievanVoice"
+ \accepts "KievanVoice"
+ \description "Same as @code{Staff} context, except that it is
+accommodated for typesetting a piece in Kievan style."
+
+ \remove "Time_signature_engraver"
+
+ %% Choose Kievan tsefaut clef
+ clefGlyph = #"clefs.kievan.do"
+ middleCClefPosition = #0
+ middleCPosition = #0
+ clefPosition = #0
+ clefOctavation = #0
+
+ %% Accidentals are valid only once (if the following note is different)
+ extraNatural = ##f
+ autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
+ ,neo-modern-accidental-rule)
+ autoCautionaries = #'()
+ printKeyCancellation = ##f
+
+}
+
%% Keep the old definitions in here for compatibility (they erase previous
%% settings to the corresponding context!).
%% For new scores, one should simply insert the \RemoveEmptyStaves settings