in Snippets - LilyPond

Ancient notation 347
#})
}
#})
(system-start-text::print grob)))
%%%%%%%%%%%%%%%%%%%%%%%%%
global = {
\set Score.skipBars = ##t
\key g \major
\time 4/4
}
% the actual music
\skip 1*8
% let finis bar go through all staves
\override Staff.BarLine #'transparent = ##f
% finis bar
\bar "|."
discantusIncipit =
\new Lyrics \lyricsto discantusIncipit { IV- }
>>
discantusNotes = {
\transpose c' c'' {
\clef "treble"
d'2. d'4 |
b e' d'2 |
c'4 e'4.( d'8 c' b |
a4) b a2 |
b4.( c'8 d'4) c'4 |
\once \override NoteHead #'transparent = ##t
c'1 |
b\breve |
#(primitive-eval
'(or (false-if-exception (- indent (* mm incipit-widt
(* 0.5 indent)))
ragged-right = ##f
ragged-last = ##f
system-count = #1 }