\version "2.10"

\header{
  title = "Missa Papae Marcelli"
  composer = "Palestrina"
}

global = {
  \key bes \major
  \time 4/4
  #(set-accidental-style 'modern-voice)
}

sopKyrie = \relative c'' {
  \set Staff.instrumentName = "Soprano"
  \set Staff.shortInstrumentName = "S"
  r2 c2. c4 c2 f4.( ees8 d c bes a g f f2 e4) f2
}

sopKyrieWords = \lyricmode {
  Ky -- rie e -- lei -- son,
}

altKyrie = \relative c' {
  \set Staff.instrumentName = "Alto"
  \set Staff.shortInstrumentName = "A"
  R1 r2 f2. f4 f2 bes1 a
}

altKyrieWords = \lyricmode {
  Ky -- rie e -- lei -- son,
}

\score {
  \new ChoirStaff = "Kyrie" {
    \tempo 4=96
    \set ChoirStaff.midiInstrument = "string ensemble 1"
    <<
      \new Voice = "sopranoKyrie" { \clef "treble" \global \sopKyrie }
      \new Lyrics = "sopranoKyrieWords" \lyricsto sopranoKyrie { \sopKyrieWords }
      \new Voice = "altoKyrie" { \clef "treble" \global \altKyrie }
      \new Lyrics = "altoKyrieWords" \lyricsto altoKyrie { \altKyrieWords }
    >>
  }
  \layout {
    \context {
      \Voice
      \consists Ambitus_engraver
      \remove "Note_heads_engraver"
      \consists "Completion_heads_engraver"
    }
  }
}