\version "2.18.0"
#(ly:set-option 'point-and-click #f) 
#(set-global-staff-size 20)

\header {
  title = \markup \fill-line { "Exemple collision" }
  tagline = ##f
}

\paper {
  #(set-paper-size "a4")
  left-margin = 2\cm
  right-margin = 2\cm
  top-margin = 2\cm
  bottom-margin = 2\cm
}
% fonction permettant de recopier automatiquement le numéro de couplet à chaque ligne
couplet = 
#(define-music-function (parser location str) (string?)
    #{ \override InstrumentName #'X-offset = #3
  \override InstrumentName #'font-size = #-0.2  
  \override InstrumentName #'font-series = #'bold
  \set vocalName = $str  
  \set shortVocalName = $str
      #}
      )

global = {
  \key a \minor
  \time 2/2
  \set Score.measureLength = #(ly:make-moment 4 2)
}

ficta = { \once \set suggestAccidentals = ##t }
alto = \relative c' {
  \global
  a1 d2 d	|c a \ficta bes2. c4	| d2 c1 bes2	| a1 d			| f2 f e c	| \break
  d2. e4 f g e2~ | e d e1		| a, d2 d	| c a \ficta bes2. c4	| d c c1 bes2	| \break
  a1 d		| f2 f e c		| d4 c d e f e a2~	| a gis a1	| e c2 a	| \break
  b c d4 e f d	| e2 d1 cis2		| d1 a'		| f2 d f e		| d4 e f1 e2	| \break
  f1 a		| c2 a g f		| e d g f	| e\breve		\bar "|."
}

tenor = \relative c {
  \global
  r1 d1		a'2 a g e	f1 g		a r	a c2 c
  b g a1	b a		r1 d,	a'2 a g e	f1 g
  a r		a c2 c		b g a1		b a	r a
  g2 e f f	g1 a		d, r		d' a2 c	bes a g1
  f r		a bes2 a	g f e d		e\breve  
}

coupletunalto = \lyricmode {
  Un deux trois quatre cinq six __ _ _ _ sept huit,
  Un deux trois quatre cinq six __ _ _ _ _ _ sept,
  Un deux trois quatre cinq six __ _ _ _ _ lonnng -- looong
  dix onze douze treize looog looon __ _ _ _ _ _ _ - gue
  C'est un ex -- emple de lonnn __ _ _ _ _ - gue syllabe,
  Un deux trois quatre cinq six __ _ _ _ sept ;
  Un deux trois quatre cinq six __ _ _ sept huit.
}
coupletuntenor = \lyricmode {
  Un deux trois quatre cinq six sept huit,
  Un deux trois quatre cinq six __ _ sept,
  Un deux trois quatre cinq six lonnng looong
  dix onze douze treize looog looon __ - gue
  C'est un ex -- emple de lonnn -- gue syllabe,
  Un deux trois quatre cinq six  sept ;
  Un deux trois quatre cinq six sept huit.
}
couplettroisalto = \lyricmode {
  Too too too too too too __ _ _ - to -- to,
  too too too too too too __ _ _ _ _ - to,
  tuu tuu tuu tuu tu tu __ _ _ _ _ tu tuu
  tou tou tou tou tou tou __ _ _ _ _ _ _ - tou.
  tou tou tou tou tou tou __ _ _ _ _ _ tou tou :
  tou tou tou tou tou tou __ _ _ - tou,
  ton ton ton ton ton ton __ _ - ton -- ton.
}
couplettroistenor = \lyricmode {
  Too too too too too too -- to -- to,
  too too too too too too __ - to,
  tuu tuu tuu tuu tu tu tu tuu
  tou tou tou tou tou tou __ - tou.
  tou tou tou tou tou tou tou tou :
  tou tou tou tou tou tou tou,
  ton ton ton ton ton ton -- ton -- ton.
}

Chant = {
  \new ChoirStaff <<
  \override ChoirStaff.TimeSignature #'style = #'mensural
    \new Staff \with {
      midiInstrument = "acoustic grand"
      instrumentName = "Alto"
    } <<  \new Voice = "one" { \alto }
    \lyricsto "one" \new Lyrics { \couplet "1."  \coupletunalto }
    \lyricsto "one" \new Lyrics { \couplet "3."  \couplettroisalto }
    >>
    \new Staff \with {
      midiInstrument = "acoustic grand"
      instrumentName = "Ténor"
    } << \new Voice = "two" { \clef "treble_8" \tenor }
    \lyricsto "two" \new Lyrics \with { vocalName = #"1." 		% nécessaire en raison du départ du ténor sur une pause
                                        \override InstrumentName #'X-offset = #3	
                                        \override InstrumentName #'font-series = #'bold
                                        \override InstrumentName #'font-size = #-0.2 }
    { \couplet "1."  \coupletuntenor }
    \lyricsto "two" \new Lyrics \with { vocalName = #"3." 
                                        \override InstrumentName #'X-offset = #3
                                        \override InstrumentName #'font-series = #'bold
                                        \override InstrumentName #'font-size = #-0.2 }
    { \couplet "3."  \couplettroistenor }
    >>
  >>
}
\score{ \Chant
        \layout { ragged-last = ##f }
}