\version "2.24.2"
\language deutsch

\include "gregorian.ly"

chant.meta = {
    \key b \major
    \time 1/4
    \repeat volta 3 {
    s4*5 \divisioMinima
    s4*9 \divisioMinima
    \alternative {
      \volta 1,2 {s4*7}
      \volta 3 {s4*8}
    }
    }
    \finalis
}
chant.cantus.I = \fixed c' {
  f4 f f (g) g4
}
chant.cantus.II = \fixed c' {
    g g g f g es f g
    \alternative {
    \volta 1,2 {f g a f g (f) f4}
    \volta 3 {f g a f g (f) f4 s}
  }
}
chant.cantus.musicians = \fixed c' {
  \repeat volta 3 {
    \chant.cantus.I
    r4
    \chant.cantus.II
  }
}
chant.cantus.congregation = \fixed c' {
  \repeat volta 3 {
    \chant.cantus.I
    s4
    \chant.cantus.II
  }
}
chant.verba = \lyricmode {
    \set stanza = "V"    
    A -- gnus De -- i,
    \set stanza = "A"    
    qui tol -- lis pec -- ca -- ta mun -- di:
    mi -- se -- re -- re no -- bis.
    do -- na  no -- bis pa -- cem.
}
chant.S = \fixed c' {
    f2 f4 (g) g4
    r g g2 s4 g2 f
    f f g f4
    f2 f g f
}
chant.A = \fixed c' {
  d2 c2 d4
  r4 d es2 s4 c2 d
  d2 c2 d2 c4
  d2 c2 d2 c4
}
chant.T = \relative {
  b2 a2 g4
  r4 b c2 s4 g2 b
  a2 f2( f4) g a
  a2 f2( f4) g a
}
chant.B = \relative {
  s4*5
  b,2 c s4 es2 b  
  d2 a2 b2 f4
  d'2 a2 b2 f4
}

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