chants for rorate

kyrie_xvi/assignments.tt

@@ -1,7 +0,0 @@
-[%
-    scores = {
-        gregorian = 'gregorio_scores/kyrie/kyrie_xvi.gabc'
-    };
-    credits.TM = 'Vat. XVI';
--%]
-[%# Accompanyment available. Arragngement Berthold Hummel%]

kyrie_xvi/kyrie_xvi.tt

@@ -0,0 +1,9 @@
+\song{[% purpose %]}{}{%
+[% IF parts == 'choir' -%]
+    \lilypondfile{library/freie_lieder/kyrie_xvi/kyrie_xvi_schola.ly}%
+[% ELSIF parts != 0 -%]
+    \lilypondfile{library/freie_lieder/kyrie_xvi/kyrie_xvi_full.ly}%
+[% ELSE -%]
+    \lilypondfile{library/freie_lieder/kyrie_xvi/kyrie_xvi_lz.ly}%
+[% END -%]
+}

kyrie_xvi/kyrie_xvi_vars.ly

@@ -5,39 +5,44 @@
 
 chant.meta = {
     \key f \major
-    \repeat volta 2 {s4*9}
+    \repeat volta 2 {s4*6}
     \repeat volta 2 {s4*7}
-    \repeat volta 2 {s4*10} \finalis
+    s4*6 \finalis
+    s4*8 \finalis
 }
 chant.cantus = \fixed c' {
-    \repeat volta 2 { f4 g( a) \melisma a4 \melismaEnd a f g a a }
+    \repeat volta 2 { \melisma a4 \melismaEnd a f g a a }
     \repeat volta 2 {c' a (b) g g a a}
-    \repeat volta 2 {f4 g( a) \melisma a4 \melismaEnd a f g a a s}
+    \melisma a \melismaEnd a f g a a
+    \melisma a \melismaEnd a f g (f) e d
 }
 chant.A = \relative c' {
-    \repeat volta 2 {d2 s4 e2 s4 d2 e4}
+    \repeat volta 2 {f2 s4 d2 e4}
     \repeat volta 2 {e2 s d2 e4}
-    \repeat volta 2 {d2 s4 e2 s4 d2 e4 s}
+    f2 s4 d2 e4
+    f2 s4 d2 c4 a
 }
 chant.T = \relative {
-    \repeat volta 2 {a2( s4 a2) s4 b2 c4}
+    \repeat volta 2 {a2 s4 b2 c4}
     \repeat volta 2 {c2 s d c4}
-    \repeat volta 2 {a2( s4 a2) s4 b2 c4 s}
+    a2 s4 b2 c4
+    a2 s4 b2 g4 f
 }
 chant.B = \relative {
-    \repeat volta 2 {d2 s4 c2 s4 b2 a4}
+    \repeat volta 2 {d2 s4 b2 a4}
     \repeat volta 2 {a2 s b2 a4}
-    \repeat volta 2 {d2 s4 c2 s4 b2 a4 s}
+    d2 s4 b2 a4
+    d2 s4 b2 c4 d
 }
 chant.verba = \lyricmode {
     \set stanza = "V/A"    
-    Ky -- ri -- e e -- le -- i son.
+    Ky -- ri -- e, e -- le -- i -- son.
     \set stanza = "V/A"    
-    Chri -- ste e -- le -- i -- son.
+    Chri -- ste, er -- le -- i son.
     \set stanza = "V"    
-    Ky -- ri -- e e -- le -- i son.
+    Ky -- ri -- e, e -- le -- i -- son.
     \set stanza = "A"    
-    Ky -- ri -- e e -- le -- i son.
+    Ky -- ri -- e, e -- le -- i -- son.
 }
 
 VocalScore =