X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Flsr%2Fincipit.ly;h=5a5f80a47f77b33d4bf8d8c636bfd58d91bc2945;hb=0387f04497978e37b335a8b99eec905499d6ad0f;hp=57876e200a7e1d0cb3d2dbf1e6cab2089f4129b7;hpb=c3f02f0948bbb78495ae3651fd42eea58319c40c;p=lilypond.git diff --git a/input/lsr/incipit.ly b/input/lsr/incipit.ly index 57876e200a..5a5f80a47f 100644 --- a/input/lsr/incipit.ly +++ b/input/lsr/incipit.ly @@ -1,6 +1,6 @@ %% Do not edit this file; it is auto-generated from input/new %% This file is in the public domain. -\version "2.11.57" +\version "2.11.64" \header { texidoces = " Los «incipit» se pueden escribir utilizando el grob del nombre del @@ -15,6 +15,7 @@ keeping separate the instrument name definition and the incipit definition." doctitle = "Incipit" } % begin verbatim + incipit = #(define-music-function (parser location incipit-music) (ly:music?) #{ @@ -71,7 +72,7 @@ global = { } discantusIncipit = << - \new MensuralVoice = discantusIncipit << + \new MensuralVoice = "discantusIncipit" << \repeat unfold 9 { s1 \noBreak } { \clef "neomensural-c1" @@ -108,7 +109,7 @@ discantusLyrics = \lyricmode { } altusIncipit = << - \new MensuralVoice = altusIncipit << + \new MensuralVoice = "altusIncipit" << \repeat unfold 9 { s1 \noBreak } { \clef "neomensural-c3" @@ -144,7 +145,7 @@ altusLyrics = \lyricmode { } tenorIncipit = << - \new MensuralVoice = tenorIncipit << + \new MensuralVoice = "tenorIncipit" << \repeat unfold 9 { s1 \noBreak } { \clef "neomensural-c4" @@ -181,7 +182,7 @@ tenorLyrics = \lyricmode { } bassusIncipit = << - \new MensuralVoice = bassusIncipit << + \new MensuralVoice = "bassusIncipit" << \repeat unfold 9 { s1 \noBreak } { \clef "bass" @@ -220,27 +221,28 @@ bassusLyrics = \lyricmode { \new StaffGroup = choirStaff << \new Voice = "discantusNotes" << \global - \set Staff.instrumentName = "Discantus" + \set Staff.instrumentName = #"Discantus" \incipit \discantusIncipit \discantusNotes >> \new Lyrics = "discantusLyrics" \lyricsto discantusNotes { \discantusLyrics } \new Voice = "altusNotes" << \global - \set Staff.instrumentName = "Altus" + \set Staff.instrumentName = #"Altus" \incipit \altusIncipit \altusNotes >> \new Lyrics = "altusLyrics" \lyricsto altusNotes { \altusLyrics } \new Voice = "tenorNotes" << \global - \set Staff.instrumentName = "Tenor" + \set Staff.instrumentName = #"Tenor" \incipit \tenorIncipit \tenorNotes >> \new Lyrics = "tenorLyrics" \lyricsto tenorNotes { \tenorLyrics } \new Voice = "bassusNotes" << - \set Staff.instrumentName = "Bassus" + \global + \set Staff.instrumentName = #"Bassus" \incipit \bassusIncipit \bassusNotes >> @@ -277,7 +279,7 @@ bassusLyrics = \lyricmode { %% overall spacing if you comment in the following command. %%\remove "Forbid_line_break_engraver" } - indent=6\cm + indent = 6\cm incipit-width = 4\cm } }