\version "2.24.2"
\language deutsch

\include "gregorian.ly"

chant.meta = {
    \key f \major
    \repeat volta 2 {s4*6}
    \repeat volta 2 {s4*7}
    s4*6 \finalis
    s4*8 \finalis
}
chant.cantus = \fixed c' {
    \repeat volta 2 { \melisma a4 \melismaEnd a f g a a }
    \repeat volta 2 {c' a (b) g g a a}
    \melisma a \melismaEnd a f g a a
    \melisma a \melismaEnd a f g (f) e d
}
chant.A = \relative c' {
    \repeat volta 2 {f2 s4 d2 e4}
    \repeat volta 2 {e2 s d2 e4}
    f2 s4 d2 e4
    f2 s4 d2 c4 a
}
chant.T = \relative {
    \repeat volta 2 {a2 s4 b2 c4}
    \repeat volta 2 {c2 s d c4}
    a2 s4 b2 c4
    a2 s4 b2 g4 f
}
chant.B = \relative {
    \repeat volta 2 {d2 s4 b2 a4}
    \repeat volta 2 {a2 s b2 a4}
    d2 s4 b2 a4
    d2 s4 b2 c4 d
}
chant.verba = \lyricmode {
    \set stanza = "V/A"    
    Herr, er -- bar -- me Dich.
    \set stanza = "V/A"    
    Chri -- stus, er -- bar -- me Dich.
    \set stanza = "V"    
    Herr, er -- bar -- me Dich.
    \set stanza = "A"    
    Herr, er -- bar -- me Dich.
}

VocalScore = 
    \new GregorianTranscriptionStaff <<
        \new GregorianTranscriptionVoice = "melody" <<\chant.meta \chant.cantus>>
        \new GregorianTranscriptionLyrics \lyricsto melody {\chant.verba}
    >>
FullScore = <<
    \new StaffGroup <<
            \new GregorianTranscriptionStaff <<
                \new GregorianTranscriptionVoice = "melody" <<\voiceOne \chant.meta \chant.cantus>>
                \new GregorianTranscriptionVoice <<\voiceTwo \chant.meta \chant.A>>
            >>
            \new GregorianTranscriptionLyrics \lyricsto melody {\chant.verba}
            \new GregorianTranscriptionStaff <<
                \clef bass
                \new GregorianTranscriptionVoice <<\voiceOne \chant.meta \chant.T>>
                \new GregorianTranscriptionVoice <<\voiceTwo \chant.meta \chant.B>>
            >>
    >>
>>